Brauche Hilfe bei einer .bat Datei

Hallo,

ich brauche Hilfe bei der Programmierung einer Batch Datei. Ich möchte beim Klick auf die bat Datei den Internet Explorer öffnen, mit der IP des NETIO 230A.
Soweit habe ich das geschafft.
Aber kann ich mich nun auch automatisch mit dieser Batch datei einloggen?
Im endefekt möchte ich einen Drucker übers Netzwerk einschalten. Aber nun muss ich immer das WebControl fenster öffnen und den Drucker manuell ein- und ausschalten. So würde ich gerne durch den Klick auf die Batch datei automatisch den Drucker einschalten... Wenn das geht...

Gruß

 

SUFU hätte dir das gebracht:

http://www.pcwelt.de/forum/programmieren/356698-netio-230a-fernbedienen.html

 

Nein, die Suchfunktion hat nichts gebracht. Mit dem Thread kann ich doch nichts anfangen!
Da steht ja keine Antwort auf meine Frage drin. Ich wollte wissen wie die bat Datei aussehen könnte...

Gruß

 

Also mit einer Batch-Datei kannst du das Webinterface nicht steuern, aber da steht, dass das mit telnet möglich ist unt das ist über Batch steuerbar.

 

ok das ist ja mal ne Ansage... Von Telnet hab ich noch nie was gehört... dann lass ich das lieber so wie es jetzt ist. Danke

 

Denkbar auch per Makro.

 

Sry! wg. Doublepost.
Telnet > http://de.wikipedia.org/wiki/Telnet

 

Ja, das von Wikipedia hab ich schon gelesen, bringt mich aber nicht wirklich weiter... Und Markos kenn ich nur aus Excel...
Naja mir hab das mit dem Programme schreiben einfacher vorgestellt... Dann werd ich das wohl so lassen wie es ist...
Danke Gruß

 

Telnet ist ziemlich einfach zu bedienen:
Die Befehle für den NETIO 230A finest du hier: http://koukaam.se/koukaam/downloads/MAN_DE_NETIO-230A_2.20.pdf
Hilfe zu telnet unter Windows

In dem Thread, den ich schon erwähnt habe steht schon ein Beispiel. Brauchst dazu wirklich nur wenige Zeilen

 

drucker-ein.bat

Code:

telnet 192.168.10.100
login DeinUserName DeinPasswort
port 4 1
quit

drucker-aus.bat

Code:

telnet 192.168.10.100
login DeinUserName DeinPasswort
port 4 0
quit

Voraussetzung ist das sich der Drucker am Ausgang 4 befindet. Andernfalls musst du das ganze entsprechend ändern. Desweiteren musst du die IP + die Logindaten anpassen. Das ganze muss vom Loginmodus auf Open Login stehen, da es sonst Probleme geben wird.

Konnte das ganze jetzt nicht testen, hoffe aber das es funktioniert.

 

Hallo, ok das mit dem Telnet funktioniert. Aber nur wenn ich es Schritt für Schritt mache, da ich ja immer auf eine Antwort warten muss...
nach dem Telnet - Befehl wechsel ich ja in die Telnet Ansicht... kann man das noch irgendwie automatisieren?
Aber schonmal vielen Dank für die Antworten..

Gruß

 

funktioniert das nicht, wie bei VB-Coder angegeben in einer .bat?

die befehle werden normalerweise nacheinander ausgeführt, also erst, wenn einer beendet ist startet der nächste.

 

nein, denn nach dem Befehl "telnet 192.168.2.200" ändert sich das drucker.bat Fenster zu Telnet 192.168.2.200 Fenster. Ich meine damit die Überschrift des Fensters. Als Text kommt dann die Antwort : 100 HELLO F2D99CB0
Ab jetzt können die weiteren Befehle eingegeben werden. Nach dem Login kommt die Antwort: 250 ok.
Dann kann ich direkt die Ausgänge steuern...

ICh hoffe dass das halbwegs verständlich erklärt war...

Gruß

Wer kann mir denn weiterhelfen?

Gruß

 

So, habe nun eine andere Lösung mit einer vbs Datei gefunden. Jetzt habe ich 2 vbs dateien, eine mit der ich meinen Drucker einschalte, und eine mit der ich den Drucker ausschalte. Nun meine Frage, man könnte doch ein MsgBox machen, wo drinsteht Drucker Ein / Aus und man abhängig welchen Button man drückt den passenden Script aufruft. Das müsste doch machbar sein, oder?

Hier das Script zum Drucker einschalten:

Set wshShell = CreateObject("Wscript.Shell")

wshShell****n "telnet 192.168.2.200", , False

WScript.Sleep 500
wshShell.SendKeys "login admin admin", True
wshShell.SendKeys "{ENTER}", True

WScript.Sleep 1000
wshShell.SendKeys "port 1 1", True
wshShell.SendKeys "{ENTER}", True

WScript.Sleep 1000
wshShell.SendKeys "quit", True
wshShell.SendKeys "{ENTER}", True

MsgBox "Ok drücken und 5s warten",64,"Drucker HP Laserjet 5"
wScript.sleep 5000

IP = "192.168.2.192"
Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
Set colItems = objWMIService.ExecQuery _
("Select * from Win32_PingStatus " & _
"Where Address = '" & IP & "'")
For Each objItem in colItems
If objItem.StatusCode = 0 Then
MsgBox IP & " ist erreichbar." ,64, "Drucker HP Laserjet 5"
wScript.sleep 1000
MsgBox "Drucker ist eingeschaltet",64,"Drucker HP LaserJet 5"
Else
MsgBox IP & " ist nicht erreichbar."
End If
Next




Und hier das Script zum Drucker ausschalten:

Set wshShell = CreateObject("Wscript.Shell")

wshShell****n "telnet 192.168.2.200", , False

WScript.Sleep 500
wshShell.SendKeys "login admin admin", True
wshShell.SendKeys "{ENTER}", True

WScript.Sleep 1000
wshShell.SendKeys "port 1 0", True
wshShell.SendKeys "{ENTER}", True

WScript.Sleep 1000
wshShell.SendKeys "quit", True
wshShell.SendKeys "{ENTER}", True

IP = "192.168.2.192"
Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
Set colItems = objWMIService.ExecQuery _
("Select * from Win32_PingStatus " & _
"Where Address = '" & IP & "'")
For Each objItem in colItems
If objItem.StatusCode = 0 Then
MsgBox IP & " Drucker ist immernoch erreichbar." ,64, "Drucker HP Laserjet 5"
Else
MsgBox " Drucker ist Aus.",64, "Drucker HP Laserjet 5"
End If
Next

Wer kann mir da helfen?

Danke

 

Wenn die beiden VBS tun was sie sollen...
...kannst Du mit diesem Code eine "Gemeinsam.VBS" benutzen >>>

Code:

strTitel = "Was soll getan werden ?"
strFrage = 	vbCr & "Drucker einschalten oder ausschalten ?   " & vbCr & vbCr & vbCr & _
			"Einschalten    =    Button >  JA" & vbCr & vbCr & _
			"Ausschalten   =    Button >  NEIN" & vbCr & "  "

		'Buttons JA+NEIN = 4, Fragezeichen = 32, zusammen 36
intArt = 36

intJob = MsgBox(strFrage, intArt, strTitel)

If intJob = vbYes Then
	'Hier Dein kompletter Code zum Einschalten
	'
	'die nächste Zeile dann entfernen, sie soll nur zeigen, wie es funktioniert
	wscript.echo "JA gedrückt"
	'
Else
	'Hier Dein kompletter Code zum Ausschalten
	'
	'diese Zeile dann auch entfernen...
	wscript.echo "NEIN gedrückt"
	'
End If

- MsgBox hat nur vorgegebene Beschriftungen der Buttons, aber so müsste es auch klar sein.

- Kannst diese VBS einmal so starten, sie zeigt nur welchen Button Du gedrückt hattest...

- Wenn OK, dann Deine beiden VBS komplett einfügen.


Gruss Urs

 

JA genau. Danke so hab ich mir das vorgestellt. Danke