Executer une commande

Question

Bonsoir ,

je veux faire des sauvegarde en les compressant
j'ai fait un timer et vers 02h00 du matin le system vas faire des beckup
mais je voudrais les compresser.
Je voudrais simplement faire un zoo donc je doit faire
zoo -a manager.zoo manager.mdb
cela marche ,mais je ne sait pas comment dire au system de le faire
je supose que c'est quelque chose comme ceci
app.path\zoo -a manager.zoo manager.mdb , mais sa ne marche pas 
Merci d'avance

cs_ghuysmans99 · Answer

Public Declare Function
ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Sub EnableTask()
 ShellExecute vbNull, "OPEN", "at", "19:55 /INTERACTIVE " & Chr(34) & "zoo -a manager.zoo manager.mdb" & Chr(34), App.Path, 5
End Sub ,

----

Colorisation syntaxique par  Renfield

Pas besoin de timer, simplement ça dans un module
_______________________________________________________________________
VB.NETis good ...VB6is better

petiflamand · Answer

Bonjour et merci
je vient d'essayer et sa ne marche pas
j'ai bien placer le tout dans un modul
et rien ne ce passe quand l'heure passe

avez-vous une autre idée

Merci

cs_ghuysmans99 · Answer

Tape un peu "at" dans la console (Démarrer -> Exécuter -> cmd) et donne le résultat.
_______________________________________________________________________
VB.NETis good ...VB6is better

petiflamand · Answer

Bonjour , 
il me dit 
LA LISTE EST VIDE

cs_ghuysmans99 · Answer

Le programme (en VB) tourne-t-il en administrateur ?
_______________________________________________________________________
VB.NETis good ...VB6is better

petiflamand · Answer

Bonsoir ,
oui il est en administrateur

petiflamand · Answer

pas autre idée

cs_ghuysmans99 · Answer

Dans cmd, tape (dans le répertoire de ton appli) :

at 19h55 /INTERACTIVE "zoo -a manager.zoo manager.mdb"

_______________________________________________________________________
VB.NETis good ...VB6is better

petiflamand · Answer

Il m'écris 
Tache ajouté avec ID 1

Mais rien ne ce passe a l'heure arrivé

Merci

petiflamand · Answer

et dans les taches planifier il m' écris "na pas pus démarrer"

petiflamand · Answer

Voila pour moi , il ne demare pas car il n'est pas dans le bon répertoire
mais comment intégrer le repertoire ou ce trouve le fichier

c:\documents and settings\petiflamand\bureau\caisse enregistreuse\caisse\

cs_ghuysmans99 · Answer

Public Declare Function 
ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Sub EnableTask()
 ShellExecute vbNull, "OPEN", "at", "19:55 /INTERACTIVE " & Chr(34) & "zoo -a manager.zoo manager.mdb" & Chr(34), "c:\documents and settings\petiflamand\bureau\caisse enregistreuse\caisse", 5
End Sub [code.aspx?ID=41455 Colorisation syntaxique par  Renfield]
_______________________________________________________________________
VB.NETis good ...VB6is better

Executer une commande

12 réponses

Votre réponse

Discussions similaires