0

以下のケースでは、VBScript または QTP のヘルプが必要です。

例えば：

ウェブリストには 40 近くのアイテムがあります。Weblist の 40 個の項目の 1 つである Excel シートに項目が 1 つしかありません。スクリプトを実行すると、Excel のスクリプトが Weblist で選択されます。どうすればこれを実行できますか? 多くのシナリオを試しましたが、うまくいきませんでした。

以下は、QTP で試したサンプル コードの一部です。

ocount=Browser("name:=brw").Page("title:=brw").WebList("htmlid:=tabContainerBrandSite_123&rtyoh").GetROProperty("items count")

msgbox ocount

var7=mySheet2.Cells(2,"C")

For k=2 to ocount 

ocount2=Browser("name:=brw").Page("title:=brw").WebList("html id:=tabContainerBrandSite_123&rtyoh").GetItem(k)

msgbox ocount2
4

1 に答える 1

0 
merchantName = DataTable("Merchant_Name","Global") 'an example if value is saved in global sheet
items_count =  Browser("Sarit").Page("Sarit_2").WebList("txtVendorCode").GetROProperty("Items Count")  'This will get all the items from your weblist.

i = 1
Do

    webListName = Browser("Sarit").Page("Sarit_2").WebList("txtVendorCode").GetItem(i)
'this will get first value from the web list 
    If merchantName = webListName Then  'comparing first value from your value from global sheet
        Browser("Sarit").Page("Sarit_2").WebList("txtVendorCode").Select(i) 'selects that value
        Exit do 'because it has found your only value from the local sheet, it exits
        else
        i = i + 1
    End If
Loop While i <= items_count
于 2013-05-24T11:19:44.330 に答える