Option Explicit
    Dim url,xlpath,sheet,opage,browser
    Dim i,xl,mysheet,row,vloan,vrate,vterm,vdate,vptax,vPMI,voput,loan
    i=2
    vloan = "77777"

url="http://www.mortgagecalculatorplus.com/";
browser="iexplore.exe"
xlpath="C:\Users\satsingh\Desktop\Demo\Testdata"
sheet= "TestData"
systemutil.Run browser,url
Browser("Mortgage Calculator").Page("Mortgage 
Calculator").WebEdit("param[principal]").Set vloan
===============================================================================

I am trying to run the above line of code and still I am getting the same 
error.

On Wednesday, September 11, 2013 12:10:59 PM UTC+5:30, suman ch wrote:
>
> Hi Satnam,
>
> Can you be more specific, I didn't get your last message, what have you 
> removed from the code to make it work..?
>
> Regards,
> Suman CH
>
>
> On Wed, Sep 11, 2013 at 11:41 AM, Satnam Singh <[email protected]<javascript:>
> > wrote:
>
>> Thanks for the reply. I have tried putting the string value and still it 
>> will not work. This is really wearied ...
>> I have updated the line of code as 
>>  browser("IE").Page("Page").WebEdit("loan").Set "7777"
>> OR 
>>  browser("IE").Page("Page").WebEdit("loan").Set 7777
>>
>> both the cases will not work. But if remove the entire code for :-
>>
>> Declaration i.e. Dim statements and the excel reading data. The code works
>>
>> Pls help
>>
>>
>>
>> On Wednesday, September 11, 2013 9:58:46 AM UTC+5:30, suman ch wrote:
>>
>>> Hi Satnam,
>>>
>>> Is the editbox accepting String values as input..? Try to give it 
>>> without converting into cstr..?
>>>
>>> Regards,
>>> Suman Ch
>>>
>>>
>>> On Tue, Sep 10, 2013 at 11:03 PM, Satnam Singh <[email protected]>wrote:
>>>
>>>>  Attaching the excel sheet as well .
>>>>
>>>>
>>>> On Tuesday, September 10, 2013 9:48:03 PM UTC+5:30, Satnam Singh wrote:
>>>>>
>>>>> Hello All,
>>>>>
>>>>> I am pity confused with the following test. Can someone pls look into 
>>>>> the below.
>>>>>
>>>>> ==============================****==============================
>>>>> Option Explicit 
>>>>>     Dim url,browser,xlpath,sheet,opage
>>>>>     Dim i,xl,mysheet,row,vloan,vrate,**v**term,vdate,vptax,vPMI,voput,
>>>>> **lo**an
>>>>>     i=2
>>>>>
>>>>> url="http://www.**mortgagecalcul**atorplus.com/<http://www.mortgagecalculatorplus.com/>
>>>>> "
>>>>> browser="iexplore.exe"
>>>>> xlpath="C:\Users\satsingh\**Desk**top\Demo\Testdata"
>>>>> sheet= "TestData"
>>>>>
>>>>>
>>>>>  SystemUtil.Run browser,url
>>>>>
>>>>> Set xl=CreateObject ("Excel.Application")
>>>>>  xl.Workbooks.Open xlpath
>>>>>  xl.Application.Visible= true
>>>>> Set mysheet=xl.ActiveWorkbook.**Shee**ts (sheet)
>>>>> row=mysheet.usedrange.rows.**cou**nt
>>>>> print row
>>>>>
>>>>>
>>>>> For i = 2 to row
>>>>>     loan= mysheet.cells(i,1)
>>>>>     vloan=Cstr(loan)
>>>>>     print "vloan" & vloan &"for value of i = " & i
>>>>>     
>>>>>     vrate= mysheet.cells(i,2)
>>>>>     vterm= mysheet.cells(i,3)
>>>>>     vdate= mysheet.cells(i,4)
>>>>>     vptax= mysheet.cells(i,5)
>>>>>     vPMI= mysheet.cells(i,6)
>>>>>  browser("IE").Page("Page").**We**bEdit("loan").Set vloan
>>>>>
>>>>> Next
>>>>>
>>>>>
>>>>> ==============================****==============================****
>>>>> ===
>>>>>
>>>>> When I run the above script I am getting the error message as 
>>>>> attached. 
>>>>>
>>>>> Please help.
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>  -- 
>>>> -- 
>>>> You received this message because you are subscribed to the Google
>>>> "QTP - HP Quick Test Professional - Automated Software Testing"
>>>> group.
>>>> To post to this group, send email to [email protected]
>>>>
>>>> To unsubscribe from this group, send email to
>>>> MercuryQTP+...@**googlegroups.com
>>>>
>>>> For more options, visit this group at
>>>> http://groups.google.com/**group/MercuryQTP?hl=en<http://groups.google.com/group/MercuryQTP?hl=en>
>>>>  
>>>> --- 
>>>> You received this message because you are subscribed to the Google 
>>>> Groups "QTP - HP Quick Test Professional - Automated Software Testing" 
>>>> group.
>>>> To unsubscribe from this group and stop receiving emails from it, send 
>>>> an email to mercuryqtp+...@**googlegroups.com.
>>>>
>>>> For more options, visit 
>>>> https://groups.google.com/**groups/opt_out<https://groups.google.com/groups/opt_out>
>>>> .
>>>>
>>>
>>>  -- 
>> -- 
>> You received this message because you are subscribed to the Google
>> "QTP - HP Quick Test Professional - Automated Software Testing"
>> group.
>> To post to this group, send email to [email protected]<javascript:>
>> To unsubscribe from this group, send email to
>> [email protected] <javascript:>
>> For more options, visit this group at
>> http://groups.google.com/group/MercuryQTP?hl=en
>>  
>> --- 
>> You received this message because you are subscribed to the Google Groups 
>> "QTP - HP Quick Test Professional - Automated Software Testing" group.
>> To unsubscribe from this group and stop receiving emails from it, send an 
>> email to [email protected] <javascript:>.
>> For more options, visit https://groups.google.com/groups/opt_out.
>>
>
>

-- 
-- 
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en

--- 
You received this message because you are subscribed to the Google Groups "QTP 
- HP Quick Test Professional - Automated Software Testing" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
For more options, visit https://groups.google.com/groups/opt_out.

Reply via email to