主页
API 调用
基础类
控件与界面
数据库相关
DataWindow
项目管理
Web 应用
脚本语言

从editmask中取出日期时间

yanitan 2003-12-18 11:24:58

我把editmask的格式设置为“yyyy-mm-dd hh:mm”，想从edmask中取出日期时间，但是取出的日期时间不对。用的语句：
datetime ldt_start
date ld_date
time lt_time
ldt_start=datetime(em_start.text)//取出的ldt_start为：“0000-??-?? 00:00:00”

ld_date=date(em_start.text)
lt_time=time(em_start.text)
ldt_start=datetime(ld_date,lt_time)//取出的ldt_start为：“1900-1-1 00:00:00”
我想得到如“2003-12-18 10：20：00”或“2003-12-18 10：20”的结果

...全文

12 条回复

切换为时间正序

请发表友善的回复…

发表回复

wwwafa9 2003-12-18

你取出来用messagebox函数看一下是不是取到了。
我说的那个肯定可以。

回复赞

yanitan 2003-12-18

我是想从em_start中获得日期时间赋给ldt_start，ldt_start是要在后边的查询条件中用到的

回复赞

heizi99 2003-12-18

ldt_start=datetime(em_start.text)//ldt_start是date型，你给他赋值datetime型肯定不行啊

这样：
datetime ld_01

ld_01 = datetime(em_start.text)

回复赞

wwwafa9 2003-12-18

试一下下面这样，看行不行：

DateTime ldt_start
em_1.GetData(ldt_start)

回复赞

banalman 2003-12-18

另外可以用getdate();

回复赞

banalman 2003-12-18

date ldt_temp
string ls_temp
ls_temp=string(em_1.text,"@@@@-@@-@@")
ldt_temp=date(ls_temp)

回复赞

mittee 2003-12-18

DateTime ldt_start
em_1.GetData(ldt_start)
这个方法不错

回复赞

suzh1133 2003-12-18

ls_stime=mid(em_1.text,11,len(em_1.text))///////截取时分秒
写错了，应该是

ls_stime=mid(em_1.text,12,len(em_1.text) - 11)///////截取时分秒

回复赞

suzh1133 2003-12-18

搞定

datetime ldt_start
date ld_date
time lt_time

string ls_sdate
string ls_stime

em_1.text=string(sysdate)//////sysdate是datetime变量

ls_sdate=mid(em_1.text,1,10)//////截取年月日
ls_stime=mid(em_1.text,11,len(em_1.text))///////截取时分秒

ld_date=date(ls_sdate)/////转换
lt_time=time(ls_stime)
ldt_start=datetime(ld_date,lt_time)/////组合

messagebox("",string(ld_date)+" " +string(lt_time)+" " + string(ldt_start))

//显示正确

回复赞

liliang800207 2003-12-18

datetime ldt_start
string tm
tm＝em_start.text＋“:00”
date ld_date
time lt_time
ldt_start=datetime(tm)

ld_date=date(tm)
lt_time=time(tm)
ldt_start=datetime(ld_date,lt_time
这样应该可以把

回复赞