误类型：Microsoft VBScript 运行时错误 (0x800A01A8)缺少对象: ''/DISPLAY.ASP, 第 27 行

来源：百度知道 编辑：UC知道 时间：2024/05/05 08:43:58
<HTML>
<HEAD>
<%
if isempty(session("id")) then
Response.Redirect "login.asp"
end if%>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE>留言本</TITLE>
<%
const MaxPerPage=4'分页显示的纪录个数
dim sql
dim rs
dim gstBookID
dim totalPut
dim CurrentPage
dim TotalPages
dim i,j
%>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"></HEAD>
<BODY bgcolor="#BDDFFF" link="#FF0000">
<p align=left><font size=+5>留言本</font>
<%
Set conn = Server.CreateObject("ADODB.Connection")
connString = "Provider=SQLOLEDB;Data Source=(local);User ID=sa;Password=sa;database=tec;"
conn.Open connString
sql="select * from mytable where towho='管理员' or user='管理员&

应该是缺少inc文件
上网上找一个adovbs.inc的文件
放在文头部第二行，引用
引用方法
<!-- #include flie="adovbs.inc"-->

第27行是rs.open sql,conn,1,1
可是我看你的代码里没有关于rs的定义
应该加上
set rs=server.CreateObject("adodb.recordset")

希望我的回答对你有帮助。。正解？