ASP

1、'UTF轉GB---將UTF8編碼文字轉換為GB編碼文字 複製代碼 代碼如下: function UTF2GB(UTFStr) for Dig=1 to len(UTFStr) '如果UTF8編碼文字以%開頭則進行轉換 if mid(UTFStr,Dig,1)="%" then 'UTF8編碼文字大於8則轉換為漢字 if len(UTFStr) >= Dig+8 then GBStr=GBStr & ConvChinese(mid(UTFStr,Dig,9)) Dig=Dig+8

FSO檔案（File）對象屬性 DateCreated 返回該檔案夾的建立日期和時間 DateLastAccessed 返回最後一次訪問該檔案的日期和時間 DateLastModified 返回最後一次修改該檔案的日期和時間 Drive 返回該檔案所在的磁碟機的Drive對象 Name 設定或返迴文件的名字 ParentFolder 返回該檔案的父資料夾的Folder對象 Path 返迴文件的絕對路徑，可使用長檔名 ShortName 返回DOS風格的8.3形式的檔案名稱 ShortPath

1、ASP兩種簡單的產生靜態首頁的方法 為什麼要產生靜態首頁？ 1、如果你首頁讀取的資料庫次數比較多，速度很慢，而且佔用很多伺服器資源。使用靜態頁面訪問速度當然快多了 2、搜尋引擎容易搜尋到 3、如果程式出問題，也能保證首頁能訪問。 4、其他的太多，自己想：） 應用方式： 如果你的首頁是index.asp,你可以產生index.htm （預設訪問順序必須是index.htm,index.asp）。這樣訪問者第一次訪問到你的網站的時候開啟的是index.htm

但也許是隨著asp的逐漸淡出web開發，官方僅提供了.net、php等版本的上傳處理常式，對於asp開發人員來說則需要自行處理伺服器端的資料接收。

最簡單的調用方法： response.write SmartHttp("http://www.baidu.com/").send().gettext() 複雜調用 set myhttp = SmartHttp("http://www.baidu.com/s","GET") myhttp.dataset.append "wd","smarthttp" myhttp.send() response.write myhttp.gettext("gbk") 複製代碼 代碼如下: <script

下面給出4個函數，足夠你抵擋一切SQL注入漏洞！讀懂代碼，你就能融會貫通。 注意要對所有的request對象進行過濾：包括 request.cookie, request.ServerVariables 等等容易被忽視的對象： 複製代碼 代碼如下: function killn(byval s1) '過濾數值型參數 if not isnumeric(s1) then killn=0 else if s1<0 or s1>2147483647 then killn=0 else

複製代碼 代碼如下: <% Option Explicit ' 顯示聲明 Class Com_GifCode_Class ''''''''''''''''''''''''''''''''''''''''''''' ' Author: Layen support@ssaw.net 84815733(QQ) ' Thanks: Laomi, Laomiao, NetRube ' 2006-01-02 '''''''''''''''''''''''''''''''''''''''''''''

這些大都是與硬體相關。其實在軟體上，好的程式設計的方法和正確的參數配置也可以提高程式的效能，有時 在同等情況下只要改變一個參數，程式執行效率就能大大提高。本文就試著在這方面做些探索。 　　一.影響效能的因素 ASP程式啟動並執行效能主要決定於以下2個大方面： 1.HTML頁面的執行效率 2.反應時間，其中反應時間主要受制於下面要素： (1).ASP頁面的執行效率 (2).資料庫因素 下面我們就來詳細討論一下。 　　二.詳細討論 1.影響HTML的因素 HTML頁面的執行效率是一個純用戶端的問題。

這要用到計劃任務，首先假定你這個程式的地址為“http://1.0.0.8/a.asp”，那麼你編輯如下內容： 複製代碼 代碼如下: Dim IE Set IE = CreateObject("InternetExplorer.Application") ie.navigate("http://1.0.0.8/a.asp") ie.visible=1 Set IE = Nothing 儲存成一個vbs尾碼的檔案，比如test.vbs。 在windows的管理工具——服務中啟動“計劃任務”服務。

這個例子使用文字檔來寫入使用者的資訊建立一個logfile.asp放在每一個asp的頁面的頂端<!--#Include File="LogFile.asp"-->當有人來訪問你的網站logfile.asp自動把他的資訊寫入LogFile.txt,如果相關的URl一樣的話則不寫入檔案 File: LogFile.asp 複製代碼 代碼如下: <% Dim ValidEntry ' Log variable ' First set that this log is valid

複製代碼 代碼如下: <% '---------------------------------------------------------------- '程式簡介: 完成asp語言對XML文檔中指定節點文本的增加、刪除、修改、查看 '入口參數: 無 '出口參數: 無 '------------------------------------------------ '函數名字：ConnectXml() '入口參數: filename 需要串連或開啟的xml檔案名稱 '出口參數:

asp解碼url 複製代碼 代碼如下: <a href="1.asp?action=<%=server.urlencode("你好")%>">asdf</a> 解碼函數 [code] <% Function URLDecode(enStr) dim deStr,strSpecial dim c,i,v deStr="" strSpecial="!""#$%&'()*+,.-_/:;<=>?@[\]^`{|}~%" for i=1 to

1.首先，我們需要過濾所有用戶端提交的內容,其中包括?id=N一類,另外還有提交的html代碼中的操作資料庫的select及asp檔案操作文法,大家可以把提交的字元轉義,然後再存入資料庫。 2.然後需要對訪問Access資料庫的頁面進行授權,針對顯示資料頁面只能使用select語句,過濾其他的update,asp檔案則分為許可訪問資料庫頁面和限制訪問頁。 3.修改數庫據串連檔案名稱conn.asp為類似123ljuvo345l3kj34534v.asp檔案。 4.修改資料庫名為類似q39

複製代碼 代碼如下:<%@LANGUAGE="JAVASCRIPT"%> <title>Google PR值查詢　asp程式</title> <% function hexdec(str) { return parseInt(str,16); } function zeroFill(a,b) { var z = hexdec(80000000); if (z & a) { a = a>>1; a &= ~z; a |= 0x40000000;

最近因為項目代碼重構需要重新整理使用者登入和許可權控制的部分，現有的代碼大體是參照了.NET的FORM認證，並結合了PORTAL

複製代碼 代碼如下: '排序 Function Sort1(ary) Dim KeepChecking,I,FirstValue,SecondValue KeepChecking = TRUE Do Until KeepChecking = FALSE KeepChecking = FALSE For I = 0 to UBound(ary) If I = UBound(ary) Then Exit For If ary(I) > ary(I+1) Then FirstValue =

有三種主要的錯誤類型： １．編譯錯誤： 這種錯誤出現一般都是代碼的文法問題。因為編譯錯誤而導致辭ASP停止運行。 ２．運行錯誤： 這個錯誤是發生在你準備運行ASP時的。例如：如果你試圖給一個變數賦值，但是卻超出了該變數允許的範圍。 ３．邏輯錯誤： 邏輯錯誤是最難被發現的，這種錯誤經常是一種結構錯誤，電腦是發現不了的。這就需要我們徹頭徹尾地檢查我們的代碼。

複製代碼 代碼如下: <!-- #include file="../conn.asp" --> <!-- #include file="../cls_main.asp" --> <html> <head> <meta http-equiv="Content-Language" content="zh-cn"> <meta http-equiv="Content-Type" content="text/html;

本文執行個體講述了ASP.NET中Dictionary基本用法。分享給大家供大家參考，具體如下：//Dictionary位於System.Collections.Generic命名空間之下/* * 使用Dictionary之前必須引用System.Collections.Generic命名空間； * 使用Dictionary時必須聲明其鍵和值的資料類型（可以為任意類型）；

複製代碼 代碼如下: public function fillzero(l1) if len(l1)=1 then fillzero="0"&l1 else fillzero=l1 end if end function 用法樣本： 複製代碼 代碼如下: response year(now)&month(now)&day(now) 結果:201116 response year(now)&fillzero(month(now))&fillzero(day(now)) 顯示結果:20110106