5. März 2007 15:24
SHELL('net time ' + GrSetup2."GE/Path Server Time" + ' /set /yes');
5. März 2007 15:49
LtOSVersion := OSVERSION;
CASE LtOSVersion OF
'Windows_NT_5.0':
BEGIN
LtRoot := 'c:\WINNT\system32';
END;
'Windows_NT_5.1':
BEGIN
LtRoot := 'c:\WINDOWS\system32';
END;
'Windows_NT_5.2':
BEGIN
LtRoot := 'c:\WINDOWS\system32';
END;
END;
LtCommand := LtRoot + '\net.exe';
SHELL(LtCommand,'time',FORMAT(GrEinrichtung2."GE/Path Servertime" + ' /set /yes'));
5. März 2007 15:55
5. März 2007 16:01
5. März 2007 16:28
5. März 2007 16:34
{Variables:
WSH_Shell Automation 'Windows Script Host Object Model'.WshShell
Command Text100
ExitCode Integer
WindowStyle Variant
WaitOnReturn Variant}
Command := 'net time ' + GrSetup2."GE/Path Server Time" + ' /set /yes'
WindowStyle := 0; // hidden
WaitOnReturn := TRUE; // modal run, receive ExitCode
IF ISCLEAR(WSH_Shell) THEN
CREATE(WSH_Shell);
ExitCode := WSH_Shell.Run(Command, WindowStyle, WaitOnReturn);
MESSAGE('%1', ExitCode); // 0 = OK; 1 := Error
5. März 2007 16:42
5. März 2007 16:56
NET TIME
[\\computername | /DOMAIN[:domainname] | /RTSDOMAIN[:domainname]] [/SET]
[\\computername] /QUERYSNTP
[\\computername] /SETSNTP[:ntp server list]
5. März 2007 17:25
5. März 2007 17:44
Versuchs mal so hinzuschreiben:mia187 hat geschrieben:Das BS findet den Pfad nicht, den Sie für die Datei "net time \\server /set /yes" eingegeben haben. Prüfen Sie blabla
Da es sich um keinen eigentlichen Dateipfad handelt sehe ich kein Problem, oder?
net time "\\server" /set /yes
5. März 2007 18:03
5. März 2007 18:53
6. März 2007 09:38