参数化的问题（新手）

kathytian001

参数化之前
        [-] recording
                [ ] ProgramManager.ListView1.Click (1, 0, 0)
                [ ] Browser.Maximize ()
                [ ] LightpoleIlluminateYourPla.SetActive( )
                [ ] LightpoleIlluminateYourPla.LOGIN2.SetText("tianqing")
                [ ] LightpoleIlluminateYourPla.PIN2.SetText("1111")
                [ ] LightpoleIlluminateYourPla.PIN3.Click ()
                [ ] HomePageOfTianqing.Logout.Click ()
参数化之后
[-] // *** DATA DRIVEN ASSISTANT Section (!! DO NOT REMOVE !!) ***       
         [ ] use "datadrivetc.inc"
         [ ] use "1111.t"
         [ ]
         [ ] // *** DSN ***       
         [ ] STRING gsDSNConnect = "DSN=Segue DDA Excel;DBQ=E:\demo1\demo2\新建 Microsoft Excel 工作表.xls；UID=；PWD=;"
         [ ]
         [ ] // *** Global record for each testcase ***       
         [ ]
         [-] type REC_DATALIST_DD_Test1 is record
                 [ ] REC_Sheet1_ recSheet1_  //Sheet1$,
                 [ ]
                 [ ] // *** Global record for each Table ***
                 [ ]
        [-] type REC_Sheet1_ is record
                 [ ] STRING name  //name,
                 [ ] INTEGER password  //password,
                 [ ]
                 [ ] // *** Global record containing sample data for each table ***
                 [ ] // *** Used when running a testcase with 'Use Sample Data from Script' checked ***
                 [ ]
        [-] REC_Sheet1_ grTest_Sheet1_ = {...}
                 [ ] "tianqing" // name
                 [ ] 1111 // password
                 [ ]
                 [ ] // *** End of DATA DRIVEN ASSISTANT Section ***
                 [ ]
[-] testcase DD_Test1 (REC_DATALIST_DD_Test1 rData)
        [-] recording
                [ ] LightpoleIlluminateYourPla.SetActive( )
                [ ] LightpoleIlluminateYourPla.LOGIN.SetText(rData.recSheet1_.name)
                [ ] LightpoleIlluminateYourPla.PIN.SetText(Str(rData.recSheet1_.password))
                [ ] LightpoleIlluminateYourPla.PIN1.Click ()
                [ ] HomePageOfTianqing.Logout.Click ()

遇到的问题是
[ ] Script 1111.g.t - 2 errors
[ ] Machine: (local)
[ ] Started: 01:06:18PM on 05-Dec-2007
[ ] Elapsed: 0:01:01
[ ] Passed:  0 tests (0%)
[ ] Failed:  2 tests (100%)
[ ] Totals:  2 tests, 2 errors, 0 warnings
[ ]
[-] Testcase DD_Test1 ({{"wangying", 1111}}) - 1 error
        [ ] *** DefaultBaseState is setting Browser active, No window was active
        [ ] *** Error: Window '[BrowserChild]Home page of tianqing' was not found
        [ ] Occurred in DoClick
        [ ] Called from HomePageOfTianqing.Logout.Click at htmlpage.inc(274)
        [ ] Called from DD_Test1 at 1111.g.t(35)
        [ ] Called from DefaultRunDataDrivenTestCase at datadrivetc.inc(383)
我知道是处在最后logout页面，但不会改，尝试用"***"代替，结果不成功，请各位高手帮帮忙，谢谢

[ 本帖最后由 kathytian001 于 2007-12-5 15:58 编辑 ]

water0661

原帖由 jmy_1981 于 2007-12-7 15:54 发表
如题。

ls现在得到的错误信息是Window(...) not found，那造成你得到错误的原因很可能出在tag上……

ls的想法是想把原来的对象HomePageOfTianqing参数化成，HomePageOf"aa,bb,cc等等"，这样你编译的时候是会产 ...

支持tag参数化

jmy_1981

如题。

ls现在得到的错误信息是Window(...) not found，那造成你得到错误的原因很可能出在tag上……

ls的想法是想把原来的对象HomePageOfTianqing参数化成，HomePageOf"aa,bb,cc等等"，这样你编译的时候是会产生错误的，因为你对象不唯一（P.S：你也可以在appstates里面强制初始化赋值，这样可能需要call一个dll的）。

我的想法是，你可以把对象的名字改成DynamicHomePageOf，然后再inc里面对tag参数化，比如：
Window DynamicHomePageOf
tag sRegularString+sDynamicString+sDataDrivenString
...

希望有帮助。

kathytian001

谢谢您的回复，但我想因为是参数化了，所以我认为不应该再出现HomePageOfTianqing.Logout，因为把Tianqing这个名字参数化，所以我感觉应该把[ ] HomePageOfTianqing.Logout.Click ()中的Tianqing也变成一个参数，但因为没有引号不是常量，所以我不会，请帮忙，谢谢

water0661

1.检查 LightpoleIlluminateYourPla.PIN1.Click ()
后是否跳转到了HomePageOfTianqing页面

2.检查frame文件中HomePageOfTianqing的tag是否有问题