Discussion :

[lynchmaniac]

Bonjour,

J'ai le souci suivant.
Le code ci-dessous ne fonctionne pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
function listPrinters()
	Dim objWMIService
	Dim WshShell
	Set WshShell = CreateObject("WScript.Shell")
	Set objWMIService = GetObject("winmgmts:" & _
 "{impersonationLevel=Impersonate}!\\" & nomPC & "\root\cimv2")
end function

La ligne en gras ne fonctionne pas et renvoie une erreur 429 qui semble vouloir dire beaucoup de chose en fonction du contexte.
L'idée ici est de pouvoir lister les imprimantes du poste client (c'est même tiré de la FAQ). Il semble qu'il y a un souci de sécurité mais j'ai mis mon IE en site de confiance avec tout au niveau le plus bas mais l'erreur persiste. J'ai toujours :
Erreur 429 : Un composant ActiveX ne peut pas créer un objet

Est-ce que quelqu'un aurait une idée sur ce souci ?
merci d'avance

[Fredledingue]

Je ne crois pas que WMI peut fonctionner sous IE, ce serait de la folie en terme de sécurité.
Tu dois transplanter ton script dans une interface HTA, comme c'est déjà du html ce sera très facile.