VBScript教程 第十四課在VBScript中使用對象
更新時間:2006年11月16日 00:00:00 作者:
使用對象
無論使用的是 ActiveX? 控件(以前稱為 OLE 控件)還是 Java? 對象,Microsoft Visual Basic Scripting Edition 和 Microsoft? Internet Explorer 都以相同的方式處理它們。如果您使用的是 Internet Explorer 并且 ActiveX 庫中安裝了這些控件,就會看到由以下代碼制作的頁面。
<OBJECT> 標(biāo)記用來包含對象,<PARAM> 標(biāo)記用來設(shè)置對象屬性的初始值。使用 <PARAM> 標(biāo)記類似于在 Visual Basic 中設(shè)置窗體控件的初始屬性值。例如,以下代碼使用 <OBJECT> 和 <PARAM> 標(biāo)記將 ActiveX 標(biāo)簽控件添加到頁面中:
<OBJECT
classid="clsid:99B42120-6EC7-11CF-A6C7-00AA00A47DD2"
id=lblActiveLbl
width=250
height=250
align=left
hspace=20
vspace=0
>
<PARAM NAME="Angle" VALUE="90">
<PARAM NAME="Alignment" VALUE="4">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="Caption" VALUE="一個簡單標(biāo)簽">
<PARAM NAME="FontName" VALUE="宋體">
<PARAM NAME="FontSize" VALUE="20">
<PARAM NAME="FontBold" VALUE="1">
<PARAM NAME="FrColor" VALUE="0">
</OBJECT>
象對任何窗體控件一樣,可以獲取屬性、設(shè)置屬性和調(diào)用方法。例如,以下代碼包含 <FORM> 控件,可用其對標(biāo)簽控件的兩個屬性進行操作:
<FORM NAME="LabelControls">
<INPUT TYPE="TEXT" NAME="txtNewText" SIZE=25>
<INPUT TYPE="BUTTON" NAME="cmdChangeIt" VALUE="更改文本">
<INPUT TYPE="BUTTON" NAME="cmdRotate" VALUE="旋轉(zhuǎn)標(biāo)簽">
</FORM>
通過定義過的窗體,cmdChangeIt 按鈕的事件過程可更改標(biāo)簽文本:
<SCRIPT LANGUAGE="VBScript">
<!--
Sub cmdChangeIt_onClick
Dim TheForm
Set TheForm = Document.LabelControls
lblActiveLbl.Caption = TheForm.txtNewText.Value
End Sub
-->
</SCRIPT>
代碼將對控件和值的引用限定在窗體中,這與簡單驗證示例中的代碼類似。
ActiveX 庫中有多個 ActiveX? 控件可用于 Internet Explorer。您可以在那里找到關(guān)于屬性、方法和事件的全部信息,也可以在編程參考頁面上找到關(guān)于控件類標(biāo)識符 (CLSID) 的信息。另外還可以在 Internet Explorer 4.0 Author's Guide and HTML Reference 頁面上找到有關(guān) <OBJECT> 標(biāo)記的詳細信息。
-----------------------------------------------------------------------
注意 Internet Explorer 的早期版本要求用大括號 ({}) 將 classid 屬性括起來,不符合 W3C 規(guī)格。在當(dāng)前版本中使用大括號則會產(chǎn)生"此頁使用了過期版本的 <OBJECT> 標(biāo)記"信息。
無論使用的是 ActiveX? 控件(以前稱為 OLE 控件)還是 Java? 對象,Microsoft Visual Basic Scripting Edition 和 Microsoft? Internet Explorer 都以相同的方式處理它們。如果您使用的是 Internet Explorer 并且 ActiveX 庫中安裝了這些控件,就會看到由以下代碼制作的頁面。
<OBJECT> 標(biāo)記用來包含對象,<PARAM> 標(biāo)記用來設(shè)置對象屬性的初始值。使用 <PARAM> 標(biāo)記類似于在 Visual Basic 中設(shè)置窗體控件的初始屬性值。例如,以下代碼使用 <OBJECT> 和 <PARAM> 標(biāo)記將 ActiveX 標(biāo)簽控件添加到頁面中:
<OBJECT
classid="clsid:99B42120-6EC7-11CF-A6C7-00AA00A47DD2"
id=lblActiveLbl
width=250
height=250
align=left
hspace=20
vspace=0
>
<PARAM NAME="Angle" VALUE="90">
<PARAM NAME="Alignment" VALUE="4">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="Caption" VALUE="一個簡單標(biāo)簽">
<PARAM NAME="FontName" VALUE="宋體">
<PARAM NAME="FontSize" VALUE="20">
<PARAM NAME="FontBold" VALUE="1">
<PARAM NAME="FrColor" VALUE="0">
</OBJECT>
象對任何窗體控件一樣,可以獲取屬性、設(shè)置屬性和調(diào)用方法。例如,以下代碼包含 <FORM> 控件,可用其對標(biāo)簽控件的兩個屬性進行操作:
<FORM NAME="LabelControls">
<INPUT TYPE="TEXT" NAME="txtNewText" SIZE=25>
<INPUT TYPE="BUTTON" NAME="cmdChangeIt" VALUE="更改文本">
<INPUT TYPE="BUTTON" NAME="cmdRotate" VALUE="旋轉(zhuǎn)標(biāo)簽">
</FORM>
通過定義過的窗體,cmdChangeIt 按鈕的事件過程可更改標(biāo)簽文本:
<SCRIPT LANGUAGE="VBScript">
<!--
Sub cmdChangeIt_onClick
Dim TheForm
Set TheForm = Document.LabelControls
lblActiveLbl.Caption = TheForm.txtNewText.Value
End Sub
-->
</SCRIPT>
代碼將對控件和值的引用限定在窗體中,這與簡單驗證示例中的代碼類似。
ActiveX 庫中有多個 ActiveX? 控件可用于 Internet Explorer。您可以在那里找到關(guān)于屬性、方法和事件的全部信息,也可以在編程參考頁面上找到關(guān)于控件類標(biāo)識符 (CLSID) 的信息。另外還可以在 Internet Explorer 4.0 Author's Guide and HTML Reference 頁面上找到有關(guān) <OBJECT> 標(biāo)記的詳細信息。
-----------------------------------------------------------------------
注意 Internet Explorer 的早期版本要求用大括號 ({}) 將 classid 屬性括起來,不符合 W3C 規(guī)格。在當(dāng)前版本中使用大括號則會產(chǎn)生"此頁使用了過期版本的 <OBJECT> 標(biāo)記"信息。
相關(guān)文章
使用批處理文件異地備份數(shù)據(jù)庫(最近幾天的數(shù)據(jù))
數(shù)據(jù)庫異地備份對一個網(wǎng)站來說是非常必要的,這里談一下使用批處理文件對數(shù)據(jù)庫異地本份的過程2006-06-06用vbscript實現(xiàn)將腳本的輸出復(fù)制到剪貼板
用vbscript實現(xiàn)將腳本的輸出復(fù)制到剪貼板...2007-04-04VBS中通過調(diào)用CAPICOM對象實現(xiàn)SHA1&MD5加密
MD5算法的VBS代碼在網(wǎng)上可以找到很多,這些代碼都是按照“算法”寫出來的,所以都很長,更重要的是,找不到SHA1算法的VBS實現(xiàn)。2011-01-01VBS基礎(chǔ)篇 - vbscript class類的定義與使用
vbs Class就是聲明一個類的名稱,以及組成該類的變量、屬性和方法的定義,需要的朋友可以參考下2018-05-05VBS教程:VBScript 基礎(chǔ)-VBScript 變量
VBScript只有一種數(shù)據(jù)類型 —— Variant,它是根據(jù)上下文來判斷是數(shù)字還是字符串。因為Variant是VBScript中唯一的數(shù)據(jù)類型,所以它也是VBScript中所有函數(shù)的返回值的數(shù)據(jù)類型2006-11-11