jimmyzhou 发表于 2009-5-22 15:54:05

如何通过脚本将文件加入File>Settings>Resources中

如何通过脚本将文件加入File>Settings>Resources中
脚本中用到一些数据是保存在这个文件中的，有什么办法可以获取到呢

manhong 发表于 2009-5-22 17:38:11

已经加入了，qtp就直接可以用吧。
txt和vbs应该是一样的

intothestorm 发表于 2009-5-22 18:12:35

FYI

Dim App 'As Application
Set App = CreateObject("QuickTest.Application")
App.Launch
App.Visible = True
App.Test.Settings.Run.ObjectSyncTimeOut = 20000
App.Test.Settings.Run.OnError = "Stop"
App.Test.Settings.Resources.Libraries.RemoveAll
App.Test.Settings.Resources.Libraries.Add("lib\1.vbs")
App.Test.Settings.Resources.Libraries.Add("lib\2.vbs")
App.Test.Settings.Resources.Libraries.Add("lib\3.vbs")
App.Test.Settings.Resources.Libraries.Add("lib\4.vbs")
App.Test.Settings.Resources.Libraries.Add("lib\5.vbs")
App.Test.Settings.Resources.Libraries.SetAsDefault
App.Test.Environment.LoadFromFile("Test-Parameters\QTP_Params.xml")

blizzardlyk 发表于 2009-5-25 15:19:42

直接用调用文件的方法
execultfile ("d:\test.txt")
或者用VBS自身的方法 创建文件对象去读取文件内容,但是这个方法有点小题大作了

ziheng198688 发表于 2009-6-8 09:48:25

原帖由 intothestorm 于 2009-5-22 18:12 发表 http://bbs.51testing.com/images/common/back.gif
Dim App 'As Application
Set App = CreateObject("QuickTest.Application")
App.Launch
App.Visible = True
App.Test.Settings.Run.ObjectSyncTimeOut = 20000
App.Test.Settings.Run.OnError = "Stop"
App.T ...
学习了 呵呵
页: [1]
查看完整版本: 如何通过脚本将文件加入File>Settings>Resources中