copie de fichier à l'aide d'une fonction accessRésolu

Question

Bonjour,

J'essaye d'utiliser la fonction suivante (je pr&#233;cise que je suis d&#233;butant) pour copier un ensemble de fichiers d'un r&#233;pertoire vers un autre :

Function copier()

FileSystemObject.CopyFile "C:	emps\*.Zip", "C:	empsesu"


End Function

Ceci me rapporte une erreur 424 avec "objet requis". Je suis all&#233; dans l'aide mais ne comprends pas vu mon niveau ! Quelqu'un peut il m'expliquer de mani&#232;re claire pourquoi cette erreur et comment y remedier ?

D'avance merci.

P19

Simouss33 · Accepted Answer

Je vais y arriver

Dim fso As Scripting.FileSystemObject

set fso = new Scripting.FileSystemObject

D&#233;sol&#233; encore j'ai un peu de mal ce matin

Simouss33 · Answer

Il faut d'abord que tu d&#233;clare un objet FileObjectSystem:

dim fso as File Scripting.ObjectSystem

Set fso = New Scripting.FileObjectSystem
Call fso.CopyFile "C:	emps\*.Zip", "C:	empsesu"

Il faut aussi que tu ajoute la r&#233;f&#233;rence "Windows Sripting Runtime" . (Outils/R&#233;f&#233;rences dans la fen&#234;tre o&#249; tu &#233;cris le programme)

Normalement &#231;a devrait fonctionner.

cs_P19 · Answer

Bonjour et merci.

Sur l'instruction : 

dim fso as File Scripting.ObjectSystem

j'ai : 
---------------------------
Microsoft Visual Basic
---------------------------
Erreur de compilation:


Erreur de syntaxe
---------------------------
OK   Aide   
---------------------------

Simouss33 · Answer

Oups c'est 
Dim fso As Scripting.FileObjectSystem

D&#233;sol&#233;

cs_P19 · Answer

Merci beaucoup.

P19

Copie de fichier à l'aide d'une fonction access

5 réponses