英特尔®游戏设计大赛100美元现金周周送	专题改版：Java Web 专题

在pb中如何獲得它所連接的服務器上的時間

楼主moqijun（百分比）2003-12-03 21:52:27 在 PowerBuilder / Pb脚本语言提问

在pb中如何獲得它所連接的服務器上的時間? 问题点数：20、回复次数：13Top

1 楼GoldProgramer（）回复于 2003-12-03 22:05:41 得分 0

根据数据库的不同而不同。

例如：在ORACLE中.

SELECT TO_CHAR
(SYSDATE, 'MM-DD-YYYY HH24:MI:SS')INTO :LT_NOW
FROM DUAL;

欢迎使用<<PB扩展组件1.00>>
http://www.csdn.net/cnshare/soft/19/19457.shtm
Top

2 楼alanlinglin（静默+蝶之恋--(行水流云)）回复于 2003-12-03 22:42:08 得分 10

//做一个函数

date ld_date
time ld_time
DateTime ldt_date
systemtime lstr_stru //时间结构（argument 参照下面）

Select sysdate Into :ldt_date From dual;
If SQLCA.sqlcode<>0 Then
ldt_date=DateTime(Today(),Now())
End If

ld_date = date(ldt_date)
ld_time = time(ldt_date)

lstr_stru.wHour = Hour(ld_time)
lstr_stru.wMinute = Minute(ld_time)
lstr_stru.wSecond = Second(ld_time)

If lstr_stru.wHour - 8 < 0 Then
ld_date = RelativeDate(ld_date, -1)
lstr_stru.wHour = 24 - abs(lstr_stru.wHour - 8)
Else
lstr_stru.wHour -= 8
End If

lstr_stru.wYear = year(ld_date)
lstr_stru.wMonth = month(ld_date)
lstr_stru.wDay = day(ld_date)
lstr_stru.wDayOfWeek = dayNumber(ld_date)

lstr_stru.wMillisecond = 1

SetLocalTime(lstr_stru) //api 函数得声明

Top

3 楼njjianguogu（大海蓝蓝）回复于 2003-12-04 08:48:08 得分 0

datetime dt_server
str_systime lstr_tmp
select getdate() into :dt_server from sysfiles1;
messagebox('',string(dt_server,'yyyy-mm-dd'))
lstr_tmp.year=year(date(dt_server))
lstr_tmp.month=month(date(dt_server))
// lstr_tmp.week=daynumber(date(dt_server)) - 1
lstr_tmp.day=day(date(dt_server))
lstr_tmp.hour=hour(time(dt_server))
lstr_tmp.minute=minute(time(dt_server))
lstr_tmp.second=second(time(dt_server))
SetLocalTime(lstr_tmp)Top

4 楼njjianguogu（大海蓝蓝）回复于 2003-12-04 08:53:03 得分 0

FUNCTION ulong SetLocalTime(any lpSystemTime) LIBRARY "kernel32.dll"Top

5 楼mittee（最后一条大白鲨[无限深情凝视花花版]）回复于 2003-12-04 12:52:22 得分 0

datetime ldt_today

select getdate() into :ldt_today from sysobjects;Top

6 楼CQP（悄悄的我走了,正如我悄悄的来）回复于 2003-12-09 09:25:30 得分 0

sqlserver:
select getdate();
oracle:
select sysdate from dual;Top

7 楼chenqinzeng（长风大侠）回复于 2003-12-10 20:55:23 得分 0

select getdate();
Top

8 楼sinkiangscorpio（诸葛军师）回复于 2003-12-11 20:49:48 得分 0

来晚了Top

9 楼cxwsoftware（方宇）回复于 2003-12-20 12:56:20 得分 0

支持
!Top

10 楼sky2311（菜得不能再菜了!）回复于 2003-12-20 16:42:12 得分 0

SELECT GETDATE()
FORM 服务器上的任意一个表！Top

11 楼wqzone（wqzone）回复于 2003-12-20 18:08:17 得分 0

SELECT GETDATE()
FORM 服务器上的任意一个表！
就行了,很容易Top

12 楼yanitan（yanitan）回复于 2003-12-22 15:02:22 得分 0

最好用动态游标，如果只是简单的用:
select getdate() into :ldt_date from sysobjects；
容易出现错误。Top

13 楼Hanson_bati_zhu（欺世盗名之徒）回复于 2003-12-22 15:46:02 得分 10

不用动态游标
改成
select top 1 getdate() into :ldt_date from sysobjects；
就OK了
Top