ASPÖÐÊ®´ó³£ÓóÌÐò´úÂë.£ºµÚʮһ½Ú¡´ÎÒµÄÐĵáµ
ASPÍòÓ÷ÖÒ³³ÌÐò
¡¡¡¡ÕâÖ»ÊǸöaspС¼¼ÇÉÀàµÄ¶«Î÷£¬ËüËäÈ»ÊʺÏÔÚÿ¸ö²»Í¬ÎļþÃûÀïµ÷ÓÃÕâ¸öº¯Êý£¬µ«ÊÇÒ²ÊÇÓÐÇ°ÌáµÄ£¬ÏÂÃæÈÃÎÒÃÇÀ´×Ðϸ¿´¿´ÆäÖеÄÔί¡£
¡¡¡¡ÏÂÃæÕâ¶ÎÊÇ»ù±¾µÄ·ÖÒ³´úÂ룺
£¼% sql = "select……………………Ê¡ÂÔÁËsqlÓï¾ä
¡¡Set rs=Server.Createobject("ADODB.RECORDSET")
¡¡rs.Open sql, conn, 1, 1
¡¡if not rs.eof then
¡¡¡¡pages = 30 ’¶¨ÒåÿҳÏÔʾµÄ¼Ç¼Êý
¡¡¡¡rs.pageSize = pages ’¶¨ÒåÿҳÏÔʾµÄ¼Ç¼Êý
¡¡¡¡allPages = rs.pageCount’¼ÆËãÒ»¹²ÄÜ·Ö¶àÉÙÒ³
¡¡¡¡page = Request.QueryString("page")’ͨ¹ýä¯ÀÀÆ÷´«µÝµÄÒ³Êý
¡¡¡¡’ifÓï¾äÊôÓÚ»ù±¾µÄÅÅ´í´¦Àí
¡¡¡¡if isEmpty(page) or Cint(page) £¼ 1 then
¡¡¡¡¡¡page = 1
¡¡¡¡elseif Cint(page) £¾ allPages then
¡¡¡¡¡¡page = allPages
¡¡¡¡end if
¡¡¡¡rs.AbsolutePage = page
¡¡¡¡Do while not rs.eof and pages £¾ 0 %£¾
¡¡¡¡¡¡ÕâÀïÊä³öÄãÒªµÄÄÚÈÝ………………
¡¡¡¡¡¡£¼% pages = pages - 1
¡¡¡¡¡¡rs.MoveNext
¡¡¡¡Loop
¡¡else
¡¡¡¡Response.Write("Êý¾Ý¿âÔÝÎÞÄÚÈÝ£¡")
¡¡End if
¡¡rs.Close
¡¡Set rs = Nothing %£¾
¡¡¡¡ÏµÍ³ÒѾΪÊý¾Ý·ÖÒ³ÁË£¬ÏÂÃæ¾Í¿´¿´Õâ´Î̽ÌֵĹؼüÎÊÌâ·ÖÒ³º¯ÊýµÄ¶¨Òå
£¼% SUB pageUrl(pUrl)
¡¡Dim eUrl
¡¡txts = Request.ServerVariables("URL")
¡¡txts = left(txts,instrrev(txts,"/",len(txts))-1)
¡¡eUrl = "http://"; & Request.ServerVariables("server_name") & txts
¡¡For i =1 to allpages
¡¡¡¡txt = ""
¡¡¡¡txt = "£¼strong£¾"
¡¡¡¡txt = txt & "£¼a href=" & eUrl & pUrl & "page="&i & "£¾"
¡¡¡¡if i = Cint(Page) then txt = txt & "£¼font color=’bb0000’£¾"
¡¡¡¡¡¡txt = txt & (i)
¡¡¡¡¡¡if i = Cint(Page) then txt = txt & "£¼/font£¾"
¡¡¡¡¡¡¡¡txt = txt & "£¼/a£¾ ¡Î £¼/strong£¾"
¡¡¡¡¡¡¡¡Response.Write(txt)
¡¡Next
END sub %£¾
¡¡¡¡°ÑÉÏÃæÕâ¸ö·ÖÒ³º¯Êý´úÂëCOPY´æ³ÉÒ»¸öASPÎļþ£¬ÔÚÐèҪʹÓõÄÒ³ÃæÀïÓÃincludeÀ´ÒýÈëËûµ÷ÓõÄʱºòÖ»Òª Call("/Äãµ÷ÓõÄÎļþÃû?")¾ÍokÁË£¬±ÈÈçÎÒµÄ newsÒ³ÃæÀïÒªµ÷ÓÃÄÇô¾ÍÊÇ£¼%Call("/news.asp?")%£¾
¸Õ²ÅÎÒÃÇËùµ½ÕâÊÇÓÐÏÞÖƵÄÒâ˼¾ÍÊÇ˵µÚÒ»¶Î´úÂëÀï³ýÁ
Ïà¹ØÎĵµ£º
Ö»ÐèÒªÔÚfckeditor\editor\filemanager\connectors\aspÎļþ¼ÐϵÄcommands.aspÐÞ¸Äһϼ´¿É
ÔÚÕâ¸öÎļþÖвéÕÒһϣºFileUpload
»áÕÒµ½Õâ¸öº¯Êý
°Ñ
´úÂëÈçÏÂ:
Dim sFilePath
sFilePath = CombineLocalPaths(sServerDir, sFileName)
¸ÄΪ
´úÂëÈçÏÂ:
Dim sFilePath,ranNum
Randomize
ranNum=int(90000*rnd)+ ......
½«ÒÔÏ´úÂë·Åµ½Ò»¸öµ¥¶ÀµÄÒ³Ãæcheckcode.asp
<%
Option Explicit
Response.buffer=true
Call Com_CreatValidCode("validateCode")
Sub Com_CreatValidCode(pSN)
' ½ûÖ¹»º´æ
Response.Expires = -9999
Response.AddHeader "Pragma","no-cache"
Response.AddHeader "cache-ctrol","no-cache"
Response.ContentTy ......
ÏÖÔÚÖ÷Á÷µÄÍøÕ¾¿ª·¢ÓïÑÔÎÞÍâºõasp¡¢php¡¢asp.net¡¢jspµÈ¡£
ÍøÒ³´Ó¿ªÊ¼¼òµ¥µÄhmtlµ½¸´ÔӵķþÎñÓïÑÔ£¬×ß¹ýÁË10¶à¸öÄêÍ·£¬¸÷ÖÖ¼¼Êõ²ã³ö²»Çµ¥¸öµÄÖ÷Á÷¼¼ÊõÒ²ÔÚ²»¶Ï·Ðµİ汾£¬ÏÖÔÚ·ÖÎöϸ÷ÖÖÓïÑÔµÄÇø±ð¡¢ÓÅÊÆ¡¢ÁÓÊÆ¡¢¿ª·¢×¢ÒâÊÂÏ
HTML:µ±È»ÕâÊÇÍøÒ³×î»ù±¾µÄÓïÑÔ,ÿһ¸ö·þÎñÆ÷ÓïÑÔ¶¼ÐèÒªËüµÄÖ§³Ö,Ҫѧϰ,Õâ¸ö¿Ï¶¨ÊÇ¿ªÊ¼ ......
ASP£¨Active Server Pages£©ÊÇMicrosoftºÜÔç¾ÍÍƳöµÄÒ»ÖÖWEBÓ¦ÓóÌÐò½â¾ö·½°¸£¬Ò²ÊǾø´ó¶àÊý´ÓÊÂÍøÕ¾¿ª·¢ÈËÔ±ºÜÊìϤµÄÒ»¸ö±È½Ï¼òµ¥µÄ±à³Ì»·¾³¡£Í¨¹ýASPÎÒÃÇ¿ÉÒÔ´´½¨¹¦ÄÜÇ¿´óµÄ¶¯Ì¬µÄWEBÓ¦ÓóÌÐò¡£ASPËäÈ»¹¦ÄܺÜÇ¿´ó£¬µ«ÓÐЩ¹¦ÄÜÓô¿ASP´úÂëÍê³É²»ÁË£¬ÎªÁËÄܱ£Ö¤¿ª·¢³ö¹¦Äܸü¼ÓÇ¿´óµÄWEBÓ¦ÓóÌÐò£¬ÎÒÃÇ¿ÉÒÔ½èÖúµ÷ÓÃCOM×é¼þ¡£ ......