- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 读取xml文件 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=151737)
-- 发布时间：2020/7/2 14:39:00
-- 读取xml文件
我要从这个xml文件中读“<TONGZHISMC>国际检索报告</TONGZHISMC>”中间的“国际检索报告”。
因为每个xml文件的结构都不一样，但是都有“<TONGZHISMC>”这个值。
我以前是找<TONGZHISMC>和</TONGZHISMC>的位置，然后用substring来得到“国际检索报告”。
不知道为什么遇到这个文件就出故障了。</TONGZHISMC>的位置老是返回-1。
恳请老师指导，有其他的方式也可以。谢谢。
-- 发布时间：2020/7/2 15:00:00
--
Dim xml As String = FileSys.ReadAllText("E:\\问题\\filelist.txt")
Dim xo As Foxtable.XObject = Foxtable.XObject.Parse(xml)
Output.Show(xo.Tostring)
For Each bm As object In xo("TONGZHIS")
Output.Show(bm("TONGZHISMC"))
Next
-- 发布时间：2020/7/2 17:09:00
--
TONGZHIS不一定有，不想针对每个XML写一个函数
-- 发布时间：2020/7/2 17:16:00
--
判断一下
if xo("TONGZHIS") isnot nothing then