• <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>
  • 菜鳥提高 ASP開發技巧集錦二

    發表于:2007-09-07來源:作者:點擊數: 標簽:
    11. 報錯并返回 if rs.bof and rs.eof then ‘還是有問題 response.write"SCRIPT language= Java Scriptalert('找不到!');" response.write" java script:history.go(-1)/SCRIPT" end if --------------------------------
    11. 報錯并返回

      if rs.bof and rs.eof then ‘還是有問題

      response.write"<SCRIPT language=JavaScript>alert('找不到!');"

      response.write"javascript:history.go(-1)</SCRIPT>"

      end if

     ?。?br>
      這個是跳轉。

      <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* [-_\~!@#\$%\^&\*\.\(\)\[\]\{\}<>\?\\\/\'\"]*) .{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>

    原文轉自:http://www.kjueaiud.com

    老湿亚洲永久精品ww47香蕉图片_日韩欧美中文字幕北美法律_国产AV永久无码天堂影院_久久婷婷综合色丁香五月

  • <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>