Erreur VBS 800A01AD

Salut,



Et bien voilà, j’ai fait un script vbs qui fontionne correctement sur mon poste client W2k et sur mon serveur W2K3.



Par contre dès que je veux l’utiliser via Citrix j’ai un message d’erreur qui apparait:



Erreur: Un composant ActiveX ne peut pas créer un objet.

Code 800A01AD



Si je regarde la ligne 5 incriminé :



Ligne4 Set objShell = CreateObject(“Shell.Application”)

Ligne 5 Set objShellWindows = objShell.Windows



Est ce que quelqu’un à une idée à ce sujet ?



Merci

http://support.microsoft.com/kb/194801



http://www.google.co.uk/search?hl=en&client=firefox-a&channel=s&rls=org.mozilla%3Aen-US%3Aofficial&hs=PdU&q=800A01AD+vbscript&btnG=Search&meta=

Salut !



Merci pour ces liens ThinisFat, je l’ai déjà consulté avant de poster sur le forum.



Mon gros problème est que mon script n’est pas inclus dans une page ASP.



De plus mon script fonctionne aussi bien sur mon serveur Citrix que sur mon poste client, le problème n’apparait que si j’utilise ce script au sein d’une session Citrix.



Ci dessous le script en question qui doit permettre à un utilisateur d’utiliser IE pour aller sur des pages web et qui referme IE lors de l’ouverture d’un fichier local



************* Begin of the script ************

Set objShell = CreateObject(“Shell.Application”)

Set objShellWindows = objShell.Windows

Set WshShell = CreateObject(“WScript.Shell”)



WshShell.Run "iexplore.exe"



Do While True

If objShellWindows.Count = 0 Then

’ Wscript.Echo “No browser.”

’ Wscript.Quit

End If



blnFound = False



For i = 0 to objShellWindows.Count - 1

Set objIE = objShellWindows.Item(i)

strURL = objIE.LocationURL

If InStr(strURL, “file://”)Then

blnFound = True

End If

Next



If blnFound Then

Wscript.Echo "Browser on Local Computer"

WScript.Echo "Fermeture Internet Explorer"

objIE.quit

WScript.Quit

Else

Wscript.Echo "No browser windows are open to Local Computer."

WScript.Sleep 5000

End If

Loop

************* End of the script ************

ta session se fait dans un bureau publié ? je ne pense pas…



comment veux tu que CreateObject(“Shell.Application”) puisse se créer alors que le Shell ne tourne pas… ? ou tout du moins le shell qui est utilisé (l’application que tu as publié) n’exporte pas cet objet…