11. 报错并返回
if rs.bof and rs.eof then ‘ 还是有问题
response.write"
1<script language="JavaScript">alert('找不到!');"
2response.write"javascript:history.go(-1)</script>
"
end if
-----------------------------------
这个是跳转。
1<script language="javascript">
2alert('```
3=intOperationInfo
4```');
5window.navigate('ChangePwd.asp');
6</script>
12. 从 VBS 到 JS ,混用
1
2dim checkpwdconfig
3checkpwdconfig=split(addation,"/")
1<script language="javascript">
2alert("```
3=checkpwdconfig(0)
4```")
5</script>
13. 弹出窗口
1<script language="javascript">
2function openaddnew()
3{
4subWindow=window.open("../Edit/PasswordConfigEdit.asp?method=new",'','scrollbars=yes,left=120,top=60,height=250,width=500,menubar=no,location=no,toolbar=no,resizable=yes','')
5subWindow.opener = this;
6}
7</script>
用一个连接调用:
1<a href="" #""="">请修改密码 onClick="openaddnew()"</a>
图片调用:
1<img ```.gif"="" languageid")="" name="submit1" onclick="openaddnew()" src="../button_new```
2=session("/>
14. 分页
1
2if request("pageno")<>"" then
3pageno=int(request("pageno"))
4else
5pageno=1
6end if
7
8sql="select * from news where [language]='中文' and bigclassname='新闻' order by id desc"
9Set rs= Server.CreateObject("ADODB.Recordset")
10rs.open sql,conn,1,3
11rs.pagesize=20
12if rs.eof then
13pageno=0
14else
15rs.absolutepage=pageno
16end if
==========================================
共=rs.recordcount条,=pageno/=int(rs.pagecount)页,每页```
=rs.pagesize
if pageno>1 then
<a href="manage.asp?pageno=``` =int(pageno)-1
1
2end if
3if int(pageno)<>int(rs.pagecount)then
1<a href="manage.asp?pageno=```
2=int(pageno+1)
3```">下一页</a>
1end if
1<a href="manage.asp?pageno=```
2=int(rs.pagecount)
3```">尾页</a>
1rs.close
1
2
3call CloseConn()
15. 数据库更新
sql="select * from [user] where username='"&request("username")&"'"
rs.Open sql,Conn,1,3
rs("usermail")=Request("usermail")
rs("userhome")=Request("userhome"))
rs.update
rs.close
16. 关闭独立窗口
1<head>
2<object classid="clsid:adb880a6-d8ff- 11cf-9377-00aa003b7a11" id="closes" type="application/x-oleobject"><param name="Command" value="Close"/>
3</object>
4</head>
1<body>
2<input onclick="closes.Click();" type="button" value="点击我关闭窗口"/>
3</body>
17. 极细表格
1<table border="1" bordercolordark="#FFFFFF" bordercolorlight="#000000" cellpadding="0" cellspacing="0" height="32" width="32">
2<tr>
3<td> </td>
4</tr>
5</table>
18. 几个正则表达式
Require : /.+/,
Email : /^\w+([-+.]\w+)@\w+([-.]\\w+)\.\w+([-.]\w+)$/,
Phone : /^((\(\d{3}\))|(\d{3}\-))?(\(0\d{2,3}\)|0\d{2,3}-)?[1-9]\d{6,7}$/,
Mobile : /^((\(\d{3}\))|(\d{3}\-))?13\d{9}$/,
Url : /^http://[A-Za-z0-9]+\.[A-Za-z0-9]+[/=?%\-&_~`@[\]':+!]([^<>""])$/,
IdCard : /^\d{15}(\d{2}[A-Za-z0-9])?$/,
Currency : /^\d+(\.\d+)?$/,
Number : /^\d+$/,
Zip : /^[1-9]\d{5}$/,
QQ : /^[1-9]\d{4,8}$/,
Integer : /^[-\+]?\d+$/,
Double : /^[-\+]?\d+(\.\d+)?$/,
English : /^[A-Za-z]+$/,
Chinese : /^[\u0391-\uFFE5]+$/,
UnSafe :/^(([A-Z]|[a-z]|\d|[-_~!@#$%^&\\.\(\)\[\]\{\}<>?\\/'"])|.{0,5})$|\s/,
19. Left 应用(控制字数)
function title(str)
if len(trim(str))>=28 then
title=left(trim(str),27)&"..."
else
title=trim(str)
end if
end function
20. 判断浏览器
1<script language="javascript1.2">
2<!--//
3if (navigator.appName == 'Netscape')
4var language = navigator.language;
5else
6var language = navigator.browserLanguage;
7if (language.indexOf('en') > -1) document.location.href = 'en/index.asp';
8else if (language.indexOf('zh') > -1) document.location.href = 'cn/index.asp';
9else
10document.location.href = 'cn/index.asp';
11// End -->
12</script>