Como saber cuando ha terminado lo que mande a MS-DOS

[E N T E R]

Tengo este code que utilizo para hacer BK de mi bd MySQL. como puedo saber si ha terminado de hacer la copia. o si hay una forma que me tire un msgbox copia completa o algo asi y cerrar la ventana de Ms-DOS

Código: (VB) [Seleccionar]

Set comando1 = CreateObject("WSCript.shell")
comando1.run "cmd /K " & txtRutaMySQL.Text & " --user=root --password=xxx --port=3306 --databases control_hotel > c:\x\b\archivo.sql"
Set comando1 = Nothing

[raul338]

Usá esta funcion, shellwait

ShellWait

espera a que termine

[E N T E R]

Hice así Raul, pero no me tira ningun error y no hace el BK

Código: (VB) [Seleccionar]

Private Sub Command3_Click()
   
    MousePointer = MousePointerConstants.vbHourglass
           
    'Contenido de txtRutaMySQL.Text = C:\wamp\bin\mysql\mysql5.5.24\bin\mysqldump.exe
   
    Call ShellWait(txtRutaMySQL.Text, "--user=root --password=xxx --port=3306 --databases control_hotel > ", "c:\x\b\archivo.sql")
   
    MousePointer = MousePointerConstants.vbDefault

End Sub

[seba123neo]

proba esta funcion shellandwait que usa openprocess, es la que mas veo en todos lados.

Shell to Another Application and Wait Until it Finishes

y como parametro le pasas todo el comando directo, ahi no estoy seguro pero para mysql yo uso algo asi:

mysqldump.exe -u root -proot basededatos -h localhost --result-file=back.sql

[E N T E R]

Funciona bien ese Seba, no hay una forma que cuando termine me tire un msgbox.

[seba123neo]

fijate que la funcion devuelve un boolean, si termino bien devuelve true y sino false.

asi que hace algo como

if shellandwait = true then
   msgbox "termino bien"
else
   msgbox "no funco ni mierda"
end if

saludos.

[raul338]

El problema es que estas usando mal, el tercer parametro no es donde se hará backup, y no podes hacer tipo batch que con ">" tiras el resultado a un archivo...

EL tercer parametro es la carpeta donde se ejecutará el exe