Time of Update: 2017-01-18
資料庫欄位:id(自動編號),class_name(菜單名),parentID(父菜單id) 複製代碼 代碼如下:<% dim m m=0 call ShowTree(0)%> <% Sub ShowTree(parentID) dim s m=m+1
Time of Update: 2017-01-18
經常聽說的ASP上傳漏洞,即是將一些木馬檔案修改尾碼名(修改為影像檔尾碼),進行上傳。 針對此情況使用下列函數進行辨別:複製代碼 代碼如下:<% '****************************************************************** 'CheckFileType 函數用來檢查檔案是否為圖片檔案 '參數filename是本地檔案的路徑 '如果是檔案jpeg,gif,bmp,png圖片中的一種,函數返回true,否則返回false '*
Time of Update: 2017-01-18
複製代碼 代碼如下:<%@ Language = VBSCRIPT %> <% Option Explicit %> <% rem 在asp中通過getrows實現資料庫記錄分頁的一段代碼 Dim iStart, iOffset
Time of Update: 2017-01-18
複製代碼
Time of Update: 2017-01-18
我開始學習xml時做了一個簡單的xml留言板。 ------------------------------- 建立一個新的XMLDOM object server.createObject("Microsoft.XMLDOM") -------------------------------- 載入一個xml檔案 set objXML=server.createObject("Microsoft.XMLDOM") filepath=server.mappath("list.
Time of Update: 2017-01-18
發現好多asp的系統在調用文章的時候如果不產生靜態,輸出的都是類似 http://www.xxx.com/show.asp?id=26 這種格式的. 如果可以換成 http://www.xxx.com/show/?26 這種格式,感覺清減了不少,當然對於支援偽靜態空間 還可以設定成 http://www.xxx.com/show/26 據說著楊可以增加搜尋引擎收錄的幾率. 代碼如下:
Time of Update: 2017-01-18
複製代碼 代碼如下:13.5.1 列出某一天, 上一星期的資料 SELECT distinct dateandtime FROM ctdate_by_query_date WHERE dateandtime between ((#2006-5-15#+(Weekday(2006-5-15)-7))-6) and (#2006-5-15#-7)+Weekday(2006-5-15)
Time of Update: 2017-01-18
複製代碼 代碼如下:<% '建立檔案夾函數 Function CreateFolder(strFolder)'參數為相對路徑 '首選判斷要建立的檔案夾是否已經存在 Dim strTestFolder,objFSO strTestFolder = Server.Mappath(strFolder)
Time of Update: 2017-01-18
複製代碼 代碼如下:<% '==============================================================檢查提交資料合法性 Function CheckInput() '--------定義部份------------------ Dim Fy_Post,Fy_Get,Fy_In,Fy_Inf,Fy_Xh,Fy_db,Fy_dbstr,Kill_IP,WriteSql
Time of Update: 2017-01-18
複製代碼 代碼如下:一 遍曆Request 方式1: <% For Each r In Request.QueryString Response.Write "Request("""&r&""") = " & Request(r) Response.Write "<p>" Next %> 方式2: <%
Time of Update: 2017-01-18
1. CDONTS.NewMail 組件使用說明 Set MailObject = Server.CreateObject("CDONTS.NewMail") MailObject.From = "發信郵箱" MailObject.To = "收信郵箱"
Time of Update: 2017-01-18
作用說明: 本代碼實現從 Access 提取資料以建立 HTML 檔案, 不建檔案夾. 如果檔案名稱與要建立的檔案名稱相同, 則覆蓋, 跟 SQL 的更新一樣的原理. 待加功能: 刪除與尋找. 複製代碼 代碼如下:<% '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Time of Update: 2017-01-18
複製代碼 代碼如下:<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% if Trim(Request.Form("TableName")) '----設定 開啟資料庫連接 dbs="Data Source="+server.mappath("database.mdb")+";Provider=Microsoft.Jet.OLEDB.4.0;"
Time of Update: 2017-01-18
提起asp很多人就認為是一堆html指令碼和被括在<%和%>之中的一些代碼還有就是一些javascript指令碼等籌在一起的一些代碼的集合,這樣的代碼,再加上各類的不同格式的注釋,看起來就一個字:亂。也不管別人能不能看得懂,只要是能實現自己的目的就可以了,因為asp的代碼也是指令碼,給了客戶也不可能不被人看到其中的內容,經多包容在dll中一部分商務邏輯,但是還是覺得asp代碼是最不值錢的代碼,沒有人回去購買,可以隨時從別人的網站中查看源碼的形式得到別人辛辛苦苦編寫出來的獨特風格的東東
Time of Update: 2017-01-18
數組的定義 Dim MyArray MyArray = Array(1,5,123,12,98) 可擴充數組 Dim MyArray() for i = 0 to 10 ReDim Preserve MyArray(i) MyArray(i)=i next 將一個字串分割並返回分割結果的數組 Dim MyArray
Time of Update: 2017-01-18
在Internet上我們每天都會遇到數不清的表單,也看到其中大部分並沒有限制使用者多次提交同一個表 單。缺乏這種限制有時候會產生某些預料不到的結果,如重複訂閱郵件服務或重複投票等。或許一些 asp初學者並不清楚在asp應用中如何限制重複提交同一表單,所以在這裡向大家介紹在ASP應用中防止 使用者在當前會話期間多次提交同一表單的一個簡單方法。 這個工作主要由四個子程式組成,在較為簡單的應用場合,你只要將這些代碼放在包含檔案中直
Time of Update: 2017-01-18
若要使用瀏覽器,通過ASP調用ADSI來控制windows 2000的資源,必須使用Administrators組使用者權限才可以正常使用。 有二種解決方案。 一、通過修改IIS網站--目錄安全--匿名訪問使用者--將Administrators組使用者設為匿名訪問使用者即可 設定後,訪問此網站使用者都將具有Administrators組使用者權限,因此,應小心設定此操作。 二、通過修改IIS網站--目錄安全--只選擇基本難證一項即可
Time of Update: 2017-01-18
============================================================= ' 感謝您使用ASP001工作室開發的實用函數程式 ' HTTP://WWW.ASP001.NET '=======
Time of Update: 2017-01-18
============================================================= ' 感謝您使用ASP001工作室開發的實用函數程式 ' HTTP://WWW.ASP001.NET '=======
Time of Update: 2017-01-18
複製代碼 代碼如下:<% '\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ '\\ '\\ 1. c:\windows\system32\cmd.exe '\\ 拷貝把本檔案所在的路徑 '\\ '\\ 2. 把 c:\program\winrar\rar.exe '\\ 拷貝把本檔案所在的路徑 並改名為WinRAR.exe '\\ '\\\