本人不会asp，报错了，请大家帮忙看看。
代码如下：
<%
dim keyword_Name,keyword_YJ,keyword_RQ
if rs("QS_PASS_1_name")<>"0,0" then
keyword_Name=split(rs("QS_PASS_1_name"),",")
keyword_YJ=split("0{*}"&rs("QS_pass_1_Yj")&"{*}0","{*}")
keyword_RQ=split("0|"&rs("QS_pass_1_RQ")&"|0","|")
for i = 1 to ubound(keyword_Name)-1
%>
页面输出：
<%response.write(year(keyword_RQ(i))&"-"&month(keyword_RQ(i))&"-"&day(keyword_RQ(i))&" "&hour(keyword_RQ(i))&":"&Minute(keyword_RQ(i))&":"&second(keyword_RQ(i)))%>
数据库是access的，表中keyword_RQ这列的数据类型本来是文本类型的，程序运行没有任何错误，但因需要，keyword_RQ的字段改为了datetime时间类型，页面再次运行就报错：
错误信息如下：
Microsoft VBScript 运行时错误 '800a000d'
类型不匹配: 'keyword_RQ(...)'
\managers\user\User_QingShi.asp, line 1651
{{
我找了一个伪静态代码，如下：
index.asp
<!--#include file="config.asp"-->
<ol>
<%
Set rs=server.CreateObject("adodb.recordset") & ......
