Microsoft VBScript 编译器错误 错误 \'800a03f6\'

rs.close'如果你前面曾经打开过rs就要这句，否则删除即可 if request("id")<>"" then sql= "select * from product where id="&request("id")else sql= "select * from product where p_lb="&lb&" order by p_sort "end if rs.open sql,conn,1,1 if rs.recordcount>0 then ><a ...

67 800A0043 文件太多 68 800A0044 设备不可用 70 800A0046 权限禁用 71 800A0047 磁盘未准备好 74 800A004A 不能用不同的驱动器重新命名 75 800A004B 路径/文件访问错误 76 800A004C 路径未找到 91 800A005B 未设置对象变量 92 800A005C For 循环未初始化 94 800A005E 非法使用 Null 322 800A...

MicrosoftVBscript编译器错误(0x800A03F6)-->if语句出错(缺少endif)MicrosoftVBscript运行时错误(0x800A005B)-->缺少set MicrosoftVBscript运行时错误(0x800A0005)-->变量未定义 MicrosoftVBscript编译器错误(0x800A03F9)-->if语句缺少then MicrosoftVBscript编译器错误(0x800A0411)-->dim语句定义错误 Mic...

在使用Microsoft VBScript进行编程时，可能会遇到各种编译器错误。其中一个常见的错误是“错误 '800a03f6'”，提示缺少 'End'。这通常意味着在代码中存在语法错误，可能是由于遗漏了某个控制结构的结束标记，如 'End If'、'End For' 等。在给出的错误信息中，问题出现在 '/iisHelp/common/' 文件的...

set objfso= server.CreateObject("scripting.filesystemobject")您的服务器不支持FSO，请与空间商联系。

两个原因:1. 你的SQL Server服务器是否启动.2. 你的程序中SQL Server 登陆信息是否正确,机器名,用户名,密码等.

dd

问题分析：<%End Sub%>这句没有错，在你整个SUB中，出现缺少END结束语的情况，比如你用了If语句而没有使用End If结束，导致在过程无法正常结束。你检查一下之前的代码，看看是否有缺少End结束语句，祝你成功！

strSql ="Delete From wzbg where hm='" & Request("no") & "' "你检查下这句话，可以改为 strSql ="Delete From wzbg where hm=' & Request("no") & ' "因为hm不是字符串的 是数字的

"else if " 错了 应该是elseif 在中间不要空格.你用了两else if 改过来就好了.