怎样对时间进行规范处理啊?急死了>0<(没有分了,大家可怜可怜……)
我用了一个a=date()&" "&time()
本机上显示a为'2002-1-14 16:14:29'
放到服务器上成了'02-1-14 下午 03:59:05'
为了得到'2002-1-14 16:14:29'这种格式的数据我对a做了个处理
结果一点效果也没有,疯了。
我的代码如下:
function systemdatetime(x) '时间规范
if instr(1,x,"年")=3 then
x="20"&x
end if
x=replace (x,"年","-")
x=replace (x,"月","-")
x=replace (x,"日","")
x=replace (x,"上午","")
if instr (1,x,"下午")<>0 then
x=replace (x,"下午","")
x=cdate(x)+0.5
end if
x=replace (x,"小时",":")
x=replace (x,"分钟",":")
x=replace (x,"秒","")
systemdatetime=x
end function
b=date()
sysdate=formatdatetime (cdate(b),1)
c=time()
systime=formatdatetime (cdate(c),3)
a=sysdate&" "&systime
a=systemdatetime(a)