【原创】ASP开发技巧集锦二

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>
Published At
Categories with Web编程
comments powered by Disqus