ASP开发技巧集锦二

11. 报错并返回 if rs.bof and rs.eof then ‘还是有问题 response.write"<SCRIPT language=JavaScript>alert('找不到!');" response.write"javascript:history.go(-1)</SCRIPT>" end if ----------------------------------- 这个是跳转。 <script language="javascript"> alert('<%=intOperationInfo%>'); window.navigate('ChangePwd.asp'); </Script> 12. 从VBS到JS,混用 <% dim checkpwdconfig checkpwdconfig=split(addation,"/") %> <script language="javascript"> alert("<%=checkpwdconfig(0)%>") </script> 13. 弹出窗口 <script language=javascript> function openaddnew() { subWindow=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','') subWindow.opener = this; } </script> 用一个连接调用: <a href=""#"">请修改密码 onClick="openaddnew()"</a> 图片调用: <img name=submit1 src="../button_new<%=session("languageid")%>.gif" onClick="openaddnew()"> 14. 分页 <!--#include file="conn.asp"--> <% if request("pageno")<>"" then pageno=int(request("pageno")) else pageno=1 end if sql="select * from news where [language]='中文' and bigclassname='新闻' order by id desc" Set rs= Server.CreateObject("ADODB.Recordset") rs.open sql,conn,1,3 rs.pagesize=20 if rs.eof then pageno=0 else rs.absolutepage=pageno end if %> ========================================== 共<%=rs.recordcount%>条,<%=pageno%>/<%=int(rs.pagecount)%>页,每页<%=rs.pagesize%>条 <a href="manage.asp?pageno=1">首页</a> <%if pageno>1 then%> <a href="manage.asp?pageno=<%=int(pageno)-1%>">上一页</a> <% end if if int(pageno)<>int(rs.pagecount)then %> <a href="manage.asp?pageno=<%=int(pageno+1)%>">下一页</a> <%end if%> <a href="manage.asp?pageno=<%=int(rs.pagecount)%>">尾页</a> <%rs.close%> <% call 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. 关闭独立窗口 <head> <OBJECT id=closes type="application/x-oleobject" classid="clsid:adb880a6-d8ff- 11cf-9377-00aa003b7a11"><param name="Command" value="Close"> </object> </head> <body> <input type="button" value="点击我关闭窗口" onclick="closes.Click();"> </body> 17. 极细表格 <table border="1" cellpadding="0" cellspacing="0" width="32" height="32" bordercolorlight="#000000" bordercolordark="#FFFFFF"> <tr> <td> </td> </tr> </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* [-_/[email protected]#/$%/^&/*/./(/)/[/]/{/}<>/?/////'/"]*) .{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. 判断浏览器 <SCRIPT LANGUAGE="javascript1.2"> <!--// if (navigator.appName == 'Netscape') var language = navigator.language; else var language = navigator.browserLanguage; if (language.indexOf('en') > -1) document.location.href = 'en/index.asp'; else if (language.indexOf('zh') > -1) document.location.href = 'cn/index.asp'; else document.location.href = 'cn/index.asp'; // End --> </script>

相关内容推荐

怎样用ASP压缩文件

多数的时候我们需要压缩文件,保存到特定的位置,或者你可以使用它实现所有你想要的效果。 我们需要服务器支持WScript.Shell-多数的站长都不会允许这样的。 这里你可以获取下载链接

用ASP生成Excel文件

用asp生成Excel文件不是像我认为的那么容易。我想这小段代码应该能帮助大家找到输出数据到csv和xls的方法。 %@LANGUAGE="VBSCRIPT" CODEPAGE="936"%meta http-equiv="Content-Type" content="text/html; charset=

html中用js调用ASP文件,实现静态页面动态显示

html中用js调用ASP文件,实现静态页面动态显示,比如HMTL文章的动态新闻评论等 ---简单版[调用代码,把他放哪儿,就在哪儿显示]-------- script language="javascript" src="asdf.asp"/script-----asdf.asp文

实现多条件模糊查询SQL语句

很多网友问到如何写模糊查询语句和多条件查询,这里我整理了一下,假设以姓名、性别、电话号...作为数据库中的字段名。 通常写一个简单的模糊查询的SQL语句格式可以如下例: sq

获得当前页面地址和来路地址

当前页面地址: html="http://" html=htmlRequest.ServerVariables("Server_Name") html=htmlRequest.ServerVariables("URL") ifrequest.ServerVariables("QUERY_STRING")""then html=html"?"Request.ServerVariables("QUERY_STRING") endif session("

返回
顶部