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

ASP Discussion :

Affichier la liste des imprimante en VbScript


Sujet :

ASP

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Profil pro
    Développeur informatique
    Inscrit en
    Octobre 2003
    Messages
    447
    Détails du profil
    Informations personnelles :
    Âge : 44
    Localisation : France

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Octobre 2003
    Messages : 447
    Par défaut Affichier la liste des imprimante en VbScript
    Je voudrais afficher la liste des imprimantes de la machines dans une liste déroulante :

    mais j'ai une erreur sur mon code en ligne 16 : "strComputer = ".""

    voici mon code :

    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
    20
    21
    22
    23
    24
    25
    26
    27
    28
     
     
    <% @LANGUAGE="VBScript" %>
     
    <html> 
     <head>
      <script language="VBscript">
       Function liste(form5)
        MsgBox "Elément " & (form5.list.selectedIndex + 1)
       End Function 
      </script> 
     </head> 
     <body> Entrez votre choix : 
      <form name="form5"> 
       <select name="list"> 
       <%
        strComputer = "."
        Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
        Set colInstalledPrinters =  objWMIService.ExecQuery("Select * from Win32_PrinterConfiguration")
       %> 
       <% For Each objPrinter in colInstalledPrinters %>
        <option value="<% = objPrinter.Name %>"><% = objPrinter.Name %></option>
       <% Next %>
       </select>
       <input type="button" name="b" value="Quel est l'imprimante retenu ?" onClick="liste(form5)"> 
      </form>
     </body> 
    </html>

  2. #2
    Expert confirmé
    Avatar de Immobilis
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Mars 2004
    Messages
    6 559
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Bouches du Rhône (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Développeur .NET

    Informations forums :
    Inscription : Mars 2004
    Messages : 6 559
    Par défaut
    Salut,

    Pas mal! Chez moi ça marche.

    A+
    "Winter is coming" (ma nouvelle page d'accueil)

Discussions similaires

  1. Réponses: 1
    Dernier message: 19/09/2006, 18h19
  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