IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBScript Discussion :

HTML et liste des imprimantes


Sujet :

VBScript

  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Août 2009
    Messages
    34
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Août 2009
    Messages : 34
    Par défaut 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?

  2. #2
    Expert éminent


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Par défaut


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


    Imprimantes : classe Win32_Printer

  3. #3
    Membre averti
    Profil pro
    Inscrit en
    Août 2009
    Messages
    34
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Août 2009
    Messages : 34
    Par défaut
    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 : Sélectionner tout - Visualiser dans une fenêtre à part
    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 : Sélectionner tout - Visualiser dans une fenêtre à part
    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"

Discussions similaires

  1. Affichier la liste des imprimante en VbScript
    Par PrinceMaster77 dans le forum ASP
    Réponses: 1
    Dernier message: 01/08/2006, 10h01
  2. [VBA-E] Liste des imprimantes installées
    Par CCRNP dans le forum Installation, Déploiement et Sécurité
    Réponses: 3
    Dernier message: 03/03/2006, 12h38
  3. Chargement de la liste des imprimantes dans TPrinterDialog
    Par bernie.noel dans le forum Composants VCL
    Réponses: 6
    Dernier message: 22/02/2006, 16h57
  4. Liste des imprimante
    Par billyboy dans le forum Windows
    Réponses: 2
    Dernier message: 17/06/2003, 19h25

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo