值得收藏的一些ASP代码

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(r ......

Asp 常用函数

1.数值型函数： abs(num): 返回绝对值 sgn(num): num>0 1; num=0 0; num<0 -1;判断数值正负 hex(num): 返回十六进制值直接表示：&Hxx 最大8位 oct(num): 返回八进制值直接表示：&Oxx 最大8位 sqr(num): 返回平方根 num>0 int(num): 取整 int(99.8)=99; int(-99.2)=100 fix(num): 取整 fix(99.8)=99; fix ......

ASP 网页登录1秒后自动模拟点击input按钮

<input type="submit" name=""byt id="byt" value="现金销售提交" >
例如：表单中有一个名为 byt 的按钮，要求网页打开1秒后，自动点击按钮，
方法：把如下代码加在</form>后。
<script language="javascript">
function window.onload()
{
setTimeout("document.form1.byt.click()",1 ......

asp 操作xml

<% dim xml,root,allitem,nodecount
set xml=server.CreateObject("MicroSoft.XMLDom")
xml.load(server.mappath("style.xml"))
if xml.parseError.errorCode <> 0 then ......

asp下闰年计算方法

计算闰年主要是为了判断2月份的天数，一般闰年2月份是29天，平年2月份是28天。计算闰年的算法非常简单，即：能被400整除，或者能被4整除而不能被100整除。
算法如下：
function isLeapYear(pYear)
    set oreg=new RegExp
    oreg.Pattern="^\d{4}$"
    if n ......