Programmieren - alles kontrollieren 4.935 Themen, 20.621 Beiträge

VBS in Bat umwandeln!

Mindage / 6 Antworten / Flachansicht Nickles

Kurze und vielleicht auch peinliche Frage, aber ich würde gerne eine VBS - Datei in eine Batch umwandeln, damit ich Sie im nachhinein ausführen kann. Umbenennen kann ich Sie ja nicht einfach, oder?


 


Danke für eine kurze Info.


 

bei Antwort benachrichtigen
Mindage Nachtrag zu: „VBS in Bat umwandeln!“
Optionen

Danke für die schnelle Antwort! Hier der Code: Im Endeffekt will ich eine Zeitsynchronisation mit einem Server "Bec1" anschubsen. Anschliessend will ich unseren Usern mittels einer Loginbatch das Skript mitgeben, damit automatisch beim Anmelden der Zeitabgleich stattfinden kann.

Vielen Dank schon einmal im Voraus.

Gruss,

Mindage


strServer = "bec1"
Set objWMI = GetObject("winmgmts:\\" & strServer & "\ROOT\CIMV2")
wql = "Select localdatetime from Win32_OperatingSystem"

Set colResult = objWMI.ExecQuery(wql,,48)

For Each objInstance In colResult
ldt = objInstance.LocalDateTime
Next

strServer = "."
Set objWMI = GetObject("winmgmts:{(SystemTime)}!\\" & strServer & "\ROOT\CIMV2")
wql = "Select * from Win32_OperatingSystem"

Set colResult = objWMI.ExecQuery(wql,,48)

For Each objInstance In colResult
rv = objInstance.setdatetime(ldt)


Next

bei Antwort benachrichtigen