guitch1101
Messages postés30Date d'inscriptionmardi 6 juillet 2004StatutMembreDernière intervention19 juillet 2005
-
18 août 2004 à 17:59
cs_CanisLupus
Messages postés3757Date d'inscriptionmardi 23 septembre 2003StatutMembreDernière intervention13 mars 2006
-
18 août 2004 à 18:40
Bonjour,
Connaissant le chemin d'accès d'un fichier, je récupère dans un inputbox le nom de ce fichier, cependant est-il possible d'effectuer un test (simple if !) afin de savoir si le nom entré est valide ?
Merci.
Guitch.
A voir également:
Vba vérifier si un fichier existe
Vba verifier existence fichier - Meilleures réponses
Vba tester si un fichier existe - Meilleures réponses
cs_CanisLupus
Messages postés3757Date d'inscriptionmardi 23 septembre 2003StatutMembreDernière intervention13 mars 200618 18 août 2004 à 18:40
Bah, en VB6 on peut faire aussi :
Dim file As New FileSystemObject
If file.FileExists("c:\tmp\monfichier.txt") = False Then
MsgBox "fichier inexistant"
End If
A part l'obligation de cocher "Microsoft Scripting Runtime" dans Projet/Références..., où se trouve la supériorité de . NET ? Et qui peut m'indiquer la méthode la + rapide ? La plus simple ? et la moins bouffeuse de mémoire ? G bien l'impression que c le dir() !
Tous les glands ne deviennent pas des chênes mais tous les chênes ont été des glands
cs_EBArtSoft
Messages postés4525Date d'inscriptiondimanche 29 septembre 2002StatutModérateurDernière intervention22 avril 20199 18 août 2004 à 18:15
Tu peut aussi tester la lecture ou lecriture comme ceci :
Function IsReadable(FileName As String) As Boolean
On Error GoTo Xe
Dim lFree As Long
lFree = FreeFile
Open FileName For Input As lFree
IsReadable = True
Close lFree
Xi: Exit Function
Xe: Resume Xi
End Function
MsgBox IsReadable("c:\AutoRun.txt")