在这个DLL文件中，有引用 C:\WINDOWS\system32\msxml.dll Microsoft XML, version 2.0 的DLL文件。objxmlDOM.dll里面有这幺一个函数：

Public Function blnChkXmlFile(loXmlDoc As DOMDocument, ByVal lstrFileName As String) As Boolean
blnChkXmlFile = False

loXmlDoc.async = False
loXmlDoc.validateOnParse = False
If Dir(lstrFileName, vbNormal) <> "" Then
loXmlDoc.Load (lstrFileName)
If loXmlDoc.readyState = 4 And loXmlDoc.parseError = 0 Then
blnChkXmlFile = True
End If
End If
End Function

编译成DLL文件后，copy到C:\WINDOWS\system32目录下面注册。注册是成功的。

我在VBSCRIPT里面调用它。
SET xmlcls =CreateObject("objxmlDOM.XmlDOM")

Set xmldoc =CreateObject("MSXML.DOMDocument")

Flag=xmlcls.blnChkXmlFile(xmldoc, "C:\DTD\TEST.DI")

老是提示形态不符合的错误，请问为什幺？高手帮帮忙，先谢谢了。