UC知道ASP的这样错误谁见过？帮助小弟解决下好吗？
来源：百度知道 编辑：UC知道 时间：2024/07/02 04:50:54
部分程序代码为：
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/char.asp"-->
<%
dim rs,sql,coursename,property,teacher,browsenums,teacher_intro,book,province,city,address,begintime,money,cert,linkman,signaddress,tel,email,introduce,user_id,id,usertype
id=request("id")
conn.execute("update train set browsenums=browsenums+1 where id='"&id&"'")
set rs=server.CreateObject("adodb.recordset")
sql="select coursename,property,teacher,teacher_intro,book,browsenums,province,city,address,begintime,money,cert,linkman,signaddress,tel,email,introduce,user_id,usertype from train where id='"&request("id")&"'"
'set rs=conn.execute("select coursename,property,teacher,teacher_intro,book,city,address,begintime,money,cert,linkman,tel,email,introduce from train where id='"&request("id")&"'
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/char.asp"-->
<%
dim rs,sql,coursename,property,teacher,browsenums,teacher_intro,book,province,city,address,begintime,money,cert,linkman,signaddress,tel,email,introduce,user_id,id,usertype
id=request("id")
conn.execute("update train set browsenums=browsenums+1 where id='"&id&"'")
set rs=server.CreateObject("adodb.recordset")
sql="select coursename,property,teacher,teacher_intro,book,browsenums,province,city,address,begintime,money,cert,linkman,signaddress,tel,email,introduce,user_id,usertype from train where id='"&request("id")&"'"
'set rs=conn.execute("select coursename,property,teacher,teacher_intro,book,city,address,begintime,money,cert,linkman,tel,email,introduce from train where id='"&request("id")&"'
第42行是这个linkman=rs("linkman") ?
估计可能也许,你linkman没有定义,有时会出错.改成
dim linkman,tel,email
linkman=rs("linkman")
tel=rs("tel")
email=rs("email")
如果还不行,就是字段名写错了.
查一下数据库里是不是有linkman,tel,email
最新发现了一个,你看是不是这个:
if usertype=6 then
set rs=conn.execute("select linkman,tel,email from reg_center")
linkman=rs("linkman")
tel=rs("tel")
email=rs("email")
rs.close '这一行多余,因为上面没有将rs赋为对象,只是conn.execute,所以不用rs.close
set rs=nothing
end if
改成:
if usertype=6 then
set rs=conn.execute("select linkman,tel,email from reg_center")
linkman=rs("linkman")
tel=rs("tel")
email=rs("email")
set rs=nothing
end if
错误在这一个地方
rs.close
set rs=nothing
if usertype=6 then
set rs=conn.execute("select linkman,tel,email from reg