Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

WakeOnLan Stapelverarbeitend

Tipp Entwicklung Batch & Shell

Mitglied: micneu

micneu (Level 2) - Jetzt verbinden

22.12.2009 um 22:03 Uhr, 5225 Aufrufe, 4 Kommentare, 1 Danke

Wollt ihr morgens Rechner Starten lassen bevor die Mitarbeiter anwesend sind habe ich hier ein kleines vb-script was euch helfen kann.

Speichert das vb-script mit ".vbs" und ruft es mit cscript name.vbs auf...
aufruf des scripts ohne optionen gibt euch die syntax

01.
02.
' Soll automatisch Computer zu einer bestimmten zeit Starten 
03.
' Oder Herunterfahren 
04.
' (c)  M. Neumann 
05.
' 16.06.2009 
06.
' rw.exe http://www.sysworksoft.net/products/rw.html 
07.
 
08.
Option Explicit 
09.
 
10.
Dim wol_ipadressenDatei, ipadressen 
11.
Dim wait, iArgument, FSO, sCommand, sModus, iLfdNr 
12.
Dim oArgumente, WshShell 
13.
Dim sDatei, sWait, COPYLOGO, copyRight, sLaenge, sZeichen, vVariable, zZeichen 
14.
 
15.
Const ForReading = 1 
16.
 
17.
Set oArgumente = WScript.Arguments 
18.
Set WshShell = WScript.CreateObject("WScript.Shell") 
19.
Set fso = CreateObject("Scripting.FileSystemObject") 
20.
copyRight = COPYLOGO & " 16.06.2009, M. Neumann" 
21.
'wait = 5 
22.
iArgument = 0  
23.
COPYLOGO = Chr(169) ' entspricht dem Zeichen (c) 
24.
sZeichen = "=" 
25.
iLfdNr = 0 
26.
Function zHeader(vVariable, zZeichen) 
27.
	sLaenge = Len(vVariable) 
28.
	wscript.Echo(String(sLaenge, zZeichen)) 
29.
	WScript.Echo(vVariable) 
30.
	wscript.Echo(String(sLaenge, zZeichen)) 
31.
End Function 
32.
 
33.
If oArgumente.Count > 0 Then 
34.
	Do 
35.
		If UCase(oArgumente(iArgument)) = "-D" Or _ 
36.
			UCase(oArgumente(iArgument)) = "/D" Or _ 
37.
			UCase(oArgumente(iArgument)) = "-Datei" Then 
38.
			'---- Dateiargument 
39.
			iArgument = iArgument + 1 
40.
			sDatei = oArgumente(iArgument) 
41.
			Set wol_ipadressenDatei = fso.OpenTextFile(sDatei,ForReading) 
42.
		 
43.
		ElseIf UCase(oArgumente(iArgument)) = "-W" Or _ 
44.
			UCase(oArgumente(iArgument)) = "/W" Or _ 
45.
			UCase(oArgumente(iArgument)) = "-Wait" Then 
46.
			'---- Zeitargument 
47.
			iArgument = iArgument + 1 
48.
			sWait = oArgumente(iArgument) 
49.
			sWait = sWait * 1000 
50.
						 
51.
		ElseIf UCase(oArgumente(iArgument)) = "-M" Or _ 
52.
			UCase(oArgumente(iArgument)) = "/M" Or _ 
53.
			UCase(oArgumente(iArgument)) = "-Modus" Then 
54.
			'---- Betriebsart (sCommand / Stop) 
55.
			iArgument = iArgument + 1 
56.
			sModus = oArgumente(iArgument) 
57.
		End If 
58.
		 
59.
		iArgument = iArgument +1 
60.
	Loop Until iArgument >= oArgumente.Count 
61.
End If 
62.
 
63.
If sDatei = "" Or sWait = "" Or sModus = "" Then 
64.
	' Es wurde kein Argument übergeben 
65.
	zHeader copyRight,sZeichen 
66.
	WScript.Echo("Es wurde kein oder falsche Parameter übergeben.") 
67.
	WScript.Echo(vbTab + "-d dateiname oder -datei dateiname: " & sDatei) 
68.
	WScript.Echo(vbTab + "-w zeit(in sekunden) oder -wait zeit(in sekunden): " & sWait) 
69.
	WScript.Echo(vbTab + "-m Betriebsart Start (START) oder Heruntrfahren (STOP) " & vbCrLf & vbTab &" von Computer: " & sModus) 
70.
	 
71.
Else 
72.
	If sDatei	<> "" And sWait <> "" And sModus <> "" Then 
73.
		Do While wol_ipadressenDatei.AtEndOfStream <> True 
74.
			iLfdNr = iLfdNr +1 
75.
			ipadressen = Split(wol_ipadressenDatei.ReadLine, ";") 
76.
			WScript.Echo("LfdNr.: " & iLfdNr & ", IP: " & ipadressen(0) & ", mac: " & ipadressen(1) & ", Hostname: " & ipadressen(2)) 
77.
			If sModus = "start" Then 
78.
				 		sCommand = "cmd\rw.exe /m:" & ipadressen(1) 
79.
				 		WshShell.Run(sCommand) 
80.
				 		WScript.Echo(sCommand) 
81.
				 		WScript.Sleep sWait 
82.
			ElseIf sModus = "stop" Then 
83.
				 		sCommand = "shutdown -s -f -t " & sWait & " -m \\" & ipadressen(0) 
84.
						WshShell.Run(sCommand) 
85.
				 		WScript.Echo(sCommand) 
86.
			End If 
87.
		Loop 
88.
	End If		 
89.
End If
aufbau der werte datei:

IP;MAC;Hostname
192.168.01.109;0012345C0CF1;ab-1
192.168.01.114;00567899015;ab-1
192.168.01.115;0012341e;ab-3
192.168.01.116;00199901d20b;ab-4

Hoffe das ist was für euch

Gruß Michael
Mitglied: aqui
23.12.2009 um 00:32 Uhr
Die ct hatte das auch in ihrer Ausgabe Heft 25 / 2009 , Seite 186
http://www.heise.de/ct/09/25/links/186.shtml
Bitte warten ..
Mitglied: micneu
23.12.2009 um 15:32 Uhr
der gleiche code?... kann nicht sein oder ....

Bitte warten ..
Mitglied: firewall68
11.06.2010 um 11:50 Uhr
Mhm nicht schlecht kann man den auch den hostnamen in deinem script verwenden ?
Das Problem bei der IP = Ich habe DHCP im Einsatz, alle 8 Tage neue zuordnung ;0(

Kann es sein das die Rechner nicht herunterfahren ? wenn das script auf einem W2008R2 Server ausgeführt wird ?
Auch das Shutdown über die normale CMD am Server lässt den Client (XP) nicht herunterfahren.
Bitte warten ..
Mitglied: micneu
29.06.2010 um 11:20 Uhr
ich setze es auf einem win xp ein.
wichtig ist das der benutzername z. b. administrator auf allen kisten das gleiche pw hat.
Bitte warten ..
Neuester Wissensbeitrag
Internet

Unbemerkt - Telekom Netzumschaltung! - BNG - Broadband Network Gateway

(3)

Erfahrungsbericht von ashnod zum Thema Internet ...

Heiß diskutierte Inhalte
Switche und Hubs
Trunk für 2xCisco Switch. Wo liegt der Fehler? (17)

Frage von JayyyH zum Thema Switche und Hubs ...

Windows Server
Outlook Verbindungsversuch mit Exchange (15)

Frage von xbast1x zum Thema Windows Server ...

Microsoft Office
Keine Updates für Office 2016 (11)

Frage von Motte990 zum Thema Microsoft Office ...