Drucker hinzufügen

AltairKD

Hi zusammen,

ich bin grade dabei ein script mit AutoIT zu schreiben das drucker automatisch hinzufügt und installiert.

Jetzt habe ich allerdings das problem das das script den drucker hinzufügen soll(noch nicht die Treiber installieren) und ich nirgendwo was gefunden habe wie das gehen soll. Bei VB waren das nur 5 zeilen, aber will es jetzt mit AutoIT machen. Gibt es da was?

Danke im vorraus für die Hilfe!

mfg AltairKD

**Schnitzel**

Zitat von AltairKD

script den drucker hinzufügen soll(noch nicht die Treiber installieren)

meinst du damit das das script erstmal nur einen neuen Druckeranschluss erstellen soll?
oder den drucker auch schon hinzufügen ( mit treibern) aber ohne die software?

Zitat von AltairKD

Bei VB waren das nur 5 zeilen, aber will es jetzt mit AutoIT machen

haste das vb script noch? evtl kann man das einfach übersetzen

AltairKD

Genau, es soll erstmal nur den Anschluss erstellen, wie ich das mit den Treiber machen werde weiss ich schon ;).

Ja habe ich noch:

Code

Set wshshell = CreateObject("WScript.Shell") 
strComputer = "." 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") 


Set objNewPort = objWMIService.Get _ 
("Win32_TCPIPPrinterPort").SpawnInstance_ 
objNewPort.Name = "IP_132.1.83.12" 
objNewPort.Protocol = 1 
objNewPort.HostAddress = "132.1.83.12" 
objNewPort.PortNumber = "9100" 
objNewPort.SNMPEnabled = False 
objNewPort.Put_ 




wshshell.run "C:\Drucker_Script\1.bat"

Alles anzeigen

**Schnitzel**

hm ok ich glaub ich kenn da ne leichtere möglichkeit.

gib mal das in console ein vllt kommste ja zurecht
cscript %systemroot%\system32\prnport.vbs -?

SEuBo

Schnitzel: Bei mir kommt dann

Code

Eingabefehler: Die Skriptdatei "C:\Windows\system32\prnport.vbs" wurde nicht gef
unden.

Ich hab mal versucht das VB Script zu übersetzen, aber Objekte sind nicht so meine Stärke. Was hab ich falsch gemacht?

[autoit]

$objWMIService = ObjGet("winmgmts:\\.\root\cimv2")
$objNewPort = $objWMIService.Get("Win32_TCPIPPrinterPort")
With $objNewPort.SpawnInstance
.Name = "IP_132.1.83.12"
.Protocol = 1
.PortNumber = "9100"
.SNMPEnabled = False
.Put
EndWith

[/autoit]

AltairKD

Schnitzel: kann aber nicht die befehle da übernehmen oder doch?

SEuBo: ja bestimmt wegen deinen "tollen" Vista

**Schnitzel**

Zitat von AltairKD

Schnitzel: kann aber nicht die befehle da übernehmen oder doch?

öhm doch wieso nicht?^^
musst halt die daten eintragen die du willst

Zitat von SEuBo

Schnitzel: Bei mir kommt dann

Vista! (muss ich noch was sagen? )

nuts

[autoit]

$objWMIService=ObjGet("winmgmts:\\.\root\cimv2")
$objNewPort=$objWMIService.Get("Win32_TCPIPPrinterPort")
$objNewPort2=$objNewPort.SpawnInstance_
$objNewPort2.Name = "IP_132.1.83.12"
$objNewPort2.Protocol = 1
$objNewPort2.HostAddress = "127.0.0.1"
$objNewPort2.PortNumber = "9100"
$objNewPort2.SNMPEnabled = False
$objNewPort2.Put_

[/autoit]

So gehts bei mir.

AltairKD

Danke für die Hilfe habs jetzt hinbekommen, gebe einfach einen Befehl zum erstellen des anschlusses an das CMD

[autoit]

Case $Install
$sCommand = "cscript %systemdrive%\windows\system32\prnport.vbs -a -r " & $Name & " -h " & $hIP & " -o " & $Protocol & " -n " & $hPort
_RunDOS($sCommand)

[/autoit]

nuts: werde deine lösung auch mal testen und gucken welche ich nutzten werde.

progandy

Das VB-Skrip ruft auch die WMI-Objekte auf, ist im Endeffekt also das selbe.

SEuBo

Mich würde mal interessieren was das Underline am Ende der Zeile bedeuted

[autoit]

$objNewPort2=$objNewPort.SpawnInstance_

[/autoit]

Das ist ja kein AutoIt _ , das 2 Zeilen verbindet, sondern das gehört ja irgendwie zum Objekt. Aber was macht das Underline?

**AspirinJunkie**

Zitat von SEuBo

Mich würde mal interessieren was das Underline am Ende der Zeile bedeuted

Der Unterstrich ist wie ein Buchstabe lediglich Teil des Funktionsnamens.
Seine tiefere Bedeutung steht >>Hier<<.

Zitat von msdn

Wenn Sie Abbildung 2 genau betrachten, werden Sie bemerken, dass SWbemObject zwei unterschiedliche Gruppen von Methoden und Eigenschaften offen legt. Die obere Gruppe mit den Namen, die mit einem Unterstrich enden, ist Teil von SWbemObject und befindet sich in der Datei wbemdisp.dll. Die Unterstriche dienen dazu, Namenskonflikte mit Methoden und Eigenschaften zu verhindern, die von der Klassendefinition einer verwalteten Ressource festgelegt werden.

Also nichts besonderes - nur ein Teil des Namens

SEuBo

Danke