For the below written code , i want to be stop the loop
(ex:10 times), but it is focusing to first line of the code
& generating error.
vbwindow("vbname:=frmMain").Type micAltDwn + "6" + "2" + "D"
+micAltUp 'wiil open the particular window in application
vbwindow("vbname:=frmDeduction").vbbutton("vbname:=cmdNew").Click
DataTable.ImportSheet"F:\QTP VBScript\Form
26-1.xls","Deduction",Global
RowCount = DataTable.GetSheet("Global").GetRowCount
i=RowCount
For j =1 to i
'vbwindow("vbname:=frmDeduction").WinObject("nativeclass:=DataComboWndClass","abs_y:=
187").Type DataTable("Name", dtGlobalSheet)
vbwindow("vbname:=frmDeduction").ActiveX("acx_name:=DataCombo","abs_y:=
187").Type DataTable("Name", dtGlobalSheet)
vbwindow("vbname:=frmDeduction").ActiveX("acx_name:=DataCombo","abs_y:=
187").Type micF4
vbwindow("vbname:=frmDeduction").ActiveX("acx_name:=DataCombo","abs_y:=
187").Type micTab
vbwindow("vbname:=frmDeduction").ActiveX("acx_name:=DataCombo","abs_y:=
216").Type micF4
vbwindow("vbname:=frmDeduction").ActiveX("acx_name:=DataCombo","abs_y:=
216").Type DataTable("Section", dtGlobalSheet)
vbwindow("vbname:=frmDeduction").ActiveX("acx_name:=DataCombo","abs_y:=
216").Type micTab
vbwindow("vbname:=frmDeduction").VbEdit("vbname:=txtAmtOfPay").Set
DataTable("Amount_of_Payment", dtGlobalSheet)
vbwindow("vbname:=frmDeduction").VbEdit("vbname:=txtAmtPaidDate").Set
DataTable("Amount_PaidCredited_Date", dtGlobalSheet)
vbwindow("vbname:=frmDeduction").VbEdit("vbname:=txtAmtPaidDate").Type
micTab
vbwindow("vbname:=frmDeduction").ActiveX("acx_name:=DataCombo","abs_y:=
316").Type micF4
vbwindow("vbname:=frmDeduction").ActiveX("acx_name:=DataCombo","abs_y:=
316").Type DataTable("Deduction_is", dtGlobalSheet)
vbwindow("vbname:=frmDeduction").ActiveX("acx_name:=DataCombo","abs_y:=
316").Type micTab
vbwindow("vbname:=frmDeduction").VbButton("vbname:=cmdSave").Click
DataTable.SetNextRow
Next
vbwindow("vbname:=frmDeduction").VbButton("vbname:=cmdClose").Click
- 1 Answers
- 3153 Views
- I also Faced
- E-Mail Answers
Answer Posted / Mitul Saxena
To stop a loop in VBScript, you can use the Exit For statement. However, it seems that your code has an issue because the script focuses on the first line instead of executing the entire loop. Here's a modified version of your code with an exit statement after executing the desired number of iterations (10 times in this example):
```vbnet
For i = 1 To 10 ' Modified to stop after 10 iterations
' Your existing loop code here
If i = 10 Then Exit For ' Stop the loop once we reach 10 iterations
Next
' Rest of your code here
```
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers
How to give a call to another action from one action?
What is the use of defining a newobject in the object repository "Define New TestOject". How to use this further. If we define new testobject, how can it recognizes the objects properties of any application.
I want to open a Notepad window without recording a test and I do not want to use System utility Run command as well. How do I do this?
How are actions and functions different in QTP?
Define Environment Variable in UFT and its uses?
can any body tell me how i create a simple script and apply output value on it .pls send me a step by step process
we use a file extension .properties why is it used and where do we use it plz help me out with detailed explanation and navigation of how to use on the QTP 8.2?
what is actually contain test report? can anybody post the test report
Pls can anybody send me the Recent Technical and Interview Questions Which were asked in IBM(QTP)Automation PLZZZZZZZZZ
how to use the regular expression for the below code-- swf("application name").swftreeview ("Treename").select"Medication;Pharmacy:56" There is a tree view window of the folder's ie Medication- >Pharmacy(sub folder)with 56 as count of records...The records can be different or if no records present in the specific folder..then it show "Paharmacy:-no records".Whe i record at the first time .....and try to rerun the same script with different records count say "pharmacy:800"..qtp is not regnizing it...therefore i want to user regular expression..but donot now how to use it and where to use...i have tried.... swf("application name").swftreeview ("Treename").select"Medication;Pharmacy:\*"..but it s of no use..plz help..me
Can you brief the hurdles you faced during Automation testing?
i need qtp tutorial. pls send it to sridhar.k151@g mail.com
can anyone tell me what to say in interview when interviewer asks about "tell me about your framework in your project"?
i am looking job in perfomance testing using Loadrunner any one help me a project plz......?(Chandana) chs_29@rediffmail.com
I want to do Certification course in QTP. For this I request you to suggest the best Tutorial in PDF format. Hence, if possible, kinldy mail PDF file to my mail-ID: sushmapokhriyal79@gmail.com
