51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 1855|回复: 6
打印 上一主题 下一主题

[原创] 外部导入环境变量问题

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2008-8-11 10:57:16 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
我在外部定义一个环境变量文件,然后导入,请问一下,下面的操作过程是否正确

环境变量文件为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 编辑 ]
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2008-8-11 11:31:13 | 只看该作者
你这个就是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
回复 支持 反对

使用道具 举报

该用户从未签到

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



谢谢,不过还是没解决我那个脚本的问题,我想知道是哪句代码出问题了
回复 支持 反对

使用道具 举报

该用户从未签到

4#
发表于 2008-8-11 13:46:28 | 只看该作者
Dim str1
Environment.loadfromfile "c:\1.xml"
str1=Environment("Ad")
msgbox str1

[ 本帖最后由 285929602 于 2008-8-11 14:01 编辑 ]
回复 支持 反对

使用道具 举报

该用户从未签到

5#
发表于 2008-8-11 15:25:11 | 只看该作者
环境变量文件为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你少了个1
回复 支持 反对

使用道具 举报

该用户从未签到

6#
 楼主| 发表于 2008-8-11 15:28:05 | 只看该作者
我想哭了。。。
这么低级的错误也犯。。。
str1 = ...
msgbox str
。。。。无语了。。
回复 支持 反对

使用道具 举报

该用户从未签到

7#
发表于 2008-8-11 17:48:59 | 只看该作者
呵呵,做测试需要细心哦
回复 支持 反对

使用道具 举报

本版积分规则

关闭

站长推荐上一条 /1 下一条

小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

GMT+8, 2024-11-15 04:41 , Processed in 0.077925 second(s), 27 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

快速回复 返回顶部 返回列表