Ktb
Messages postés80Date d'inscriptionmercredi 13 mars 2002StatutMembreDernière intervention 8 novembre 2006
-
7 mai 2003 à 21:43
cs_Kartograv
Messages postés4Date d'inscriptionmardi 10 mai 2005StatutMembreDernière intervention15 avril 2009
-
8 juil. 2008 à 14:03
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
cs_Kartograv
Messages postés4Date d'inscriptionmardi 10 mai 2005StatutMembreDernière intervention15 avril 2009 8 juil. 2008 à 14:03
Merci. Bonne ressource utile. Mon programme gère des dossiers existants. Les limites de la fonction ne me concernent donc pas.
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202174 27 févr. 2007 à 10:11
Dir$ génère une erreur si chemin réseau inexistant :
If Dir$("\\MonFauxServer\MonDossier\MonFichier") <> vbNullString Then MsgBox "Il existe", vbInformation, "IL Existe"
utiliser par exemple
Public Declare Function GetFileAttributes Lib "kernel32.dll" Alias "GetFileAttributesA" (ByVal lpFileName As String) As Long
Public Const INVALID_FILE_ATTRIBUTES As Long = &HFFFFFFFF
Public Function DoesExist(ByRef vsPath As String) As Boolean
DoesExist = (GetFileAttributes(vsPath) <> INVALID_FILE_ATTRIBUTES)
End Function
hugues_PB
Messages postés1Date d'inscriptionsamedi 13 janvier 2007StatutMembreDernière intervention27 février 2007 27 févr. 2007 à 04:36
Très bonne source ! je l'utilise pour chercher des fichiers générés par Pro-E...
C'est beaucoup plus simple que GetAttr.
9713Jo
Messages postés17Date d'inscriptionmercredi 2 avril 2003StatutMembreDernière intervention15 mai 2003 9 mai 2003 à 16:41
Ouai pas con. Moi, j'utilisait Open For input avec une gestion d'erreur.
Merci.
cs_legion91
Messages postés216Date d'inscriptionmercredi 5 février 2003StatutMembreDernière intervention15 décembre 2010 8 mai 2003 à 09:11
source tres utile par exemple pour la creation d'une API d'installation,
Good taf
Ktb
Messages postés80Date d'inscriptionmercredi 13 mars 2002StatutMembreDernière intervention 8 novembre 20061 7 mai 2003 à 21:43
Oui pas mal comme idée.
Moi j'utilisais (mais c'est plus long et moins "propre") GetAttr(File) avec une gestion d'erreur qui se produit quand le fichier n'existe pas
Bonne idée !
8 juil. 2008 à 14:03
27 févr. 2007 à 10:11
If Dir$("\\MonFauxServer\MonDossier\MonFichier") <> vbNullString Then MsgBox "Il existe", vbInformation, "IL Existe"
utiliser par exemple
Public Declare Function GetFileAttributes Lib "kernel32.dll" Alias "GetFileAttributesA" (ByVal lpFileName As String) As Long
Public Const INVALID_FILE_ATTRIBUTES As Long = &HFFFFFFFF
Public Function DoesExist(ByRef vsPath As String) As Boolean
DoesExist = (GetFileAttributes(vsPath) <> INVALID_FILE_ATTRIBUTES)
End Function
27 févr. 2007 à 04:36
C'est beaucoup plus simple que GetAttr.
9 mai 2003 à 16:41
Merci.
8 mai 2003 à 09:11
Good taf
7 mai 2003 à 21:43
Moi j'utilisais (mais c'est plus long et moins "propre") GetAttr(File) avec une gestion d'erreur qui se produit quand le fichier n'existe pas
Bonne idée !