以文本方式查看主题

-  爱心论坛  (http://zqax.net/bbs/index.asp)
--  平面设计 网页设计  (http://zqax.net/bbs/list.asp?boardid=43)
----  [原创][科讯使用心得]读取XML文件指定节点内容  (http://zqax.net/bbs/dispbbs.asp?boardid=43&id=1883180)
--  作者：明天我休息
--  发布时间：2018/10/31 8:48:56
--  [原创][科讯使用心得]读取XML文件指定节点内容

  Function GetXmlFile(Condition)
    Dim Doc:Set Doc = CreateObject("msxml2.FreeThreadedDOMDocument" & MsxmlVersion)
    Doc.async = false
 Doc.setProperty "ServerHTTPRequest", true
 Doc.load(Server.MapPath("路径+文件名"))
 Dim Node:Set Node = Doc.DocumentElement.SelectSingleNode("label[@name=\'"&Condition&"\']")
 GetXmlFile = Node.text
  End Function

 

参  数：Condition 得到节点条件
--  作者：明天我休息
--  发布时间：2018/10/31 8:50:02
--  
参考代码 Kesion.VersionCls.asp 文件11行起。（9.5版本）