万有引力公式二维:ADODB.Recordset (0x800A0BB9)参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。

来源：百度文库编辑：神马品牌网时间：2024/05/05 05:57:54

<td height="23" bgcolor="#FFFF99"> 公告信息</td>
</tr>
<%
sqlstr="select * from 公告信息"
set my_rs=server.createobject("adodb.recordset")
my_rs.open sqlstr,my_Conn,1,1 %>
<tr>
<td bgcolor="#FFFFFF" height="120"> <marquee direction=up height=130 onMouseOut=this.start()
onMouseOver=this.stop() scrollamount=1 scrolldelay=50 width="98%">
<% i=1 '记录条数
if not my_rs.eof then
do while not my_rs.eof%>
<a href="#" onClick="MM_openBrWindow('file/ggxx-show.asp?ggbh=<%=my_rs("公告编号")%>','','scrollbars=yes,width=400,height=240')" class="linkcss">
<%=i%>.<%=my_rs("公告主题")%> </a><br>
<%i=i+1
my_rs.movenext
loop
else
response.write "对不起,暂无记录"
end if
my_rs.close
%>
</marquee> </td>
这是一个公告栏的程序

<%
Dim sql,rs
sql="Select * from bbs where layer=1 Order By submit_date desc"
Set rs=server.CreateObject("ADODB.Recordset")
rs.Open sql,db,1
If Not rs.Bof And Not rs.Eof Then
Dim page_size,page_no,page_total
page_size=10
If Request("page_no")="" Then
page_no=1
Else
page_no=Cint(Request("page_no"))
End If
session("page_no")=page_no
rs.pagesize=page_size
page_total=rs.pagecount
rs.absolutepage=page_no
Dim i,j
i=0
j=page_size
Do While Not rs.eof And j>0
i=i+1
j=j-1
%>

上次我也碰到了这个问题,高手顺手帮我解决~~
ADODB.Recordset的问题吗?

ADODB.Recordset (0x800A0E79) ADODB.Recordset (0x800A0BCD) ADODB.Recordset (0x800A0E78) ADODB.Recordset (0x800A0CB3) ADODB.Recordset (0x800A0BB9) ADODB.Recordset (0x800A0BB9)问题 ADODB.Recordset 错误 (0x800A0BB9) ADODB.Recordset (0x800A0BB9)问题 ADODB.Recordset (0x800A0E79)错误错误类型：ADODB.Recordset (0x800A0E7D)