如题，自己参考别人答案，但是只能正确显示月份，日子无法正确显示；也就是只能显示01-1，我需要的是01-01。
<p><a href="view.asp?id=<%=rs("newsid")%>" target="_blank" title="<%=rs("news_name")%>"><%
dt=rs("news_time")
if month(dt)>9 then
response.write right(dt,5)
else
response.write "0" & right(dt,4)
end if
%> <%=rs("news_name")%></a></p>
希望高手能给与指点，可以在源代码上作调整；或者直接提供新的代码，谢谢。
<%
dt=rs("news_time")
if month(dt)>9 then
'里面再加个日期的判断
response.write year(dt) & "-" & month(dt) & "-" & day(dt)
else
'里面再加个日期的判断
response.write year(dt) & "-0" & month(dt) & "-" & day(dt)
end if
%>&
可直接使用SQL语句转换：
Select CONVERT(varchar(100), GETDATE(), 112)
获得格式如下： 20060516
使用自定义函数 从数据库的日期字段直接读取 进行自定义转化
下面这个是 我弄的个函数
'************************************* '函数名：FormatTime '作 用：转化时间 '参 数：stime ---- 时间 ' nflag ---- 转化方式 '返回值：转化后时间 '调 用：FormatTime(now(), 1) '************************************* function FormatTime(stime, nflag) Dim y, m, d, h, mi, s FormatTime = "" if IsDate(stime) = False then Exit Function y = cstr(year(stime)) m = cstr(month(stime)) d = cstr(day(stime)) h = cstr(hour(stime)) mi = cstr(minute(stime)) s = cstr(second(stime)) if len(m) = 1 then m = "0" & m if len(d) = 1 then d = "0" & d if len(h) = 1 then h = "0" & h if len(mi) = 1 then mi = "0" & mi if len(s) = 1 then s = "0" & s select Case nflag Case 1 '格式2009-11-12 11:01:20 FormatTime = y & "-" & m & "-" & d & " " & h & ":" & mi & ":" & s Case 2 '格式2009-11-12 11:01 FormatTime = y & "-" & m & "-" & d & " " & h & ":" & mi Case 3 '格式2009-11-12 FormatTime = y & "-" & m & "-" & d Case 4 '格式11-12 FormatTime = m & "-" & d Case 5 '格式11月12日 FormatTime = m & "月" & d & "日" Case 6 '格式2009年11月12日 FormatTime = y & "年" & m & "月" & d & "日" Case 7 '格式2009
response.write "["&Right("0"&month(rs("time")),2)&"-"&right("0"&day(rs("time")),2)&"]"