Microsoft VBScript 运行时错误 '800a0005'无效

把相关的代码放上来 出现类型不匹配: 'SQL'肯定是记录集为空的情况 VB不区分大小写 下面再用sql数组访问肯定出错 If Not RS.Eof then SQL=Rs.GetRows(-1)end if <第437行,是这个> 把 End If 放到遍历完数组之后

rs("p1")的值是否符合标准,而且值是否有超出范围,最好检查一下.

If Strings(6)="1" or Strings(5)="1" Then Temp="<div style='margin:15px 0 0 0'>特殊论坛，发帖信息保密！</div>"Else Temp=ReadSkins("最后发帖信息")Temp= Replace(Temp,"{用户名称}",Boardupdate(3))If UBound(Boardupdate)>=5 Then Temp= Replace(Temp,"{回复时间}",Board...

Set Conn = Server.CreateObject("ADODB.Connection")Conn.Open "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath("userinfo.mdb")

可以看到，里面并没有分号（;），所以如果按分号进行分割（Agent=Split(Agent,";")），由于Agent(1)并不存在，因此执行到 If InStr(Agent(1),"MSIE")>0 Then 时就会报“下标越界”的错误了！最后再附上最新版的FireFox的特征字串：Mozilla/5.0 (Windows NT 5.1; rv:24.0) Gecko/20100101 ...

这个错误是没法解决的，只有换虚拟主机。（用虚拟主机前应详细了解它的功能）第二个错误可能是这样的 TempFieldContent = Rs(m) 是取数据库中的某个值，这个值是字符串型的，所以有了 【Set TempMatches = regEx.Execute(TempFieldContent)】但当数据库中所需要的这个值是空时，TempFieldContent就...

id=Split(Request.QueryString,".")(0)中的Request.QueryString语法也错误，也就是没有值，无法分割！所以越界了

将Clng换成Val试试 Clng的参数不是数字型字符串就会出错，而Val会处理为遇到非数字字符为止的数值

你是不是把规则给写错了。asp动态可以用VBScipt编写。它支持内部函数的调用。别和java混了。。。