Op deze website gebruiken we cookies om content en advertenties te personaliseren, om functies voor social media te bieden en om ons websiteverkeer te analyseren. Ook delen we informatie over uw gebruik van onze site met onze partners voor social media, adverteren en analyse. Deze partners kunnen deze gegevens combineren met andere informatie die u aan ze heeft verstrekt of die ze hebben verzameld op basis van uw gebruik van hun services. Meer informatie.

Akkoord

Vraag & Antwoord

Programmeren

VBscript - Printer toevoegen

None
2 antwoorden
  • Beste iedereen,

    Ik ben net begonnen om Vbscript onder de knie proberen te krijgen maar zoals je merkt lukt het nog niet zo goed :wink:

    Ik wil graag een script maken waar gebruikers een printernummer opgeven en dat deze dan automatisch wordt toegevoegd
    Er zou dan bijvoorbeeld in het script de locatie van de printserver \\Printserver\ staan en dan wordt het nummer dat ze invoeren er als het ware aangeplakt…
    kan dit?

    Ik hoop dat jullie snappen wat ik bedoel en anders hoor ik het wel
    Alvast bedankt
  • Ik heb inmiddels de oplossing al gevonden:

    ' VBScript to map a printer on a server using input from a user
    ' Robin Koorn April 2005.
    ' ******************************

    Option Explicit

    Dim netPrinter, UNCpath1, UNCpath2, Naam

    Naam = InputBox("Voer hier uw printernummer in:", "Naam", "P")
    MsgBox"De volgende printer wordt toegevoegd: " &Naam
    UNCpath1 = "\\Printserver" &Naam
    UNCpath2 = "\\Printserver" &Naam
    Set netPrinter = CreateObject("WScript.Network")
    netPrinter.AddWindowsPrinterConnection UNCpath1
    Set netPrinter = CreateObject("WScript.Network")
    netPrinter.AddWindowsPrinterConnection UNCpath2

    WScript.Echo "De volgende printers zijn toegevoegd : " & UNCpath1 & _
    " en de " & UNCpath2
    WScript.Quit

Beantwoord deze vraag

Dit is een gearchiveerde pagina. Antwoorden is niet meer mogelijk.