软件测试论坛 › [QuickTest Professional] › QTP的VBS中自定义类的问题？？急急急急急急急急急急急急急急急急

zwd183335 发表于 2010-7-30 10:34:43

QTP的VBS中自定义类的问题？？急急急急急急急急急急急急急急急急

在a.vbs文件中定义了一个类
Class TADT
        Private m_namADTName                        'ADT新旧名称
        Private m_namFieldName                        'ADT新旧字段名称

         Private Function F_SaveADT()
       
                F_SaveADT = True
        End Function
End Class

在test中
Dim adt

Set adt = new TADT


Set语句会提示TADT未定义

xyan 发表于 2010-7-30 11:30:57

我试了下没有问题阿

white2 发表于 2010-7-30 12:00:17

是不是因为没有定义属性阿

xhhuang1618 发表于 2010-7-30 12:39:25

原帖由 zwd183335 于 2010-7-30 10:34 发表 http://bbs.51testing.com/images/common/back.gif
在a.vbs文件中定义了一个类
Class TADT
        Private m_namADTName                        'ADT新旧名称
        Private m_namFieldName                        'ADT新旧字段名称

         Private Function F_SaveADT()
       
                F_SaveADT = True
        End Function ...
如果a.vbs与 Set adt = new TADT 在同一个文件里，这样的做是没有问题的；但如果a.vbs与Set adt = new TADT 不在同一个文件里就有出现找不到对象的问题。
解决办法：
executefile("c:\a.vbs")
Set adt = new TADT

JackieChan 发表于 2010-7-30 13:03:08

试试楼上的方法或者在setting添加引用

试试楼上的方法或者在setting添加文件a.vbs的引用

zwd183335 发表于 2010-8-11 17:35:26

找到答案了，在论坛中有旧帖。

查看完整版本: QTP的VBS中自定义类的问题？？急急急急急急急急急急急急急急急急