Bonsoir à la communauté.
Je voudrais restaurer une base de données postgresql en utilisant VB6 (c'est à dire à partir du code).
pour la sauvegarde j'arrive à le faire sans problème. Pour cela, j'utilise la commande SHELL de VB.
1 2 3 4 5 6 7 8 9 10
|
Commande = "C:\Program Files\PostgreSQL\8.2\bin\pg_dump.exe -i -h localhost -p 5432 -U postgres -F c -b -v -f " & Chr(34) & "" & Label_fich.Caption & "" & Chr(34) & " " & dataBASENAME
' Commande contient la chaine de caractères permettant de sauvegarder la BD
resultat = Shell(Commande, vbMinimizedNoFocus)
If resultat = 0 Then
MsgBox "La sauvegarde à échouer. Vérifier que vous êtes connectés au serveur", vbCritical, App.title & " : Echec!"
Else
MsgBox "La sauvegarde a réussi.", vbInformation, App.title
Unload Me
End If |
Pour la restauration je procède de la même manière que la sauvegarde sauf qu'ici la commande n'est pas la même
Commande = "C:\Program Files\PostgreSQL\8.2\bin\pg_restore.exe -i -h localhost -p 5432 -U postgres -d test -v " & """" & Label_fich.Caption & """"
Si quelqu'un à des suggestions elles seront la bienvenue d'avance merci.
Partager