//////////////////////////////////////////////////////////////////////////////////////// // 函數：datetime gf_getserverdatetime() // 描述：獲取服務器的系統日期，出錯時採用客戶機系統時間。本函數支持MS SQL Server 版本。 // 範圍：public // 參數：無 // 返回：當前服務器的日期時間(YYYY-MM-DD HH:MM:SS) // 示例：gf_getserverdatetime() // 注：只適用於以sqlserver // 日誌： // 日期 修改人 修改內容 // --------- ----------- -------------------------------- // 2005/7/28 版本創建 ////////////////////////////////////////////////////////////////////////////////////////
DateTime ldt_datetime
select getdate() into :ldt_datetime FROM sysusers WHERE (uid = '1') ; if sqlca.sqlcode<0 then messagebox("錯誤信息","沒有獲取到服務器時間!將默認爲本機時間！",stopsign!) return datetime(today()) else return ldt_datetime end if;