asp判断数据库id语句

来源:百度知道 编辑:UC知道 时间:2024/06/08 10:06:27
以下是我的ASP读取数据库里的图片
但是我想加个判断语,不会写,就是当数据库里的id小于最小id时显示最小id,当id大于最大id时显示最大id,当id不等于id值时,会出现提示语,请高手帮忙
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp" -->
<html>
<head>
<title>查看壁纸</title>
</head>

<body>
<%
dim id
id = "1"
if (request("id") <> "") then
id = request("id")
end if
%>
<%
sql="select * from bizhi where id = " & id
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
%>
<%
for i=1 to rs.pagesize
response.write"<img src="&rs("bizhi")&">"
rs.movenext
if rs.eof then exit for
next
%>
<%rs.close
conn.close
set rs=nothing
set conn=nothing%>
</body>
</html>
我以将代码改为以下内容

你无非就像想根据ID取出图片,那么用for语句干嘛呢?难道你的id不是唯一的且有重复值?
----------------------------------------------------
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp" -->
<html>
<head>
<title>查看壁纸</title>
</head>

<body>
<%
dim id
id=Request("id")
if not IsNumeric(id) Or IsEmpty(id) then
id=1
'如果参数id为非数字,空,则默认全部置 1
'你可以改成 Response.Write("请输入正确的ID参数,只能为数字"),给提示下,记得加 Response.End()
end if

id=CInt(id)
'可以不要这句

set rs=server.CreateObject("adodb.recordset")
rs.open "bizhi",conn,1,1,512

rs.PageSize=1
'设置每页显示条数,这里每页显示1条记录

if not rs.EOF then
'有记录不为空,则有
if id<1 then
id=1
'id小于最小记录,因为都是从第一页开始翻页,置为第一条记录,可以改为想要的提示也行
End if

if id>rs.RecordCoun