D
dql_77
Unregistered / Unconfirmed
GUEST, unregistred user!
各位老师,你们好,我用的是access数据库,数据库在服务器上,
因为服务器的日期和各个工作站日期有时会不一样,为了各个工作站提交的日期统一,
我在form上有edit1....edit10等控件,edit10是提交数据的日期,请问form上的edit10如何得到数据库(服务器)的日期字符串。
这段代码运行不下去
var
TimeVal:TdateTime;
begin
With ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('select current_timestamp');
Open;
timeval:=time.Fields[0].Value;
Edit10.text:=formatdatetime('yyyy/mm/dd',Timeval);
end;
end;
请问还有别的代码吗?谢谢!!!
因为服务器的日期和各个工作站日期有时会不一样,为了各个工作站提交的日期统一,
我在form上有edit1....edit10等控件,edit10是提交数据的日期,请问form上的edit10如何得到数据库(服务器)的日期字符串。
这段代码运行不下去
var
TimeVal:TdateTime;
begin
With ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('select current_timestamp');
Open;
timeval:=time.Fields[0].Value;
Edit10.text:=formatdatetime('yyyy/mm/dd',Timeval);
end;
end;
请问还有别的代码吗?谢谢!!!