教您如何實現同步SQL Server日期時間
作者:佚名
下文為您介紹的是如何實現同步SQL Server日期時間的方法,供您參考學習,如果您在這方面遇到過類似的問題,不妨一看。
SQL Server日期是很重要的,在我們使用SQL Server數據庫的過程中,有時候會需要SQL Server服務器時間和本地系統時間保持同步,下面就為您介紹這種實現同步SQL Server日期時間的方法。
- //同步SQL_Server服務器時間日期的過程
- procedure TDM.SynchronizationSQLServerDateTime();
- var
- TheServerDateTime:TDateTime;//定義服務器時間
- TheLocalDateTime:_SystemTime;//定義本地系統時間 引用 windows
- Year,Month,Day:Word;//定義年月日
- Hour,Min,Sec,MSec:Word;//定義時分秒毫秒
- begin
- with CommonQuery do begin
- SQL.Clear;
- SQL.Add('select GetDate() as 服務器時間');
- Open;
- TheServerDateTime := FieldByName('服務器時間').AsDateTime;
- end;
- DecodeDate(TheServerDateTime,Year,Month,Day);//分解服務器年月日
- DecodeTime(TheServerDateTime,Hour,Min,Sec,MSec);//分解服務器時間
- //-------設定本地系統時間
- TheLocalDateTime.wYear:=Year;
- TheLocalDateTime.wMonth:=Month;
- TheLocalDateTime.wDay:=Day;
- TheLocalDateTime.wHour:=Hour;
- TheLocalDateTime.wMinute:=Min;
- TheLocalDateTime.wMilliseconds:=MSec;
- SetlocalTime(TheLocalDateTime);//更改本地系統時間
- end;
以上就是實現同步SQL Server日期時間的方法。
【編輯推薦】
責任編輯:段燃
來源:
互聯網