全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1338
推到 Plurk!
推到 Facebook!

如何從 interbase,firebird 取得 server 日期

缺席
fadichen
初階會員


發表:29
回覆:68
積分:29
註冊:2003-09-11

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-11-06 03:46:55 IP:61.230.xxx.xxx 未訂閱
如何從 interbase,firebird 取得 server 日期 為何我用 select date() 不能取得 server 日期呢? sql 用 select getdate() 那 interbase 用什麼呢 ? ****阿彌陀佛*****
fadichen
初階會員


發表:29
回覆:68
積分:29
註冊:2003-09-11

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-11-06 20:25:31 IP:61.230.xxx.xxx 未訂閱
已經從站上找到答案了, 謝謝大家 InterBase 提供下列命令讓你取得目前的日期時間: CURRENT_DATE 傳回日期 CURRENT_TIME 傳回時間 CURRENT_TIMESTAMP 傳回日期時間 這裡提供兩種方法: Sol1.利用以下 SQL 命令取得現在時間: select distinct CURRENT_TIMESTAMP from "資料表名稱" "資料表名稱"請選擇筆數很少的資料表,執行速度會比較快。 Sol2.撰寫預儲程序: SET TERM !! ; create procedure "GET_CURRENT_TIMESTAMP" returns ("CUR_TIME" TIMESTAMP) as begin CUR_TIME = CURRENT_TIMESTAMP; end !! (以上命令請在 ISQL 中執行) 然後在 Delphi 程式中,可以使用 TIBStoredProc 元件,像這樣: procedure TForm1.Button1Click(Sender: TObject); var DbSvrTime: TDateTime; begin IBStoredProc1.StoredProcName := 'GET_CURRENT_TIMESTAMP'; IBStoredProc1.ExecProc; IBTransaction1.Commit; DbSvrTime := IBStoredProc1.Params[0].AsDateTime; ShowMessage('DB server 時間為 ' DateTimeToStr(DbSvrTime)); end; ****阿彌陀佛*****
huwk
資深會員


發表:26
回覆:340
積分:323
註冊:2002-04-03

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-11-06 20:37:18 IP:211.76.xxx.xxx 未訂閱
您好 select cast('NOW' as date) from XXX; PS。XXX請代換成你只有ONE ROW(或是一定有值)的SYSTEM TABLE,因為我剛好沒找那個TALBE一定是有值。
------
熊的學習 http://huwk.blogspot.com
huwk
資深會員


發表:26
回覆:340
積分:323
註冊:2002-04-03

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-11-06 20:41:43 IP:211.76.xxx.xxx 未訂閱
同時開了好幾個問題慢慢回答 按貼上時。發覺你已經找到答案了。 且更詳細~~ 而我的也留著讓大家見笑了。 <>< face="Verdana, Arial, Helvetica">引言: 已經從站上找到答案了, 謝謝大家 InterBase 提供下列命令讓你取得目前的日期時間: CURRENT_DATE 傳回日期 CURRENT_TIME 傳回時間 CURRENT_TIMESTAMP 傳回日期時間 這裡提供兩種方法: Sol1.利用以下 SQL 命令取得現在時間: select distinct CURRENT_TIMESTAMP from "資料表名稱" "資料表名稱"請選擇筆數很少的資料表,執行速度會比較快。 Sol2.撰寫預儲程序: SET TERM !! ; create procedure "GET_CURRENT_TIMESTAMP" returns ("CUR_TIME" TIMESTAMP) as begin CUR_TIME = CURRENT_TIMESTAMP; end !! (以上命令請在 ISQL 中執行) 然後在 Delphi 程式中,可以使用 TIBStoredProc 元件,像這樣: procedure TForm1.Button1Click(Sender: TObject); var DbSvrTime: TDateTime; begin IBStoredProc1.StoredProcName := 'GET_CURRENT_TIMESTAMP'; IBStoredProc1.ExecProc; IBTransaction1.Commit; DbSvrTime := IBStoredProc1.Params[0].AsDateTime; ShowMessage('DB server 時間為 ' DateTimeToStr(DbSvrTime)); end; ****阿彌陀佛*****
------
熊的學習 http://huwk.blogspot.com
系統時間:2024-06-26 23:57:56
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!