Jump to content

twenty

Members
  • Gesamte Inhalte

    410
  • Registriert seit

  • Letzter Besuch

Beiträge erstellt von twenty

  1. Hallo!

     

    Ich werde die Doku durchlesen. IP-Adresse habe ich schon vergeben. Mit Nullmodem an Serielle Schnittstelle -> Passwort eingegeben -> setup nic ip 10.0.0.1 255.255.255.0

    Mit dem Befehl - setup show - wird die richtige IP-Adresse angezeigt, aber ich kann über Ethernet das Gerät nicht erreichen. Weder pingen noch auf das Webinterface zugreifen.

    Werde nächste Woche noch einen Versuch starten.

     

    Schönes Wochenende

  2. '----------------------------------------------------------

    'Ausblenden eventueller Fehlermeldungen

    '----------------------------------------------------------

    on error resume next

    '----------------------------------------------------------

    'Instanzieren des Windows Scripting Hosts

    '----------------------------------------------------------

    Set Network = CreateObject("Wscript.Network")

     

    '----------------------------------------------------------

    'Löschen eventuell bestehender Printerconnections

    '----------------------------------------------------------

    For i = 0 To network.EnumPrinterConnections.Count - 1

    On Error Resume Next

    network.RemovePrinterConnection network.EnumPrinterConnections.Item(i)

    Next

    '----------------------------------------------------------

    'Auslesen der ersten 4 Buchstaben des Computernamens

    '----------------------------------------------------------

    sPCName = UCase(Left(network.ComputerName, 4))

    '----------------------------------------------------------

    'Zuweisen der jeweiligen Drucker sowie des Defaultdruckers

    '----------------------------------------------------------

    Select Case sPCName

    Case "PC01"

    PrinterShare = "\\ITMain\Raum1Color"

    network.AddWindowsPrinterConnection PrinterShare

    PrinterShare = "\\ITMain\Raum_1_Laser"

    network.AddWindowsPrinterConnection PrinterShare

    network.SetDefaultPrinter PrinterShare

    Case "PC02"

    PrinterShare = "\\ITMain\Raum1Color"

    network.AddWindowsPrinterConnection PrinterShare

    PrinterShare = "\\ITMain\Raum_2"

    network.AddWindowsPrinterConnection PrinterShare

    network.SetDefaultPrinter PrinterShare

    Case "PC03"

    PrinterShare = "\\ITMain\Raum1Color"

    network.AddWindowsPrinterConnection PrinterShare

    PrinterShare = "\\ITMain\Raum_3"

    network.AddWindowsPrinterConnection PrinterShare

    network.SetDefaultPrinter PrinterShare

    End Select

     

    Abspeichern als *.vbs und die Parameter an Deine Bedürfnisse anpassen.

×
×
  • Neu erstellen...