Merci mais c'est pas ça que je cherche,je voudrais faire :
dim g
g= C:\Bidule\machin.txt
if (g "et la je voudrais dire existe" )
'execute machin, truk
End If
Message édité par Raoul773 le 29-01-2009 à 12:50:10
billgatesanonym
Posté le 29-01-2009 à 13:07:06
Réponse :
Dim fso, msg
Set fso = CreateObject("Scripting.FileSystemObject" )
If (fso.FileExists("toto.txt" )) Then
msg = "toto.txt existe."
Else
msg = "toto.txt n'existe pas."
End If
Raoul773
Posté le 29-01-2009 à 14:14:19
merci merci
il faut utiliser FileExist du FSO Merci encore