其他

default.asp＜html＞＜head＞＜title＞星河影動之磁碟序號加密代碼存取管理＜/title＞＜/head＞＜% dim conn,fs,fSet conn = Server.CreateObject("ADODB.Connection")conn.open "driver={Microsoft Access Driver (*.mdb)};uid=;pwd=3302;dbq="&server.mappath("id.mdb")set

< %@ LANGUAGE="VBscript" % >< % Chunfeng=Request.Cookies("Chunfeng")' 初始設定頁面,讀取名字為Chunfeng的Cookie值.If Chunfeng ="" then' 判斷是否已經存在Cookie值. Response.Cookies("Chunfeng")="x" Response.Cookies("Chunfeng").Expires=#January 01, 2010#

如何終止瀏覽器的Cahce頁面？Function Redirect( NewURL ) If Not IsEmpty( NewURL & "" ) ThenDim QuestionMark QuestionMark = Instr( NewURL, "?" )If QuestionMark = 0 ThenResponse.Redirect NewURL & "?" & NoCacheURL()Response.End ElseResponse.Redirect

struserlist = struserlist & "<a href='#' nclick=\" & chr(34) &_"sendmsg('" & usernick & "');return false;\" & chr(34) &_" class='l_line'><span class=lineinfo>" & usernick & "</span></a>"'

如何編寫一個建立FTP網站的函數？Function ASTCreateFtpSite(IPAddress, RootDirectory, ServerComment, HostName, PortNum, Computer, Start,LogFileDirectory) Dim MSFTPSVC, FtpServer, NewFtpServer, NewDir Dim Bindings, BindingString, NewBindings, Index, SiteObj,

CreateObject 函數建立並返回對 Automation 對象的引用。CreateObject(servername.typename [, location])參數servername必選項。提供對象的應用程式名稱。typename必選項。要建立的物件類型或類。location可選項。對象所在的網路伺服器將被建立。說明Automation 伺服器至少提供一種物件類型。例如，文書處理應用程式可以提供應用程式物件、文檔對象和工具條對象。要建立 Automation 對象，將

CCur 函數返回運算式，此運算式已被轉換為 Currency 子類型的 Variant。CCur(expression)expression 參數是任意有效運算式。說明通常，您可以使用子類型資料轉換函式書寫代碼，以顯示某些操作的結果應當被表達為特定的資料類型，而非預設的資料類型。例如在整數運算的情況下，使用 CCur 函數強制進行貨幣計算。CCur 函數用於進行從其他資料類型到 Currency

DateValue 函數返回 Date 子類型的 Variant。DateValue(date)date 參數應是字串運算式，表示從 100 年 1 月 1 日到 9999 年 12 月 31 日中的一個日期。但是，date 也可以是表示上述範圍內的日期、時間或日期時間混合的任意運算式。說明如果 date 參數包含時間資訊，則 DateValue 不會返回時間資訊。但是如果 date 包含無效的時間資訊（如 "89:98"），就會出現錯誤。如果 date

GetLocale 函數返回目前範圍設定 ID 值。GetLocale()說明locale 是使用者參考資訊集合，與使用者的語言、國家和文化傳統有關。locale 決定鍵盤配置、字母排序次序和日期、時間、數字與貨幣格式。傳回值可以是任意一個 32-位 的值，如 地區設定識別碼所示：下面舉例說明 GetLocale 函數的用法。要使用該代碼，請複製標準HTML 檔案中 <BODY&gtl 標誌之間的所有內容。Enter Date in UK format: <input

GetObject 函數返回對檔案中 Automation 對象的引用。GetObject([pathname] [, class])參數Pathname可選項。字串，包含待檢索對象的檔案的完整路徑和名稱。如果省略 pathname 則必須有 class。Class可選項。字串，對象的類。class 參數的文法格式為 appname.objectype，其中包括以下部分：參數appname必選項。字串，提供對象的應用程式名稱。objectype必選項。字串，要建立的對象的類型或類。說明使用

Array 函數返回包含數組的 Variant。 Array(arglist)arglist 參數是賦給包含在 Variant 中的數組元素的值的列表（用逗號分隔）。如果沒有指定此參數，則將會建立零長度的數組。 說明用於引用數組元素的表示符，由跟隨有括弧的變數名組成，括弧中包含指示所需元素的索引號。在下面的樣本中，第一條語句建立名為 A 的變數。第二條語句將一個數組賦值給變數 A。最後一條語句將包含在第二個數組元素中的值賦值給另一個變數。 Dim AA = Array(10,20,30)B =

GetRef 函數返回一個指向一過程的引用，此過程可綁定某事件。Set object.eventname = GetRef(procname)參數object必選項。事件所關聯的對象的名稱。eventname必選項。要與函數綁定的事件的名稱。procname必選項。該字串中包含 Sub 或 Function 過程的名稱，該過程與事件關聯。說明GetRef 函數可以用來將 VBScript 過程 (Function 或 Sub） 與 DHTML

Sin 函數返回某個角的正弦值。Sin(number)number 參數可以是任何將某個角表示為弧度的有效數值運算式。說明Sin 函數取某個角並返回直角三角形兩邊的比值。此比值是直角三角形中該角的對邊長度與斜邊長度之比。結果的範圍在 -1 到 1 之間。將角度乘以 pi/180 即可轉換為弧度，將弧度乘以 180/pi 即可轉換為角度。下面例子利用 Sin 返回角度的正弦：Dim MyAngle, MyCosecantMyAngle = 1.3 '

Mid 函數從字串中返回指定數目的字元。Mid(string, start[, length])參數string字串運算式，從中返回字元。如果 string 包含 Null，則返回 Null。Startstring 中被提取的字元部分的開始位置。如果 start 超過了 string 中字元的數目，Mid 將返回零長度字串 ("")。Length要返回的字元數。如果省略或 length 超過文本的字元數（包括 start 處的字元），將返回字串中從 start 到字串結束的所有字元。說明要判斷

InStr 函數返回某字串在另一字串中第一次出現的位置。InStr([start, ]string1, string2[, compare])參數start可選項。數值運算式，用於設定每次搜尋的開始位置。如果省略，將從第一個字元的位置開始搜尋。如果 start 包含 Null，則會出現錯誤。如果已指定 compare，則必須要有 start 參數。string1必選項。接受搜尋的字串運算式。string2必選項。要搜尋的字串運算式。compare可選項。指示在計運算元字串時使用的比較類型的數值。

Left 函數返回指定數目的從字串的左邊算起的字元。Left(string, length)參數string字串運算式，其最左邊的字元被返回。如果 string 參數中包含 Null，則返回 Null。Length數值運算式，指明要返回的字元數目。如果是 0，返回零長度字串 ("")；如果大於或等於 string 參數中的字元總數，則返回整個字串。說明可使用 Len 函數確定 string 參數中的字元數目。下面的樣本利用Left 函數返回MyString 的左邊三個字母：Dim

WeekDayName 函數返回一個字串，表示星期中指定的某一天。WeekdayName(weekday, abbreviate, firstdayofweek)參數weekday必選項。星期中某天的數值定義。各天的數值定義取決於 firstdayofweek 參數設定。Abbreviate可選項。Boolean 值，指明是否縮寫表示星期各天的名稱。如果省略， 預設值為

Matches 集合Regex Match 對象的集合。 說明Matches 集合中包含若干獨立的 Match 對象，只能使用 RegExp 對象的 Execute 方法來建立之。與獨立的 Match 對象屬性相同，Matches `集合的一個屬性是唯讀。在執行Regex時，可能產生零個或多個 Match 對象。每個 Match 對象都提供了與Regex匹配的字串的訪問入口、字串的長度，以及標識匹配位置的索引。下面的代碼將說明如何使用Regex尋找獲得 Matches

Number 屬性返回或設定數值指定錯誤。Number 是 Err 對象的預設屬性。object.Number [= errornumber]參數objectErr 對象。errornumber表示 VBScript 錯誤編號或 SCODE 錯誤值的整數。說明從 Automation 對象返回使用者定義錯誤時，將選定數字作為錯誤碼添加到常數 vbObjectError 以設定 Err.Number。下面代碼舉例說明如何使用 Number 屬性 On Error Resume

Erase 語句重新初始化固定大小數組的元素，並釋放動態數組的儲存空間。Erase arrayarray 參數是要清除的陣列變數的名稱。說明判斷數組是固定長度數組（常規）還是動態數組是很重要的，這是因為 Erase 要根據數組的類型進行不同的操作。Erase 無需為固定大小的數組還原記憶體。Erase 按照下表設定固定數組的元素：數組的類型Erase 對固定數組元素的影響固定數值數組將每個元素設定為 0。固定字串數組將每個元素設定為零長度字串 ("")。對象數組將每個元素設定為特殊值