Vbscript en délire

Salut à tous,

Je cherche à tester l'existence d'un répertoire citrix dans c:\program files

voici mon code

Code:

---

1 2 3 4 5 6 7 8 9

On Error Resume Next Set WshShell = CreateObject("WScript.Shell") strProgdir = WshShell.ExpandEnvironmentStrings("%PROGRAMFILES%")   if WshShell.FolderExists(strProgdir&"\citrix") then Wscript.echo "citrix existe" else Wscript.echo "citrix existe pas" end if

---

et que mon répertoire existe ou pas, j'ai toujours la même réponse : "Citrix existe"
Je ne vois pas du tout la boulette que j'ai faites...

HELP please HELP :aie:

Citation:

---

Envoyé par Ptit Dark

Code:

---

WshShell.FolderExists(strProgdir&"\citrix")

---

---

Cette fonction n'est pas géré par ton WshShell. Tu dois rajouter

Code:

---

Set objFSO = CreateObject("Scripting.FileSystemObject")

---

et modifier la ligne de ton code que j'ai cité par :

Code:

---

objFSO.FolderExists(strProgdir&"\citrix")

---

Bonne journée.

Ah ça se confirme, je suis bel et bien blond :oops:

Merci beaucoup Thulkash