Oppure

Loading
05/03/08 10:49
gantonio
Non va ... in che senso ?
aaa
05/03/08 10:59
Manuel2
Non va, nel senso che il tuo suggerimento non funziona.
Cmq, ho risolto in questo modo:
- al vb6 faccio eseguire queste istruzioni:
    Open App.Path & "\dbbackup.bat" For Output As #1
    Print #1, "@ECHO OFF"
    Close #1
    Open App.Path & "\dbbackup.bat" For Append As #1
    Print #1, "C:\PROGRA~1\MySQL\MYSQLS~1.2\bin\MYSQLD~1.EXE --user=user --password=pass db > C:\" & Me.Text1.Text
    Close #1
    Open App.Path & "\dbbackup.bat" For Append As #1
    Print #1, "PAUSE"
    Close #1
    Open App.Path & "\dbbackup.bat" For Append As #1
    Print #1, ":END"
    Close #1
    Shell "dbbackup.bat", vbNormalFocus
    'Kill (App.Path & "dbbackup.bat")


questo crea un file DBBACKUP.BAT così scritto:
@ECHO OFF
C:\PROGRA~1\MySQL\MYSQLS~1.2\bin\MYSQLD~1.EXE --user=user --password=pass DB > C:\DB_ggmmyyyy_hhmm.sql
PAUSE
:END


Avrei voluto uscirmene con qualcosa di + semplice, però anche così mi sta bene. Grazie dell'aiuto Ganantonio.
aaa
05/03/08 11:03
gantonio
Scusa ... ma secondo me quello che ti avevo scritto deve funzionare ... probabilmente c'e' solo qualche problema minore ...

Se vuoi continuare a trovare una soluzione piu' semplice, fai questa prova ...

Con il tuo programma attuale prova a scrivere nel file la stringa proveniente dal mio codice al posto di quella con il nome corto ed eseguila ... con il comando PAUSE potrai leggere dove e' il problema ...
aaa
05/03/08 11:11
Manuel2
Ora non mi resta che cancellare il file .BAT, ma con l'istruzione
KILL App.path & "\dbbackup.bat"
solo che cancella il file BAT troppo presto, non ha il tempo di eseguire il BAT
aaa
05/03/08 11:13
gantonio
Scusa ... ma hai fatto la prova che ti ho detto?

Stiamo parlando di due cose diverse ... io vorrei farlo solamente con il comando inviato dalla Shell senza file .bat ...
aaa
05/03/08 11:16
Manuel2
Anche io vorrei farlo solo col comando Shell.
L'ho fatta la prova a fare:
shell """C:\PROGRA~1\MySQL\MYSQLS~1.2\bin\MYSQLD~1.EXE"" --user=user --password=pass db > " & App.Path & "\" & Me.Text1.Text
aaa
05/03/08 11:19
gantonio
Non mi hai capito ... la prova che volevo fare e' un'altra ...

aaa
05/03/08 11:31
Manuel2
E allora non ho capito quale prova dovevo fare, potresti riperti per favore?
aaa