路过的朋友帮忙看看这个错误啊!顶者有分!
<!--#include file= "conn.asp "-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN "
"http://www.w3.org/TR/html4/loose.dtd ">
<html>
<head>
<meta http-equiv= "Content-Type " content= "text/html; charset=gb2312 ">
<title> 我的帖子 </title>
</head>
<body>
<%
CurrentID=request.QueryString( "id ")
//CurrentID不为空值!
If CurrentID <> " " then
'mysql= "SELECT * FROM ClassTree where ID= ' "&CurrentID& " ' "
'set rs=objConn.execute(mysql)//使用上一句和这句,这里会报错!
Set RS=objConn.Execute( "SELECT * FROM ClassTree where ID= "&CurrentID& " ")//用这样的方法也报错!
CurrURLFileName=RS(5)
response.Redirect(CurrURLFileName)
RS.close
Else
response.Write( "CurrentID为空值! ")
End If
%>
</body>
</html>
--------------------------
以上两种方法都报同样的错:
Microsoft VBScript 编译器错误 错误 '800a03f6 '
缺少 'End '
/iisHelp/common/500-100.asp,行242
Microsoft VBScript 运行时错误 错误 '800a01a8 '
缺少对象: ' '
/lfyz/product.asp,行17
------解决方案--------------------Set RS=objConn.Execute( "SELECT * FROM ClassTree where ID= "&CurrentID)
------解决方案--------------------objConn.Execute( "SELECT * FROM ClassTree where ID= "&CurrentID& " ")
这个是一个数据集,而非 Server.RecordSet对象。
try
Set rs = Server.CreateObject( "Adodb.RecordSet ")
rs.open "SELECT * FROM ClassTree where ID= "&CurrentID,objConn,1,3
------解决方案--------------------前面的“缺少‘end’”的错误,你把最后的一句“end if ”的if去掉就ok 了
至于你的product.asp错误,看看是不是没有给类似rs和conn对象定义或者是就没有
包含conn.asp(数据库连接文件)
------解决方案--------------------检查一样conn.asp
是不是 objConn 变量名写错了?
------解决方案--------------------objConn在哪?
------解决方案--------------------objConn
------解决方案--------------------CurrentID=request.QueryString( "id ")
改成
CurrentID=trim(request.QueryString( "id "))
试下
------解决方案--------------------objConn.Execute( "SELECT * FROM ClassTree where ID= "&CurrentID& " ")
是命令不是对象呀
------解决方案--------------------先显示出那个sql语句,看看是不是sql语句的问题
------解决方案--------------------楼主的问题很奇怪。楼主可以把if语句先去掉,就是先保证每次传过来的值都是不为空的。看有什么提示
------解决方案--------------------路过帮顶
------解决方案--------------------把整个页面代码贴出来,或许是前面的代码少了什么?
------解决方案--------------------