关于ASP的一个简单问题?(20分)

  • 主题发起人 主题发起人 浪刀
  • 开始时间 开始时间

浪刀

Unregistered / Unconfirmed
GUEST, unregistred user!
如何将得到的系统日期格式转换为"YYYYMMDD"这样的格式,我知道Delphi有这样的函数,
可是VBScript...
 
帮帮忙,我挺急...不行我只有换方法了.
 
year(data())+month(Data())+day(data())
 
我以前做过,忘了。:)
回去找找。
VBSCRIPT可以做到的。
 
cstr(year(data()))&cstr(month(Data()))&cstr(day(data()))
 
to apartment:
我需要"YYYYMMDD"格式,而且不用改区域设置.
to 吴剑明
麻烦您了,请快一些,我着急.
 
用formatdatetime
 
用formatdatetime,大概是这样写吧!
 
formatdatetime不能自定义格式,大家帮帮我吧。
 
cstr(year(rq))+cstr(month(rq))+cstr(day(rq))
我就是这样用的!!!
 
to WTO:看一下“区域设置”,我需要如“20000721”这种格式,你只能得到“2000721”
还是我自己解决了,不过有些烦,贴出来吧,如果没有更简单的方法就放分了。
<%
function TransDate()
dim now_date
now_date=FormatDateTime(date,1)

dim now_year,now_month,now_day
now_year=CStr(Year(now_date))
now_month=CInt(Month(now_date))
now_day=CInt(Day(now_date))

if now_month<=9 then
now_month="0"&CStr(now_month)
else
now_month=CStr(now_month)
end if

if now_day<=9 then
now_day="0"&CStr(now_day)
else
now_day=CStr(now_day)
end if

TransDate=now_year&now_month&now_day

end function
%>
 
我...代码给注释掉了,再贴一遍
function TransDate()
dim now_date
now_date=FormatDateTime(date,1)

dim now_year,now_month,now_day
now_year=CStr(Year(now_date))
now_month=CInt(Month(now_date))
now_day=CInt(Day(now_date))

if now_month<=9 then
now_month="0"&CStr(now_month)
else
now_month=CStr(now_month)
end if

if now_day<=9 then
now_day="0"&CStr(now_day)
else
now_day=CStr(now_day)
end if

TransDate=now_year&now_month&now_day

end function
 
好像只能这样了吧
 
多人接受答案了。
 
后退
顶部