外部导入环境变量问题

五百螺汉

我在外部定义一个环境变量文件，然后导入，请问一下，下面的操作过程是否正确

环境变量文件为1.xml，存放在C盘根目录下
内容为 ：
<Environment>
     <Variable>
     <Name>Ad</Name>
        <Value>http://www.sina.com.cn</Value>
     </Variable>
</Environment>

然后导入的脚本为：

Environment.loadfromfile(c:\1.xml)
str1 = Envrionment("Ad")
msgbox str


结果得到的结果是空值，请问一下，是哪个环节出问题了？在线等，谢谢了

[ 本帖最后由 五百螺汉 于 2008-8-11 10:58 编辑 ]

285929602

你这个就是VB Script解析XML文件，并取得要求的节点值，换一种写法看看。
dim xmlfile
xmlfile = "c:\1.xml"
Set xmlDoc = CreateObject("MSXML2.DOMDocument")
xmldoc.setProperty "ServerHTTPRequest",True  
xmldoc.async = False
xmldoc.resolveExternals = True
xmldoc.load xmlfile
set objfind=xmldoc.documentElement.SelectSingleNode("//Environment/Variable/Value")
Dim nodevalue
nodevalue=objfind.text
msgbox nodevalue

五百螺汉

原帖由 285929602 于 2008-8-11 11:31 发表
你这个就是VB Script解析XML文件，并取得要求的节点值，换一种写法看看。
dim xmlfile
xmlfile = "c:\1.xml"
Set xmlDoc = CreateObject("MSXML2.DOMDocument")
xmldoc.setProperty "ServerHTTPRequest",True  
...

谢谢，不过还是没解决我那个脚本的问题，我想知道是哪句代码出问题了

285929602

Dim str1
Environment.loadfromfile "c:\1.xml"
str1=Environment("Ad")
msgbox str1

[ 本帖最后由 285929602 于 2008-8-11 14:01 编辑 ]

lingxin5013

环境变量文件为1.xml，存放在C盘根目录下
内容为 ：
<Environment>
     <Variable>
     <Name>Ad</Name>
        <Value>http://www.sina.com.cn</Value>
     </Variable>
</Environment>

然后导入的脚本为：

Environment.loadfromfile(c:\1.xml)
str1 = Envrionment("Ad")
msgbox str
是
msgbox str1你少了个１

五百螺汉

我想哭了。。。
这么低级的错误也犯。。。
str1 = ...
msgbox str
。。。。无语了。。

flying-kite

呵呵，做测试需要细心哦