如何判断代码在QTP里面运行

lifr

我有一些函数, 可能在QTP里面运行, 也可能在外面(比如os里) 运行.

我的问题是, 如何在代码里判断是否在QTP里面运行?

多谢.

lifr

回复 1# lifr


看来高手都不怎么关注这些小问题哦. 我用下面的笨办法. 如果你有更好的方法, 请赐教.

1. 
   
2. 
   
3. Function IsInQTP()
   
4.     varValue = Empty
   
5.     On Error Resume Next
   
6.     varValue = Environment.Value("TestDir")
   
7.     On Error Goto 0
   
8. 
   
9.     IsInQTP = (Not IsEmpty(varValue))
   
10. End Function
    

复制代码