fonction isPath ? !?

Boujour tout le monde
j'aimerai savoir s'il existe sous vb6 une fonction qui permet de tester si un chemin est valide ou non
je rencontre en fait des problemes en chargeant des photos (loadPicture) dont le chemin change de maniere dynamique, et j'aimerasi savoir si une telle chose existe (une fonction isPath) avant de jouer sur la gestion des erreurs (on error: resume)

Dir

Citation:

---

Envoyé par jmfmarques

Dir

---

+1
exemple avec la fonction Dir()

Code:

---

1 2 3 4 5

If Dir(Me.txtRep.Text) <> "" Then msgbox "le dossier existe" else msgbox "le dossier n'existe pas" endif

---

tu peux aussi faire avec un FileSystemObject qui offre pas mal de fonctions pratiques, mais c'est plus lourd :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Dim fso As FileSystemObject Set fso = CreateObject("Scripting.FileSystemObject")   if fso.fileexist("c:\test\truc.ini") then ...   ou if fso.folderExist("c:\test\") then ...   set fso=nothing

---

--> ne pas oublier la référence à Microsoft Scripting runtime

Et pour être précis, si tu parles de répertoire :

Code:

---

1 2 3 4 5

If Dir(Me.txtRep.Text, 16) <> "" Then msgbox "le dossier existe" else msgbox "le dossier n'existe pas" endif

---

(cela t'évite juste de rajouter des "\" à la fin du nom du dossier... enfin je le fais comme ça en tout cas)

... et pour encore plus de précision, le 16 est la constante vbDirectory ^^
C'est plus explicite ^^

Citation:

---

Envoyé par Phifi

Et pour être précis, si tu parles de répertoire :

Code:

---

1 2 3 4 5

If Dir(Me.txtRep.Text, 16) <> "" Then msgbox "le dossier existe" else msgbox "le dossier n'existe pas" endif

---

(cela t'évite juste de rajouter des "\" à la fin du nom du dossier... enfin je le fais comme ça en tout cas)

---

d'abords pour mémoire pour le 16 on as la constante : vbDirectory ...
ensuite lorsqu'on ecrit :

Code:

---

dir("C:\toto",Vbdirectory)

---

le retour sera toto dans le cas ou c:\toto est un répertoire mais aussi si c:\toto est un fichier... pour tester si c'est bien un répertoire .. tu peu utiliser GetAttr.. ( voir aide en ligne :f1:, exemple sur dir.. ou la discussion )

Citation:

---

d'abords pour mémoire pour le 16 on as la constante : vbDirectory ...

---

Et oui, mais les vieilles syntaxes VB3 sont encore à l'honneur chez moi =)

Allez...
Je vais saisir cette occasion pour proposer à Bbil (s'il en est d'accord) de proposer à ma place , en contributions, un truc qui ne répond pas directement à celà mais à plusieurs questions de cette nature posées au cours des derniers mois.
Le fichier existe-t-il ? est-il "occupé" ? peut-on le lire ? etc...
En + : ouvre le répertoire (si répertoire), ouvre le fichier (si possible) etc...
Tu veux celà Bbil ?;)

heu juste une question JMF, pourquoi ne pa le faire toi meme ?? vu que tu sais ce que tu attends de la chose ca poura ce faire super bien (avec le secret que toi seul detient) ??

Ce n'est pas mon affaire, Sovo...
L'essentiel sera que chacun puisse en profiter, c'est tout.

Citation:

---

Envoyé par sovo

heu juste une question JMF, pourquoi ne pa le faire toi meme ?? vu que tu sais ce que tu attends de la chose ca poura ce faire super bien (avec le secret que toi seul detient) ??

---

Mais si, mais si! Allez! ajoute ça dans les contributions! ;)

C'est fait, zaza, ne t'inquiète donc pas : bbil a bien voulu s'en charger et je l'en remercie au nom de tous

mercii j'opte pour FileSystemObject qui offre effectivement pô mal de fonctions, sympa merci encore