包含一個(gè)完整的 Windows 腳本部件定義。
<component id=componentid> 此處為腳本部件信息 </component>
如果指定了這個(gè)標(biāo)識(shí)符,則在主機(jī)應(yīng)用程序內(nèi)這個(gè)值將作為該腳本部件的類(lèi)名稱(chēng)。例如,如果在 <component> 元素內(nèi)將腳本部件 ID 指定為 “MyComponent”,則在 Visual Basic 對(duì)象瀏覽器內(nèi)該腳本部件就標(biāo)識(shí)為 MyComponent 類(lèi)。如果沒(méi)有指定腳本部件 ID,缺省值為 ComponentCoClass。
在腳本部件文件內(nèi),完整的腳本部件定義 包括 <registration>、<public> 以及 <implements> 元素 必須位于 <component> 元素內(nèi)。如果該文件包含多個(gè)腳本部件,它們必須包含在一個(gè) <package> 元素內(nèi)。
下面演示了一個(gè)簡(jiǎn)單而完整的腳本部件,其中包括一個(gè) factorial 方法和一個(gè) name 屬性。
注意 CDATA 項(xiàng)是必需的,以使 <script> 元素中的腳本成為不透明的。詳細(xì)信息請(qǐng)參閱腳本部件文件和 XML 一致性。
<?XML version="1.0"?>
<component>
<registration>
description="My Test Component"
progid="Component.TestScript"
version="1"
classid="{2154c700-9253-11d1-a3ac-0aa0044eb5f}"
</registration>
<public>
<property name="name"/>
<method name="factorial"/>
</public>
<script language="VBScript">
<![CDATA[
Function factorial(n)
If isNumeric(n) Then
If n <= 1 Then
factorial = 1
Else
factorial = n*factorial(n-1)
End If
Else
factorial = -2 '錯(cuò)誤代碼。
End If
End Function
]]>
</script>
</component>