HTML et liste des imprimantes

le sujet peut paraitre bizar mais je me tourne vers ce forum pour trouver des informations pour le développement d'un projet intranet.

mon problème est que je souhaiterais connaitre l'état d'une imprimante connectée à un pc et l'afficher dans mon appli web. j'ai cherché d'abord du coté de Javascript mais en vain ... enfin pas tout a fait vu que l'on m'a indiquer de me renseigner du coté de VBScript. Par conséquent me voilà !!!

Quelqu'un pourrait-il m'aider car je ne connais pas du tout VBScript? Je cherche simplement à connaitre l'état d'une imprimante connectée à un pc?

:faq:

As tu essayé WMI et l'un de ces scripts :


Imprimantes : classe Win32_Printer

Merci bbil pour ta réponse rapide.
J'ai essayé différents scripts de ce genre mais rien ne s'affiche.

Pour ne pas en rester à ce stade est en apprendre un peu plus sur le sujet, je vais me focaliser sur un script du lien que tu m'a transmis

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

<SCRIPT LANGUAGE="VBScript"> Dim objWMIService, colInstalledPrinters, objPrinter Dim nomPC, Resultat   nomPC = "."   Set objWMIService = GetObject("winmgmts:" & _ "{impersonationLevel=impersonate}!\\" & nomPC & "\root\cimv2") Set colInstalledPrinters = _ objWMIService.execQuery("Select * from Win32_Printer")   For Each objPrinter In colInstalledPrinters Resultat = Resultat & "Nom: " & objPrinter.Name & " active : " _ & objPrinter.Default & vbLf Next   MsgBox Resultat </SCRIPT>

---

Aucune information n'apparait mais il y a une erreur. Ne connaissant pas VBScript quelqu'un peut-il m'aider à comprendre cette erreur et comment la corriger.

Code:

---

Un composant ActiveX ne peut pas créer un objet : 'GetObject'

---

Quelqu'un pourrait-il m'expliquer le paramètre de cette fonction GetObject? mon soucis vient peut être uniquement d'une mauvaise configuration?

J'ai également essayé de modifer les paramètre de mon navigateur mais sans résultat positif seulement un changement d'erreur vers "permission denied"