|
512
|
Programación / Programación Visual Basic / ejecutar sincronamente un archivo bat
|
en: 28 Septiembre 2006, 18:30 pm
|
Hola, estyo haciendo un programa en el que utilizo algunos archivos .bat, los mando llamar con la instruccion Shell, pero los ajecuta asincronamente
Shell App.Path & "\respaldo.bat", vbNormalFocus
hay alguna manera de hacer que mi programa espere hasta que el archivo bat termine su ejecución??
|
|
|
514
|
Programación / Programación Visual Basic / Re: usando base de datos
|
en: 31 Agosto 2006, 02:09 am
|
puedes hacerlo de la siguiente manera:
dim BD as database dim tb as recordset
set bd= workspaces(0).Opendatabase("Ruta y Nombre de la BD", Exclusivo, Sololectura)
set tb = bd.openrecordset(Consulta Sql o Nombre de la tabla)
para cerrarlo... tb.close db.close set tb = nothing -> Libera la memoria set bd = nothing
para mayor información consulta ADO en la ayuda del VB
|
|
|
517
|
Programación / Programación Visual Basic / Re: Atributos de archivos
|
en: 22 Agosto 2006, 01:01 am
|
lo puedes hacer con la función
SetAttr pathname, attributes
pathname - .Expresión de cadena que especifica un nombre de archivo. Puede incluir el directorio o carpeta y la unidad de disco.
attributes - Constante oexpresión numérica, cuya suma especifica los atributos de archivo.
Valores vbNormal 0 Normal (predeterminado) vbReadOnly 1 Sólo lectura vbHidden 2 Oculto vbSystem 4 Archivo de sistema. vbArchive 32 El archivo ha sido modificado después de haberse efectuado la última copia de seguridad.
Nota Visual Basic para aplicaciones especifica estas constantes. Como resultado de ello, esos nombres se pueden utilizar en cualquier lugar del código sustituyendo al valor correspondiente.
Comentarios
Si se trata de establecer los atributos de un archivo abierto, se producirá unerror en tiempo de ejecución.
|
|
|
519
|
Programación / Programación Visual Basic / Re: Activar\Desactivar conexion de red
|
en: 11 Agosto 2006, 00:07 am
|
puedes hacer un bat que haga eso:
Net [opciones] net start X Inicia el servicio X net stop X Termna el servicio X net config server Muestra/modifica servicios. /hidden=yes/no indica si el servidor debe mostrarse en la lista de ordenadores. Se corresponde con el comando Samba 'browseable' /autodisconnect:X minutos antes de que se desconecte un usuario del servidor net pause X Detiene el servicio X net continue X Reanuda el servicio X net view X /domain: Y mostrar dominios enteros o recursos en un equipo /Domain: y -> muestra equipos en el dominio X es el servidor que se desea ver (\\X) net print impresora Permite ver/modificar la cola de impresión /hold:x -> no imprimir el trabajo X /release:x -> reanudar trabajo X net share Mostrar/modificar recursos compartidos net use nombre \\recurso Crear una conexión de red
esto lo saque de esta página
|
|
|
520
|
Programación / Programación Visual Basic / Re: Ayuda para guardar los cambios de un programa en una base de datos.
|
en: 10 Agosto 2006, 23:59 pm
|
no entiendo exactamente lo que quieres hacer, al decir "Guardar los datos del programa", quieres que cada vez que hagas cambios al còdigo lo guarde en un archivo txt, doc, etc.
por otra parte creo que te enredas mucho con el còdigo puedes hacer que los textbox acepten solo nùmeros:
Private Sub text1_KeyPress(KeyAscii As Integer) If KeyAscii = 8 Then Exit Sub If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0 End Sub
y por otra puedes usar un for para revisar si los textbox estan vacios:
Dim x As TextBox For Each x In Controls If x = "" Then MsgBox "..." Next
|
|
|
|
|
|
|