asp如何将文字竖排显示

姓名和时间全都竖排,如果只让姓名竖排,则将dt变量追加到输出的strDes而不是原始的strData上即可
<%
tp=month(date)
if tp<10 then
dt="0" & cstr(tp) & "-"
else
dt=cstr(tp) & "-"
end if
tp=day(date)
if tp<10 then
dt=dt & "0" & cstr(tp)
else
dt=dt & cstr(tp)
end if

strData="张三" & dt
strDes=""
for ltp=1 to len(strData)
if ltp <> len(strData)
strDes=strDes & mid(strData,ltp,1) & "<br>"
else
strDes=strDes & mid(strData,ltp,1)
end if

next

response.write strDes
%>