模板
教程
環境
性能
功能
管理
使用COM 組件
COM（Component Object Model），一種對象的格式。凡是依照COM 的規格所制作出來的組件，皆可以提供功能讓其它程序或組件所使用。要使用COM 組件，可以使用Server 對象的CreateObject、CreateObjectFromClsid、CreateObjectStatic 這三種方法。但是若要建立有使用者接口的COM 組件（就是ActiveX 控件，另一種規格的COM 組件），則必須使用<Object> 標注。CreateObject 和CreateObjectStatic 使用方式一樣，我們只要傳入ProgId（用來識別COM組件的唯一代碼，每一個組件皆不同）即可；而CreateObjectStatic 方法則是傳入代表這個COM組件的ProgId（COM 組件在操作系統里的名稱）。其語法如下所示：
對象變量=Server.CreateObject("ProgId")
對象變量=Server.CreateObjectStatic("ProgId")
對象變量=Server.CreateObjectFromClsid("ClsId")
下列范例建立一個可以存取檔案的FileSystemObject 對象，并讀取一個文字文件。以下為文字文件內容：
使用檔案系統對象來讀取存在磁盤的文件
案記得將換行字符改成HTML 的斷行字符程序內容如下所示：
<Html>
<Script Language="VB" Runat="Server">
Sub Page_Load(Sender As Object,e As Eventargs)
Dim Content As String
Dim objFile As Object
fsoA=Server.CreateObject("Scripting.FileSystemObject")
objFile=fsoA.OpenTextFile(Server.MapPath("TextFile.txt"),1,False)
If objFile.AtEndOfStream=False Then
Content=objFile.ReadAll
Content=Replace(Content,Chr(13),"<Br>")
Response.Write(Content)
End If
End Sub
</Script>
</Html>
上述程序代碼中我們建立一個名為fsoA 的FileSystemObject 對象，然后用fsoA 對象的OpenTextFile 方法來開啟文字文件。因為OpenTextFile 的傳回值是TextStream 對象，所以使用一個對象變量objFile 來接收。接下來判斷objFile 對象的AtEndOfStream 屬性，若為True 代表已經到達檔案的結尾位置，則不做任何動作。接下來使用objFile 對象的ReadAll 方法將檔案內容全部讀出到字符串變量Content 內，然后將Content 內的斷行字符VbCrLf 轉換為HTML 斷行標注<Br> 后輸出Content 的內容。上述程序將CreateObject 改為CreateObjectFromClsId方法，并將傳入檔案對象的Clsid「0D43FE01-F093-11CF-8940-00A0C9054228」，最后的結果都是一樣的。
<Html>
<Script Language="VB" Runat="Server">
Sub Page_Load(Sender As Object,e As Eventargs)
Dim Content As String
Dim objFile As Object
fsoA=Server.CreateObjectFromClsid("0D43FE01-F093-11CF-8940-00A0C90542
28")
objFile=fsoA.OpenTextFile(Server.MapPath("TextFile.txt"),1,False)
If objFile.AtEndOfStream=False Then
Content=objFile.ReadAll
Content=Replace(Content,Chr(13),"<Br>")
Response.Write(Content)
End If
End Sub
</Script>
</Html>
