使用DTD验证XML文档

这本来应该不是一个困难的事情。但是,比较“无奈”的地方在于,必须在待验证的XML文档内部声明一个“DOCTYPE”引用DTD文件才可以验证。所以,更麻烦的问题在于需要为没有声明这个DOCTYPE的XML文档添加上这个声明。我还没有找到更好的办法。说明一下Context,需要执行此操作的是一个ASP.NET WebForm,XML文档来自于客户端上传的文件,而DTD文件位于服务器上。

下面说明一下具体的做法,虽然我最喜欢C#,但无奈于当前的Web项目必须使用VB.NET,因此这里的代码都是VB.NET。

首先,用XmlDocument对象加载客户端上传上来的XML文档流:

Dim doc As XmlDocument = New XmlDocument()
Try
    doc.Load(fu.FileContent)
Catch ex As Exception
    errMsg.Text 
= ex.Message
    
Return False
    
Exit Function
End Try

 

然后利用XmlDocument对象的InsertBefore对象插入需要的DOCTYPE:

doc.InsertBefore(doc.CreateDocumentType("importfile"Nothing, MapPath("dtdspec.dtd"), Nothing), doc.DocumentElement)

 

 

将添加了DOCTYPE之后的XML文档保存到内存流中,并要记得把内存流的Position归零:

Dim xmlStreamWithDTD As System.IO.MemoryStream
xmlStreamWithDTD 
= New System.IO.MemoryStream()
doc.Save(xmlStreamWithDTD)
xmlStreamWithDTD.Position 
= 0

 

最后利用XMLReader对象配合相应的设置,将内存流中的XML文档重新遍历一遍,进而得以验证XML文档是否符合DTD的定义:

 

Dim settings As XmlReaderSettings = New XmlReaderSettings()
settings.ProhibitDtd 
= False
settings.ValidationType 
= ValidationType.DTD
Dim reader As XmlReader = XmlReader.Create(xmlStreamWithDTD, settings)
Try
    
While reader.Read()
    
End While
Catch ex As Exception
    errMsg.Text 
= ex.Message
End Try

 

收工。 

 这么搞的问题在于内存要用两份,文档要遍历2遍,的确不是一个好办法,暂时只能这么样了,期待更好的做法。

posted on 2010-02-04 17:29  零度的火  阅读(361)  评论(0编辑  收藏  举报

导航