小问题，请帮助！！！！！

[why0825]

<%
bb="select * from IP$ where bm='总经办'"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open bb, conn,3,1
if not rs.eof then
rs.MoveFirst
do while Not rs.eof
bm=rs.fields("bm")
user1=rs.fields("user1")
name1=rs.fields("name1")
ip=rs.fields("ip")
mic=rs.fields("mic")
link=rs.fields("link")


%>
这段代码显示的错误是：
ADODB.Recordset 错误 '800a0bb9'
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

/xitong.asp，行41
请问哪里错了,请帮忙改改！！谢谢！

[qunluo]

不要改到代码，全部贴出来，在帮你看看！！