J'ai un problème de FileCopy sous VB4

Question

Je veux copier 
B:Leves*.* vers D:Leves 
alors j'ai inscrit le code suivant:

dim a,b
a = "B:Leves*.*"
b = "D:Leves"
FileCopy a, b

mais sa ne marche pas, sa dit "Erreur 52, nom ou numéros de fichier incorrect" j'ai tout essayer, rien à faire....... Merci!

Amonbofis · Answer

FileCopy n'accepte pas les 'wildcards'.

Tu dois lui donner un à un les noms des fichiers.

(code non testé)
Tu doit utiliser un truc du style:

dim FichierSource as string
dim FichierDest as string
dim NomComplet as string

FichierSource = "B:Leves*.*"
FichierDest = "D:Leves"
NomComplet = Dir FichierSource

Do
  filecopy nomcomplet fichierdest
  nomcomplet = dir
loop until nomcomplet=""

J'ai un problème de FileCopy sous VB4

1 réponse

Discussions similaires