包括一個外部類型庫的引用。
<reference [object="progID" |guid="typelibGUID"] [version="version"]>
如果指定了 object 屬性,則不能再指定 guid 屬性。
在腳本部件中引用類型庫使您可以在腳本中使用在該類型庫中定義的常數(shù)。<reference> 元素查找并使指定程序 ID 或類型庫名稱所關(guān)聯(lián)的類型庫成為可用的。類型庫信息可以在 .tlb、.olb 或 .dll 文件中獲得。
<reference> 元素應(yīng)出現(xiàn)在 <component> 元素內(nèi)。如果在程序包中有多個腳本部件,該類型庫只能應(yīng)用于在 <component> 元素中聲明了這個類型庫的 腳本部件。
在下面的腳本部件片段中,通過引用 ADO 的類型庫(包含在 MSAD015.DLL 文件中),就可以在腳本中使用諸如 adStateOpen 這些 ADO 常數(shù)。
注意 CDATA 項是必需的,以使 <script> 元素中的腳本成為不透明的。詳細信息請參閱腳本部件文件和 XML 一致性。
<reference object="ADODB.Connection.2.0"/>
<registration progid="ADOScriptlet"/>
<public>
<property name="cnnstate"/>
<method name="openConnection"/>
<method name="closeConnection"/>
</public>
<script language="VBScript">
<![CDATA[
Dim cnn
Dim cnnState
Function openConnection()
Set cnn = CreateObject("ADODB.Connection")
cnn.ConnectionString =
"driver={SQL Server};server=myserver;uid=sa;database=pubs"
cnn.Open
If cnn.State = adStateOpen Then
cnnState = "open"
Else
cnnState = "closed"
End If
End Function
Function closeConnection()
cnn.Close
cnnState = "closed"
End Function
]]>
</script>