Backup en Vb.Net

Résolu/Fermé
Pascal_22 Messages postés 534 Date d'inscription lundi 20 mars 2006 Statut Membre Dernière intervention 29 août 2014 - 29 mai 2006 à 19:14
 vadr - 9 sept. 2007 à 21:45
Bonjour,

J'ai une petite question concernant le backup en VB .NET.

Je m'explique .... Je suis en train de faire un logiciel en VB .NET avec une base de donnée ACCESS 2000. La base va être sur le c:\.

J'aimerais intégrer dans mon logiciel un menu avec comme choix de : 'sauvegarder la base de donnée' sur un autre lecteur
ex.(Fichier->Sauvegarde de la base de donné)
Soit pour l'envoyé sur une diskette oubien sur une clé usb.

Un peu comme le XCOPY dans le DOS, pour copier ma base sur un autre lecteur en cas ou l'ordinateur bog.

J'aimerais savoir s'il existe une fonction(ou autre) pour copier un fichier vers une autre destination ????

Avez-vous une idée de ce que je pourrait faire !! Ou bien me conseiller quelques chose.

Merci de votre aide !

Pascal_22
A voir également:

3 réponses

BLODOX Messages postés 10 Date d'inscription lundi 29 mai 2006 Statut Membre Dernière intervention 24 février 2015 3
29 mai 2006 à 21:26
Facile...
'
par exemple, dans un de mes applis, j'utilise :
_____________________________________________________
dim F as Integer = FreeFile()
'
If System.IO.File.Exists(SRC_FILE) Then
BKP_DATE = System.IO.File.GetLastWriteTime(SRC_FILE)
System.IO.File.Copy(SRC_FILE, BKP_FILE, True)
End If
'
FileOpen(F, SRC_FILE, OpenMode.Output, OpenAccess.Write)
'
etc...
_____________________________________________________

SRC_FILE = mon fichier de travail
BKP_FILE = mon fichier de sauvegarde
BKP_DATE me sert juste à récupérer la date de dernière
écriture sur mon ancien fichier de sortie qui devient
mon nouveau fichier de sauvegarde
Note : "True" dans le "System.IO.File.Copy()" indique que
l'ancien fichier de sauvegarde est "écrasé" par le nouveau.

SRC_FILE & BKP_FILE sont déclarés en string et initialisés
soit "en dur"
ex :
SRC_FILE : "C:\MonRepertoireSurMonDisk\MonFichierAMoi.xyz"
BKP_FILE : "K:\MonRepertoireSurMaClefUSB\MonFichierAMoi.xyz"
soit en récupérant le "Application.StartupPath" et/ou en
gérant dynamiquement le(s) répertoire(s)

ex:

Public FILE_PATH As String = Application.StartupPath
Public SRC_FILE As String = FILE_PATH & "\MonFichierAMoi.xyz"
Public BKP_FILE As String = FILE_PATH & "\MonFichierAMoi.BAK"
Public BKP_DATE As String = Nothing

(ici je me sers du même répertoire et du même nom de fichier,
seule l'extension change)

Si ça répond à ta question

a+
1
Pascal_22 Messages postés 534 Date d'inscription lundi 20 mars 2006 Statut Membre Dernière intervention 29 août 2014 54
29 mai 2006 à 21:55
Salut BLODOX,

Merci tu as bien répondu à ma question.

Merci encore !!!

Pascal_22
0
Bonjour
Je suis dans le meme cas, j'ai utilisé le code fourni mais j'ai message d'erreur l base que vous voulez copier est déja ouverte

merci de m'aiguiller
@+
philippe
0