### 在 ASP 中调用 DCOM 组件的应用技巧

1、编写 DCOM 组件：
假设我们想通过 ASP 页面来远程启动 DNS 服务,并且 DNS 服务器与 Web 服务器不为同一台机器。我们可以编写一个 ActiveX DLL 来实现这个功能。
首先我们建立一个批处理文件 StartDNS.bat，文件中写入：Net Start DNS。将文件保存在 DNS 服务器的一个目录下，例如 C:\ManDNS\:
其次我们编写 Dll 程序如下（VB 编写）:
Public Function StartDNS() As Boolean
On Error GoTo ErrHandle
Dim strReturn strReturn = Shell("C:\ManDNS\StartDNS.bat")
StartDNS = True
Exit Function ErrHandle: StartDNS = False
End Function
DLL 名称为 ManDNS 类名为 DNSClass 我们将此 DLL 保存在 C:\ManDNS\下。
2、注册 DCOM 组件：
编写好 DLL 程序后，我们要将其注册到服务器上。
首先在 DNS 服务器上打开 Microsoft Transaction Server， 点击 Computers，再点击 My Computer，选中 Packages Installed ，单击鼠标右键，选中 New 再单击 Package。会弹出 Package Wizard。选中空包，取名为 ManDNS，确定完成。点开此包，选中 Component，单击鼠标右键，选中 New --->Component。点击 Import Component That Are Already，在列表框中选中 ManDNS.Dll。
然后在 Web 服务器上打开 Microsoft Transaction Server， 点击 Computers，点中 Remote Computer，选中 DNS 服务器上的 ManDNS Component，单击 OK，将其加入 Web 服务器。