ASP问题!!!

来源:百度知道 编辑:UC知道 时间:2024/06/14 16:42:14
<%'查询C_NEW数据库打开
Set rsnew = Server.CreateObject ("ADODB.Recordset")
sqlnew="select * from c_news where c_id ="& id & ""
rsnew.Open sqlnew,conn,1,1
if rsnew.PageCount=0 then
response.Write "<script language=javascript>alert('没有此篇内容!!');history.back(-1);</script>"------------这句不能实现.帮忙看看怎么了
end if
%>
<%
dim lei
lei=rsnew("daleibie")
Set rschaxunlei = Server.CreateObject ("ADODB.Recordset")
sqlchaxunlei="select top 15 * from c_daleibie where daleibie='"& lei & "'"
rschaxunlei.Open sqlchaxunlei,conn,1,1

dim quanxian
quanxian = rschaxunlei("quanxian")
if quanxian<>0 and session("login")<>true then
response.Write "<script language=javascript>alert('游客无权查看此栏目!!');history.back(-1);</script>"
end if

%>

response.Write "<script language=javascript>alert('没有此篇内容!!');history.back();</script>"
Response.End()


response.Write "<script language=javascript>alert('没有此篇内容!!');history.go(-1);</script>"
Response.End()

当前记录不存在时就不能在执行了,你上面是记录为空了,还用rsnew("daleibie")
当然出错了

if rsnew.PageCount=0 then
干嘛那样写,这样写吧
if rsnew.eof or rsnew.bof then

sqlnew="select * from c_news where c_id ="& id