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