asp的问题，希望高手帮忙

来源：百度知道 编辑：UC知道 时间：2024/05/31 04:44:39
<%dim bookid,action,i
action=request("action")
set rs=server.CreateObject("adodb.recordset")
rs.open "select count(*) as rec_count from qw_action where username='"&username&"' and zhuangtai=7",conn,1,1
if rs("rec_count")=0 then
response.write "<script language=javascript>alert('对不起！');window.close();</script>"
response.End
end if
rs.close
set rs=nothing

select case action
case ""
set rs=server.CreateObject("adodb.recordset")
rs.open "select qw_action.actionid,qw_action.bookid,qw_action.bookcount,qw_action.zonger,qw_goods.bookname,qw_action.shjiaid,qw_goods.shichangjia,qw_goods.huiyuanjia,qw_goods.vipjia from qw_goods inner join qw_action on qw_goods.bookid=qw_action.bookid where qw_action.username='"&username&"' and qw_action.zhuangtai=7",conn,1,1
%>
上面的代码运行时说是缺少“e

<%
dim bookid,action,i
action=request("action")

set rs=server.CreateObject("adodb.recordset")
rs.open "select count(*) as rec_count from qw_action where username='"&username&"' and zhuangtai=7",conn,1,1

if rs("rec_count")=0 then
response.write "<script language=javascript>alert('对不起！');window.close();</script>"
response.End
end if

rs.close
set rs=nothing

select case action
case ""
set rs=server.CreateObject("adodb.recordset")
rs.open "select qw_action.actionid,qw_action.bookid,qw_action.bookcount,qw_action.zonger,qw_goods.bookname,qw_action.shjiaid,qw_goods.shichangjia,qw_goods.huiyuanjia,qw_goods.vipjia from qw_goods inner join qw_action on qw_goods.bookid=qw_action.bookid where qw_action.username='"&username&"' and qw_action.zhuangtai=7"