Error while working with Function in QTP script

[mansis]

Hi,

Following function I have preared by saving it in notepad file with .vbs extension.

----------------

Code:

Function Loadtime (a) For count = 1 To 999999 Flag=a If Flag = False Then Wait (1) Else count = 999999 End If Next End Function

----------------
I have prepared following script by calling above function as follows-

----------------

Code:

URL = Datatable.Value("URL",Global) User_name = Datatable.Value("User_name",Global) Password = Datatable.Value("Password",Global) Users = Datatable.Value("Users",Global) systemutil.Run "iexplore",URL 'Load Login screen a = Browser("InSync :: Login").Page("InSync :: Login").Image("topbanner").Exist Call Loadtime (a) Browser("InSync :: Login").Page("InSync :: Login").WebEdit("txtUsername").Set User_name Browser("InSync :: Login").Page("InSync :: Login").WebEdit("txtPassword").Set Password Browser("InSync :: Login").Page("InSync :: Login").WebButton("Login").Click Browser("InSync :: Login").Close

----------------


After creating above test, I gone to File - Setting - Resources and clicked on the +(plus appears in green color) symbol and selected .vbs file in which function is described..

While runing script error "Type mismatch: 'Loadtime. Line(10): "Call Loadtime (a)" occurs.

Please let me know what is wrong in my script / function??

Thanks,
Mansi..

[sshukla12]

Hi,

Try to pass Call LoadTime("a")

Regards,
Sankalp

[charanbc]

The only thing that i can think of is,
the name of the function is typed incorrectly in the script, recheck that the name of the function (not name of the vbs file) is the same in the vbs file and the script.

PS: using loadtime("a") will not be right as 'a' becomes a static string value with the quotes, you need it to be the variable 'a'. But you can try that anyway...

[jesonvan]

Could you try
Msgbox a
to confirm whether it is true or false?

---

U can try to write this function Directly in this script file first.
Perhaps qtp does not recognize this function from your vbs file.

[jacosta]

Hello, is passed as a parameter with descriptive programming the object, once you identify it runs on the for loop for review at runtime, and I do not see where you can change the value exist you send to the function .

Greetings.

[hiregoudar]

Hi Instead of calling function using "call" you have to use
ExecuteFile "path of the .vbs file"