if strtotime('06:01:01')=strtotime(timetostr(time)) then--//呼叫
begin
timer1.enabled:=false;
verifystandardtime;//校驗標準時間
timer1.enabled:=true;
end;
procedure tmyservice.verifystandardtime;//校驗標準時間過程
varidsntp1:tidsntp; //校時器
systemtime:tsystemtime;//系統時間
begin
idsntp1:=tidsntp.create(nil);
tryidsntp1.host:='time.nist.gov';
idsntp1.port:=123;
idsntp1.active:=true;
if idsntp1.synctime then
begin
datetimetosystemtime(idsntp1.datetime,systemtime);//時間轉換
setlocaltime(systemtime);
writelog('<--校時成功--> '+datetimetostr(now));
end;
finally
idsntp1.active:=false;
idsntp1.free;
end;
end;
VFP實現網路校時
vfp實現網路校時 客戶機與校時伺服器日期相同時可以校對時間，日期有差異時校時會失敗 strtofile net time setsntp 210.72.145.44 chr 13 chr 10 net stop w32time chr 13 chr 10 net start w32time chr...
網路校時（非NTP）
windows一用就是幾年，總會碰到個更改系統時間的時候。可是把系統時間調壞了容易，要調出個正確可就沒那麼簡單了。幾年前 還上大學的時候，大概是大三吧 用c 寫過乙個ntp的程式，但是時過境遷，ntp的ip更改實在太頻繁了 難道是因為沒有商業利潤？windows的 internet 時間 我從來就沒...
北斗校時器（北斗衛星校時器 北斗衛星同步時鐘）
北斗校時器 北斗衛星校時器 北斗衛星同步時鐘 北斗校時器 北斗衛星校時器 北斗衛星同步時鐘 技術諮詢 岳峰 15901092122 yf cs 163.com q 522508213 北斗衛星校時器是針對計算機 自動化裝置等進行校時而研發的高科技產品，北斗衛星校時器從北斗衛星上獲取標準的時間訊號，將...