[VBA Access 2000] Enregistrer Sous [Résolu]

Ulas89 2 Messages postés samedi 31 janvier 2009Date d'inscription 23 février 2009 Dernière intervention - 23 févr. 2009 à 12:11 - Dernière réponse : Ulas89 2 Messages postés samedi 31 janvier 2009Date d'inscription 23 février 2009 Dernière intervention
- 23 févr. 2009 à 16:00
Bonjour,

Je voudrais faire un bouton en access qui permet de faire une copie de la base de donnée sous un autre nom. J'ai cherché sur internet et sur l'aide d'Office mais je ne trouve rien. J'ai suivi quelques pistes tel que DoCmd.Save ou encore Docmd.CopyDatabaseFile mais sans résultat :s
C'est pour celà que je demande votre aide. Pourriez vous me donner une piste (ou encore la réponse ^^).

Merci d'avoir lu ce message
Afficher la suite 

1 réponse

Répondre au sujet
Ulas89 2 Messages postés samedi 31 janvier 2009Date d'inscription 23 février 2009 Dernière intervention - 23 févr. 2009 à 16:00
+3
Utile
Hum c'est bon j'ai trouvé l'erreur que j'avais fait. J'avais oublié de mettre un Set et vu que j'ai fait en sorte que vba n'affiche pas les messages d'erreurs, je croyais que la méthode ne marchait pas. Sinon voici mon code pour ceux qui en ont besoin:
    Dim fic As String
    Dim fs As Object
    Set fs = CreateObject("Scripting.FileSystemObject")
    fic = OpenFileDialog("Fichiers Microsoft Access (*.mdb)" & Chr(0) & "*.mdb*", Me)
    fs.CopyFile CurrentProject.FullName, fic

N'oubliez pas le Set ^^
Cette réponse vous a-t-elle aidé ?  
Commenter la réponse de Ulas89

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.