<% ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ' Programming By Smartpig ' ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' Class TBGrid public DataSource
網站使用者統計是每一個網站比有得功能,但是很少有人實現線上使用者統計得絕對精確或者說是相對精確,基於Web得原理,伺服器不會主動知道使用者通過關閉瀏覽器離開網站,這時候只能依靠伺服器端變數Session得到期來判斷使用者是否離開,但使用者瀏覽器是可以知道自己何時關閉得,代碼也非常簡單 如下: function body_onunload() { if(window.event.clientX<0) { alert('the broswer is
講解ASP方面的知識比較全!適合 剛開始學習ASP的朋友們 給我加分!!!! 第一部分 安裝Active Server Page的準備工作 .第一章 安裝和使用 WINDOWS NT Server ............ .第二章 安裝和使用 IIS ............ .第三章 安裝和使用 SQL Server ............ .第四章 Exchage Active Server, Index Server和
Below is a table of Response Properties along with examples and explanations. Response PropertiesBufferResponse.Buffer = trueAllows for the buffering of outputCacheControlResponse.CacheControl="Public" Sets Cache to "Public" or
Overview: The Application Object represents a collection of ASP pages. The Application object has zero (0) properties, two (2) collections, two (2) methods, and two (2) events. Get Started: Below are a couple scripts for lesson11.
此程式只能將首頁轉成靜態!(真對一個頁面) 將createhtml.asp檔案上傳到 你的空間存放首頁檔案(index.asp)的目錄下錄入網址直接開啟createhtml.asp接提示操作就可以了如果沒有轉成功可將createhtml.asp更名試一下(如:改成z.asp)錄入網址直接開啟z.asp 本檔案可以隨便改名不影響運行複製代碼 代碼如下:<% if request.QueryString("action")="ok" then dim kk,url,http,reurl
以下是源碼,請命名為.asp檔案 複製代碼 代碼如下:<% bpn = request("bpn") if(bpn = "") then bpn = "0" end if intbpn = cint(bpn) if request("action") = "1" then word = request("word") url = request("url") if word <> "" then getCategories() if
<% '處理接收分頁得參數,顯示頁數 也就預設第一頁 'page這個參數就是讓變數pagenum去顯示第一也得值:0 if Request("page")="" then pageNum=0 '下面就是page接參數 else pageNum=Request("page") if not isnumeric(pageNum) then Call DH.Alert("操作錯誤!","-1") else pageNum=clng(pageNum) end if end if %&
此類高亮根據Editplus高亮來做的 複製代碼 代碼如下:Class Wyd_AspCodeHighLight Private RegEx Public Keyword,ObjectCommand,Strings,VBCode Public KeyWordColor,ObjectCommandColor,StringsColor,Comment,CodeColor Private Sub Class_Initialize() Set RegEx = New
1、最簡單的如下 Dim objConn Set objConn = Server.CreateObject("ADOBD.Connection") objConn.Open Application("Connection_String") 'Call the stored procedure to increment a counter on the page objConn.Execute "exec sp_AddHit"