Microsoft VBScript 运行时错误 错误 '800a01a8' 缺少对象: '' /1.asp，行 21

<%
<!-- #include file="../inc/conn-bbs.asp" -->


dim rs,sql,modid
dim bbs_account_cash
modid="ttasp"

sql="select * from BBS_User where user_num="& modid &""
set rs=bbsconn.execute(sql)
if not rs.eof then
        user_num=rs("user_num")
        user_name=rs("user_name")
        user_id=rs("user_id")
       
        user_state=rs("user_state")
        login_times=rs("login_times")
        user_password=rs("user_password")
        user_addtime=rs("user_addtime")
        bbs_account_cash=rs("bbs_account_cash")
end if
为啥数据操作错误？谢谢

数据库连接缺失

这个我搞定谢谢