asp+sql2000存储过程分页实例(3)_ASP教程
推荐：ASP点击刷新验证码实例代码现在网站上大部分的验证码都是图片验证码，就跟 http://dwww.cn/Books.asp 下边的一样。 用户可能长时间的停留在页面上，等到最后提交的时候，验证码就可能过期了。所以要加个刷新的功能。 验证码：input name='checkimg' type='text' class='input' id='che
'查询条件判断
if key<>"" then
SearchChar=" and "& kind &" like '%"&key&"%'"
SearchChar1=" "& kind &" like ''%"&key&"%''"'书写注意与存储过程中的where关键字间的间距，如果多条件，后面也要有间距
else
SearchChar=""
SearchChar1=""
'response.Write SearchChar1
'response.End()
end if
'返回总记录数
Set MyComm=Server.CreateObject("ADODB.Command")
MyComm.ActiveConnection=conn
'MyConStr是数据库连接字串
MyComm.CommandText="recordCount"
'指定存储过程名
MyComm.CommandType=4
'表明这是一个存储过程
MyComm.Prepared=true
'要求将SQL命令先行编译
'声明参数
MyComm.Parameters.append MyComm.CreateParameter( "@TableName",200,1,500,tablename)
MyComm.Parameters.append MyComm.CreateParameter( "@strWhere",200,1,500,SearchChar)
MyComm.Parameters.append MyComm.CreateParameter( "@count",3,2)
MyComm.Execute
'取得出参
TotalRs=MyComm.Parameters( "@count").value
Set MyComm=Nothing
'计算总页数
if TotalRs mod 30 =0 then
TotalPage=TotalRs \30
else
TotalPage=TotalRs \30 + 1
end if
'页码合法判断
if page="" or page<=0 then
page=1
end if
'page=48
'调用存储过程
sql="exec sp_pageview '"&TableName&"','"&strGetFields&"',"&page&","&PageNum&",'"&SearchChar1&"','"&strOrder&"',0"
response.Write sql
'response.End()
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
%>
</head>
<body> 分享：ASP实现js图片的轮显下午做了一个asp+js实现 图片的轮显的效果，效果图 如： 左侧的图片轮显，在 我用的是js,然后我改了一下用asp实现效果 的。 pic.asp源代码： % '连接数据库代码省去了 sql=(select * from Pic order by picorder asc,id desc) Set rs=server.CreateObject(
- 相关链接：
- 教程说明：
ASP教程-asp+sql2000存储过程分页实例(3)
。