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

Windows 2k Client mit Scheduled Task herunterfahren

Frage Entwicklung VB for Applications

Mitglied: deeluxx

deeluxx (Level 1) - Jetzt verbinden

17.03.2010 um 11:00 Uhr, 3034 Aufrufe, 1 Kommentar

Folgende Problemstellung:
Ich will ein Windows 2k Client per VBScript und Scheduled Task zu einem bestimmten Zeitpunkt täglich herunterfahren.
Ist jedoch ein User am Client angemeldet (per RDP), darf der Computer nicht heruntergefahren werden.

Könnt ihr mir helfen wo der Fehler in diesem Script liegt?

01.
On Error resume next 
02.
 
03.
strComputer = "." 
04.
 
05.
'get username 
06.
Set objWMIService = GetObject("winmgmts:" _ 
07.
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") 
08.
 
09.
Set colComputer = objWMIService.ExecQuery _ 
10.
("Select * from Win32_ComputerSystem") 
11.
 
12.
For Each objComputer in colComputer 
13.
user = objComputer.UserName 
14.
Next 
15.
 
16.
'if user is null then try to shutdown computer 
17.
 
18.
If isnull(user) Then 
19.
 
20.
Set objWMIService = GetObject _ 
21.
("winmgmts:{impersonationLevel=impersonate,(Shutdown)}\\" & _ 
22.
strComputer & "\root\cimv2") 
23.
 
24.
Set colOperatingSystems = objWMIService.ExecQuery _ 
25.
("Select * from Win32_OperatingSystem") 
26.
 
27.
For Each objOperatingSystem in colOperatingSystems 
28.
objOperatingSystem.Win32Shutdown(8) 
29.
Next 
30.
 
31.
Else 
32.
 
33.
Wscript.Quit 
34.
 
35.
End If 
36.
 
37.
Wscript.Quit
Mitglied: b-netix
17.03.2010 um 21:42 Uhr
Hallo deeluxx,

in Zeile 13 schreibst weist du der Variablen "user" den Wert des Objects zu.

Welchen Wert hat diese Variable vorher?

Wenn du dies auswertest wie in Zeile 18 könntest du Probleme bekommen. Ich kenn das aus anderen Sprachen wie C oder C#, in der Variablen die nicht mit Werten belegt sind u.U. irgeetwas enthalten.
Versuch mal user einen Wert vor dem auslesen des UserName sprich vor Zeile 13 zu geben.

Gruß b-netix

PS: Lass mich wissen wo das scipt bei dir nicht die erwartete Wirkung zeigt.
Bitte warten ..
Ähnliche Inhalte
Firewall
Sophos - L2TP over IPsec - Windows 10 Client

Frage von fluluk zum Thema Firewall ...

Windows 7
Windows 7 Client zieht sich keine MSI Pakete (6)

Frage von Ghost108 zum Thema Windows 7 ...

Windows Server
Anmeldung an neuen Windows Domäne Client nicht möglich (16)

Frage von FlorianN zum Thema Windows Server ...

Firewall
Kaspersky sperrt Programm auf Windows 7 client (3)

Frage von mike7050 zum Thema Firewall ...

Neue Wissensbeiträge
Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(2)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Windows 10

Das Windows 10 Creators Update ist auf dem Weg

(5)

Anleitung von BassFishFox zum Thema Windows 10 ...

Administrator.de Feedback

Tipp: Ungelöste Fragen ohne Antwort in Tickeransicht farblich hinterlegen

Tipp von pattern zum Thema Administrator.de Feedback ...

Viren und Trojaner

Neue Magazin Ausgabe: Malware und Angriffe abwehren

Information von Frank zum Thema Viren und Trojaner ...

Heiß diskutierte Inhalte
Windows Systemdateien
Warum System auf "C:" (29)

Frage von DzumoPRO zum Thema Windows Systemdateien ...

Windows Server
gelöst Update BackupExec 2015 auf 2016 führt zu SQL-Server Problem (16)

Frage von montylein1981 zum Thema Windows Server ...

Cloud-Dienste
gelöst Bitcoins minen über Nacht? (16)

Frage von 1410640014 zum Thema Cloud-Dienste ...

LAN, WAN, Wireless
Cisco SG200: Auf bestimmtem vLAN bestimmte TCP-Ports sperren (16)

Frage von SarekHL zum Thema LAN, WAN, Wireless ...