请各们大侠们帮个忙吧,多谢!(关于 asp的一人问题) ( 积分: 100 )

  • 主题发起人 主题发起人 wsl187
  • 开始时间 开始时间
W

wsl187

Unregistered / Unconfirmed
GUEST, unregistred user!
我在执行下列语句时:出现了
[red]“错误类型:
Microsoft VBScript 运行时错误 (0x800A01B6)
对象不支持此属性或方法: 'EOF'[/red]
请问这是什么问题?小弟感激不尽!!!!!!!!!1
代码如下:
<%
dim Conn,sql,rs
set Conn=server.createobject("adodb.connection")
Conn.connectionstring="driver={SQL Server};server=wsl;UID=sa;PWD=wsl;Database=fashion"
Conn.Open
set rs=server.CreateObject("adodb.recordset")
sql="select * from fashionnews order by addtime desc"
rs=conn.execute(sql)
%>
<table>
<%
do
while not rs.EOF
response.Write"<tr><td>"&rs("title")&"</td></tr>"
rs.movenext
loop
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
 
我在执行下列语句时:出现了
[red]“错误类型:
Microsoft VBScript 运行时错误 (0x800A01B6)
对象不支持此属性或方法: 'EOF'[/red]
请问这是什么问题?小弟感激不尽!!!!!!!!!1
代码如下:
<%
dim Conn,sql,rs
set Conn=server.createobject("adodb.connection")
Conn.connectionstring="driver={SQL Server};server=wsl;UID=sa;PWD=wsl;Database=fashion"
Conn.Open
set rs=server.CreateObject("adodb.recordset")
sql="select * from fashionnews order by addtime desc"
rs=conn.execute(sql)
%>
<table>
<%
do
while not rs.EOF
response.Write"<tr><td>"&rs("title")&"</td></tr>"
rs.movenext
loop
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
 
rs=conn.execute(sql)
改為:set rs=conn.execute(sql)試一下.

 
execute方法是不返回数据集的,自然你就用不了eof等record属性了,改为用open打开.
set rs=conn.open sql,1,1
 
多人接受答案了。
 
后退
顶部