查人人中国名人网竞选班委的自我介绍:asp如何检验xml的有效性
来源：百度文库 编辑：查人人中国名人网 时间：2024/07/06 17:25:48
function CheckXML(XmlPath)
CheckXML=true
on error resume next
dim strSourceFile,strError
strSourceFile = Server.MapPath(XmlPath)
Set XMLMorntekDocument = Server.CreateObject("Microsoft.XMLDOM")
XMLMorntekDocument.async = false
XMLMorntekDocument.load(strSourceFile)
errorcode=XMLMorntekDocument.parseerror.errorcode
If Err Then
CheckXML=false
Err.clear
end if
end function
那个要用Schema来做的