Microsoft® Visual Basic® Scripting Edition VBScript 與窗體 |
VBScript 教程 上一頁 | 下一頁 |
使用 Visual Basic Scripting Edition,您可以完成通常要在服務器上進行的大量窗體處理工作,也可以完成不能在服務器上進行的工作。這是一個簡單的客戶端驗證的樣例。HTML 代碼的結果是一個文本框和一個按鈕。如果使用 Microsoft® Internet Explorer 查看用以下代碼制作的頁面,您會看到一個旁邊帶有按鈕的小文本框。
這個文本框與 VBScript 頁面的簡單樣例中示例的不同之處在于文本框的 Value 屬性被用于檢查輸入值。要使用文本框的 Value 屬性,代碼必須引用文本框的名稱。<HTML> <HEAD><TITLE>簡單驗證</TITLE> <SCRIPT LANGUAGE="VBScript"> <!-- Sub Submit_OnClick Dim TheForm Set TheForm = Document.ValidForm If IsNumeric(TheForm.Text1.Value) Then If TheForm.Text1.Value < 1 Or TheForm.Text1.Value > 10 Then MsgBox "請輸入一個 1 到 10 之間的數字。" Else MsgBox "謝謝。" End If Else MsgBox "請輸入一個數字。" End If End Sub --> </SCRIPT> </HEAD> <BODY> <H3>簡單驗證</H3><HR> <FORM NAME="ValidForm"> 請輸入一個 1 到 10 之間的數字: <INPUT NAME="Text1" TYPE="TEXT" SIZE="2"> <INPUT NAME="Submit" TYPE="BUTTON" VALUE="提交"> </FORM> </BODY> </HTML>每次引用文本框時都應寫出全稱,即 Document.ValidForm.Text1。但是,當多次引用窗體控件時,可以按照以下步驟操作:首先聲明一個變量,然后使用 Set 語句將窗體 Document.ValidForm 賦給變量 TheForm,這樣就能使用 TheForm.Text1 引用文本框。常規(guī)的賦值語句(例如 Dim)在這里無效,必須使用 Set 來保持對對象的引用。
請注意以上示例直接檢測輸入值是否是一個數字:使用 IsNumeric 函數確定文本框中的字符串是否是一個數字。雖然 VBScript 能夠自動轉換字符串和數字,但檢測用戶輸入值的數據子類型,并且在必要時使用轉換函數始終是一個好的習慣。在用文本框的 Value 屬性進行加法運算時,應將它顯式地轉換為數字,這是因為加號 (+) 操作符不但可進行加法操作,而且可進行字符串連接操作。例如,如果 Text1 中包含“1”,Text2 中包含“2”,您將會看到以下結果:A = Text1.Value + Text2.Value ' A 為“12” A = CDbl(Text1.Value) + Text2.Value ' A 為 3
簡單驗證樣例使用的是普通按鈕控件。如果使用 Submit 控件,所有數據都會被立即傳送到服務器,示例將不會看到數據來進行檢查。避免使用 Submit 控件使您可以檢查數據,但不能向服務器提交數據。如果要提交數據則需要再添加一行代碼,如下所示:在數據輸入正確時,代碼調用窗體對象的 Submit 方法,將數據傳遞到服務器。除非在數據被傳遞到服務器之前判斷其正誤,否則服務器將處理數據,而不論其正確與否。您可以在 Internet Explorer Script Object Model 頁面上找到關于 Submit 方法和其他方法的全部信息。<SCRIPT LANGUAGE="VBScript"> <!-- Sub Submit_OnClick Dim TheForm Set TheForm = Document.ValidForm If IsNumeric(TheForm.Text1.Value) Then If TheForm.Text1.Value < 1 Or TheForm.Text1.Value > 10 Then MsgBox "請輸入一個 1 到 10 之間的數字。" Else MsgBox "謝謝。" TheForm.Submit ' 數據輸入正確,傳遞到服務器。 End If Else MsgBox "請輸入一個數字。" End If End Sub --> </SCRIPT>到目前為止,您只看到了標準 HTML <FORM> 對象。Internet Explorer 還可以使您利用 ActiveX™ 控件(以前稱為 OLE 控件)和 Java™ 對象的全部功能創(chuàng)建頁面。