51Testing软件测试论坛

标题: 请问下面语句的意思 [打印本页]

作者: lp7wshishui 时间: 2010-8-9 19:11
标题: 请问下面语句的意思
TestPath=left(environment.Value("TestDir"),Instr(1, environment.Value("TestDir"), "测试脚本", 0)-1)+"函数库\"

谢谢

作者: rojer521 时间: 2010-8-9 20:52
分解一下：
str1 = environment.Value("TestDir")
num1 = Instr(1, str1, "测试脚本", 0)
TestPath = left(str1,num1 - 1) + "函数库\"

作者: feiyunkai 时间: 2010-8-10 09:42
Testpath=Environment.Value("TestDir") '获取正在运行的QTP脚本路径，假设取到的路径为："D:\Projectpath\测试脚本"
Lenth=Instr(1, Testpath , "测试脚本", 0)-1 '获取路径中第一次出现“测试脚本”的位置（16），-1即取前一位 '即 15
Projectpath=left(Testpath,Lenth) '从左边开始取"D:\Projectpath\测试脚本"的前15位字符即：D:\Projectpath\
Functionpath=Projectpath+"函数库\" ' +号作用是连接字符串，Functionpath的值为：D:\Projectpath\函数库\

[ 本帖最后由 feiyunkai 于 2010-8-10 09:43 编辑 ]

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)