易截截图软件、单文件、免安装、纯绿色、仅160KB

asp数字分页示例共三个

<%
set rs=server.CreateObject(”ADODB.recordset”)
sql =”select * from 表”
rs.open sql,conn,1,1
page=cint(request(”page”))
n=rs.RecordCount
rs.pagesize=12
m=cint(rs.pagecount)
if page=”" then
page=1
elseif page<1 then
page=1
end if
if cint(request(”page”))>m then
page=m
end if
page=cint(page)
if not rs.eof then
rs.absolutepage=page
end if
if m>page+3 then
endpage=page+3
else
endpage=m
end if
if page>4 then
pagetitle=pagetitle & “ ” & “….”
end if
for i=page-3 to endpage
if not i<1 then
if i = page then
pagetitle=pagetitle & “ ” & “<B>[” & i & “]</B>”
else
pagetitle=pagetitle & “ ” & “[” & “<a href=userlist.asp?page=” & i & “>” & i & “<a>” & “]”
end if
end if
next
if page+3 < m then
pagetitle=pagetitle & “ ” & “….”
end if
%>
您可以看到,有一个“pagetitle”的变量,您只要用
<%=pagetitle%>,就可以把它调用出来,实现您的效果。
另一个
<%
     sql="Select * from [table] order by id desc"
     Set rs = Server.CreateObject("ADODB.Recordset")
     rs.open sql,conn,1,1
     page=cint(request("page"))
     n=rs.RecordCount
     PageSize=10
     rs.pagesize=PageSize
     m=cint(rs.pagecount)
     if page="" then
     page=1
     elseif page<1 then
     page=1
     end if
     if cint(request("page"))>m then
     page=m
     end if
  


相关文档:

asp简单文件上传源码


文件1.上传界面文件   upload.htm
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>文件上传</title>
</head> ......

ASP 常用正则表表达示

只能输入1个数字
 
表达式 ^\d$
描述 匹配一个数字
匹配的例子 0,1,2,3
不匹配的例子
 
只能输入n个数字
 
表达式 ^\d{n}$  例如^\d{8}$
描述 匹配8个数字
匹配的例子 12345678,22223334,12344321
不匹配的例子
 
只能输入至少n个数字
 
表达式 ^\d{n,}$ 例如^\d{8, ......

asp中form表单的图片按钮

1、<script>按钮: 
<input type="button" name="btnRead" onClick="readCard()" style="background:url(images/qux1.gif); border:none; width:145px; height:30px;"  />&nbsp;
2、提交按钮:
<input type="submit" name="button" id="button" style="background:url(images/tj.gif); bor ......

ASP中如何用JS从子窗口传递值变量到父窗口表单中?


ASP中如何用JS从子窗口传递值变量到父窗口表单中?
 悬赏分:15 - 解决时间:2008-6-10 00:06
父窗口中有一表单,现在是点表单后的上传打开子窗口,经过无组件上传文件成功后子窗口提示成功,并用response.write(FileName) 输出路径成功.但如何传递到父窗口文本域内提交数据库呢?查资料是用JS回传写成: resp ......

者者软件 ASP如何获取真实IP地址


在 ASP 中使用 Request.ServerVariables("REMOTE_ADDR") 来取得客户端的 IP 地址,但如果客户端是使用代理服务 
器来访问,那取到的就是代理服务器的 IP 地址,而不是真正的客户端 IP 地址。要想透过代理服务器取得客户端的真实 
IP 地址,就要使用& ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号