缺少对象: 'rs'

来源:百度知道 编辑:UC知道 时间:2024/05/12 12:48:50
<!--#include file="incs/disdbconn.asp"-->
<%
backweb=request.servervariables("http_referer")
whos=request.form("whos")
whos=trim(whos)
username=request.form("username")
password=request("password")
if username="" or password="" then
response.write "<script language=javascript>alert('请填写用户名和密码!');"
response.write "window.history.go(-1);</script>"
response.end
end if

if username<>"" and password<>"" then
if whos="会员" then
sql="select * from info_mem where uname='"&username&"'"
rs.open sql,conn,1,3
if rs.bof or rs.eof then
response.write"<SCRIPT language=JavaScript>alert('没有该用户,请重新输入!');"

在第一个rs之前加一句
set rs=server.createobject("ADODB.RecordSet")

if username<>"" and password<>"" then
if whos="会员" then
sql="select * from info_mem where uname='"&username&"'"
在后边加上
set rs=server.createobject("ADODB.RecordSet")
就可以了
呵呵