Foxtable(狐表)用户栏目专家坐堂 → xml文件格式问题


  共有2273人关注过本帖树形打印复制链接

主题:xml文件格式问题

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/7/23 17:23:00 [显示全部帖子]

1、你可以安装一个notepad++然后打开查看;

 

2、你可以直接用浏览器打开查看。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/7/23 19:52:00 [显示全部帖子]

你安装了NotePad++了吗?我打开没问题

  


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180723195126.jpg
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/7/24 9:11:00 [显示全部帖子]

1、另存为 unicode或者utf8 格式的文件,然后用浏览器打开,可以正常显示xml文件;

 

2、其它软件无法识别的话,是其自身的问题。如果你确实需要格式化,参考下面代码

 

Dim jo As New XObject
jo("Name") = "张三"
jo("Group") = "VIP"
jo("Type") = 2
jo("Default") = False
Dim xml = jo.ToXML

Dim xd As System.XML.XmlDocument
xd = New System.XML.XmlDocument
xd.LoadXml(xml)
Dim sb As StringBuilder = New StringBuilder
Dim sw As io.StringWriter = New io.StringWriter(sb)
Dim xtw As System.XML.XmlTextWriter = Nothing
Try
    xtw = New System.XML.XmlTextWriter(sw)
    xtw.Formatting = System.XML.Formatting.Indented
    xtw.Indentation = 1
    xtw.IndentChar = vbTab
    xd.WriteTo(xtw)
Finally
    If xtw IsNot Nothing Then xtw.Close()
End Try

Return sb.ToString()

 


 回到顶部