OVH Cloud OVH Cloud

Set fso = CreateObject("Scripting.FileSystemObject")

1 réponse
Avatar
michel
bonjour

voila j'ai un probleme à ce niveau sur access 2000 il me repond qu'il ne
connait pas malgre que j'ai toutes mes références bien définies. j'ai un OS
win2K.
Et mon fichier scrrun.dll se trouve bien sous c:\windows\system32. Et de
plus cela marché jusqu'à maintenant
voici le code que j'ai écrit:

Function FctRenseigneReference_sauv(PathDll As String)

Dim fso As FileSystemObject
Dim Fic As File
Set fso = CreateObject("Scripting.FileSystemObject")

1 réponse

Avatar
Sylvain Lafontaine
Hum, vous semblez mélanger le « Early Binding » avec le « Late Binding »;
peut-être que votre problème vient de là. Remplacez « Dim fso As
FileSystemObject » par « Dim fso » et regardez ce que cela donne.

--
Sylvain Lafontaine, ing.
MVP - Technologies Virtual-PC
E-mail: http://cerbermail.com/?QugbLEWINF


"michel" wrote in message
news:
bonjour

voila j'ai un probleme à ce niveau sur access 2000 il me repond qu'il ne
connait pas malgre que j'ai toutes mes références bien définies. j'ai un
OS
win2K.
Et mon fichier scrrun.dll se trouve bien sous c:windowssystem32. Et de
plus cela marché jusqu'à maintenant
voici le code que j'ai écrit:

Function FctRenseigneReference_sauv(PathDll As String)

Dim fso As FileSystemObject
Dim Fic As File
Set fso = CreateObject("Scripting.FileSystemObject")