Copie de sauvegarde de ma base access
mr_lassoued
Messages postés
25
Date d'inscription
mardi 14 mars 2006
Statut
Membre
Dernière intervention
29 novembre 2009
-
15 déc. 2006 à 15:09
bricoyeye Messages postés 326 Date d'inscription vendredi 15 avril 2005 Statut Membre Dernière intervention 29 avril 2008 - 17 déc. 2006 à 15:33
bricoyeye Messages postés 326 Date d'inscription vendredi 15 avril 2005 Statut Membre Dernière intervention 29 avril 2008 - 17 déc. 2006 à 15:33
A voir également:
- Copie de sauvegarde de ma base access
- Base de données javascript - Conseils pratiques -Javascript
- Base de données access - Conseils pratiques -Visual Basic / VB.NET
- Base de données e-commerce - Forum PHP
- Connexion base de données - Conseils pratiques -PHP
- Nomenclature base de données - Conseils pratiques -PHP
3 réponses
bricoyeye
Messages postés
326
Date d'inscription
vendredi 15 avril 2005
Statut
Membre
Dernière intervention
29 avril 2008
2
15 déc. 2006 à 17:40
15 déc. 2006 à 17:40
Salut,
Tu veux faire quoi?
Une copie entiere de ta base?
Tu veux faire quoi?
Une copie entiere de ta base?
mr_lassoued
Messages postés
25
Date d'inscription
mardi 14 mars 2006
Statut
Membre
Dernière intervention
29 novembre 2009
17 déc. 2006 à 12:16
17 déc. 2006 à 12:16
exactement, une copie de sauvegarde entière de la BD, mais la méthode filecopy me cause des probs, donc je cherche une autre alternative.
merci
merci
bricoyeye
Messages postés
326
Date d'inscription
vendredi 15 avril 2005
Statut
Membre
Dernière intervention
29 avril 2008
2
17 déc. 2006 à 15:33
17 déc. 2006 à 15:33
Salut...
Public Sub CopierFichier(Origine As String, Destination As String)
Dim fi
Set fi = CreateObject("Scripting.FileSystemObject")
fi.CopyFile Origine, Destination
Set fi = Nothing
End Sub
Tu l'appelles par:
Origine = App.Path (ou autre!)
Destination = "E:" (ou autre)
CopierFichier App.Path & "\TABASE.mdb", "E:"
End Sub
Public Sub CopierFichier(Origine As String, Destination As String)
Dim fi
Set fi = CreateObject("Scripting.FileSystemObject")
fi.CopyFile Origine, Destination
Set fi = Nothing
End Sub
Tu l'appelles par:
Origine = App.Path (ou autre!)
Destination = "E:" (ou autre)
CopierFichier App.Path & "\TABASE.mdb", "E:"
End Sub