汽车大屏幕导航:ADODB.Recordset (0x800A0BB9)
来源:百度文库 编辑:神马品牌网 时间:2024/10/01 08:14:02
<%
else
dim IntOrderNum
set rsvip=server.CreateObject("adodb.recordset")
rsvip.Open "select distinct(goods) from orders where username='"&strUserName&"'and state=2 ",conn,1,3(出错行)
IntOrderNum = rsvip.recordcount
rsvip.Close
rsvip.open "select DV_User.GrpID,TimesGrp.GrpName,TimesGrp.Stars from DV_User Inner Join TimesGrp On DV_User.GrpID = TimesGrp.GrpID where username='"&strUserName&"' ",conn,1,1
strTitle = rsVip("GrpName")
LngDiscount = rsVip("Stars")
rsvip.close
set rsvip=nothing
if IntOrderNum=0 then %>
else
dim IntOrderNum
set rsvip=server.CreateObject("adodb.recordset")
rsvip.Open "select distinct(goods) from orders where username='"&strUserName&"'and state=2 ",conn,1,3(出错行)
IntOrderNum = rsvip.recordcount
rsvip.Close
rsvip.open "select DV_User.GrpID,TimesGrp.GrpName,TimesGrp.Stars from DV_User Inner Join TimesGrp On DV_User.GrpID = TimesGrp.GrpID where username='"&strUserName&"' ",conn,1,1
strTitle = rsVip("GrpName")
LngDiscount = rsVip("Stars")
rsvip.close
set rsvip=nothing
if IntOrderNum=0 then %>
rsvip.Open "select distinct goods from orders where username='"&strUserName&"'and state=2 ",conn,1,3
改成这样,去掉括号
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)