XMLDLL操作说明文档(四)

来源:互联网 发布:java什么是进程和线程 编辑:程序博客网 时间:2024/06/05 22:48
'xmltotable示例      Dim myxml1 As New mydll("d:\iceou.xml")        myxml1.XMLFile_Format("d:\iceou.xml")        Dim myxml As New mydll("d:\iceou.xml")        Dim nt As New Xml.NameTable        Dim nsmgr As New Xml.XmlNamespaceManager(nt)        nsmgr.AddNamespace("SOAP-ENV", "http://schemas.xmlsoap.org/soap/envelope/")        nsmgr.AddNamespace("SOAP-ENC", "http://schemas.xmlsoap.org/soap/encoding/")        nsmgr.AddNamespace("xsi", "http://www.w3.org/2001/XMLSchema-instance")        nsmgr.AddNamespace("xsd", "http://www.w3.org/2001/XMLSchema")        nsmgr.AddNamespace("m", "http://webservice.clini.org/")        DataGridView1.DataSource = myxml.xmlToTable("m:getInHospType", , nsmgr)‘xmltotree示例   Dim nt As New Xml.NameTable        Dim m_xmldll As New mydll("d:\test1.xml")        Dim nsmgr As New Xml.XmlNamespaceManager(nt)        nsmgr.AddNamespace("SOAP-ENV", "http://schemas.xmlsoap.org/soap/envelope/")        nsmgr.AddNamespace("m", "http://webservice.clini.org/")        'm_xmldll.xmltotreeview("arg0", TreeView1)        'm_xmldll.m_treeview = TreeView1        m_xmldll.xmlToTreeview("SOAP-ENV:Envelope", TreeView1, "", nsmgr, ImageList1)
下载:

以上已做了优化和变动,请参看另一篇文章
点击打开链接
0 0
原创粉丝点击