IT rekvalifikace s garancí práce. Seniorní programátoři vydělávají až 160 000 Kč/měsíc a rekvalifikace je prvním krokem. Zjisti, jak na to!
Hledáme nové posily do ITnetwork týmu. Podívej se na volné pozice a přidej se do nejagilnější firmy na trhu - Více informací.
Avatar
Oreza
Člen
Avatar
Oreza:31.5.2015 11:13

Ahoj, potřeboval bych poradit, pokud je to pomocí VBS možné, jakým způsobem změnit systémové datum na PC pomocí VBS. Žatím se mi nikde neodařilo najít řešení. Předem díky za odpovědi.

 
Odpovědět
31.5.2015 11:13
Avatar
Oreza
Člen
Avatar
Odpovídá na Oreza
Oreza:1.6.2015 8:45

Vyřešeno, řešení přikládám spíše pro inspiraci:

'VB Script Document
option explicit

'Promenne
Dim Shell, CMD, SQLMonitor
Dim OldDate, NewDate, Datum

OldDate = date() 'Ulozi puvodni datum
NewDate = #01/05/05# 'Nastavi nove datum

'Nastavi nove systemove datum na 05.01.2005
Set Shell = WScript.Create­Object ("Wscript.Shell")
Datum = Shell.Run ("CMD.EXE /c date " & NewDate, 1, True)

'Nastavi datum na puvodni aktualni napr. 01.06.2015
Set Shell = WScript.Create­Object ("Wscript.Shell")
Datum = Shell.Run ("CMD.EXE /c date " & OldDate, 1, True)

Akceptované řešení
+5 Zkušeností
Řešení problému
 
Nahoru Odpovědět
1.6.2015 8:45
Děláme co je v našich silách, aby byly zdejší diskuze co nejkvalitnější. Proto do nich také mohou přispívat pouze registrovaní členové. Pro zapojení do diskuze se přihlas. Pokud ještě nemáš účet, zaregistruj se, je to zdarma.

Zobrazeno 2 zpráv z 2.