Question

asp 将8位字符串转换为date格式

如何将8位字符串转为日期格式？
riqi='20120216' (注意2月的前面还有个0)

转换为日期格式时
a=CDate(#02/16/2012#) 这样子可以

a=CDate(#mid(riqi,5,2)/mid(riqi,7,2)/mid(riqi,1,4)#) 就不行了

只不过用了一个变量，报语法出错。我搞不懂。请高手帮我看看。

Answer 1

在中文的环境下只需要把字符串变形一下
<script language="VBScript">
a="20120216"
a=Mid(a,1,4)&"-"&Mid(a,5,2)&"-"&Mid(a,7,2)
document.write(CDate(a))
</script>
2012-2-16
输出已经是date类型的日期

题外，推荐用jscript写asp，这样服务端/浏览器都用一样语言

追问

我的目的是将a="20120216"转换为date类型后，减去一天，而不是为了输出为2012-2-16

追答

你怎么不先把目的写出来了告诉别人呢，知道意图才能代你写出代码，表达不清。何况你的表达比基础能力还强一点。

a="20120216"
a=Mid(a,1,4)&"-"&Mid(a,5,2)&"-"&Mid(a,7,2)
document.write(DateAdd("d", -1, a)) '显示2-15 减了1天

2012-2-15

追问

ok了，十分感谢，谢谢，谢谢。

Answer 2

a=CDate(#02/16/2012#) 这样子可以
a=CDate(#mid(riqi,5,2)/mid(riqi,7,2)/mid(riqi,1,4)#) 就不行了

应该是这样的：
a=CDate(#mid(riqi,5,2)&"/"&mid(riqi,7,2)&"/"&mid(riqi,1,4)#)

追问

a=CDate(#mid(riqi,5,2)&"/"&mid(riqi,7,2)&"/"&mid(riqi,1,4)#) 也不行哦

Answer 3

Mid 完了是字符，你在每个外面加一个CInt 变成数字看看

追问

加了cint也不可以。