ASP 代码哪错了，，在线等啊。。

来源：百度知道编辑：UC知道时间：2024/05/10 11:07:37

<%
dim page
page=Trim(request("page"))
If page="" Then
page=1
Elseif CInt(page)<=0 then
page=1
else
page=CInt(page)
End If

'进行查询，取出要显示的记录
dim rs,sql,str
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from a1 where id="&request.QueryString("id")
rs.Open sql,conn,1,3

if rs.eof then
response.Write("对不起你访问的文章不存在或者已经被删除了")
else

str=rs("a1")
k=request.QueryString("id")

rs.close
Set rs=nothing

'把出取来的记录放入数组
dim strtmp,k
strtmp=Split((str),"<br>")

'取出要显示的记录，同时得到页数
Dim n,tmp,i,j,tt
n=500
i=0
j=0
Do While i<=ubound(strtmp)
tmp=strtmp(i)
tt=true
Do While tt
If i>=ubound(strtmp) then

当然了，你的ID值是空的就会出错。。你是不是直接访问这个页面的结果。sql="select * from a1 where id="&request.QueryString("id") 看看你这个值是从哪里来的
检查ID的值。。

sql="select * from a1 where id="&request.QueryString("id")
改成
sql="select * from a1 where id='"&request.QueryString("id") &"'"
试试

就是 ID的值没有传过来

ASP代码差错《在线等》急急在线等啊 asp代码问题啊 ASP代码查错<在线等> 这个ASP代码哪错了啊. ASP代码哪错了? 在线急等！请求ASP代码的用户登陆代码请高手帮助看下ASP代码，在线等，多谢谁知道asp 数据库实现简单计数器的代码在线等这个ASP代码怎么改？在线等。。急用 ASP提交急需检测表单代码在线等可追分！！！！