for Technical interviews:
http://no1tutorial.com/
learn step by step technologies:
http://no1tutorial.com/
VB Scripting:
Once the script is generated by recording, we may want to enhance the script to make it more effective. QTP allows you to do this with the help of VB script language elements. Following are some of the VB Script language elements that are commonly used.
Command: InputBox.
Displays a prompt in a dialog box, waits for the user to input text or click a button, and returns the contents of the text box.
Syntax: InputBox(“Enter your name”)
Command: MsgBox.
Displays a message in a dialog box, waits for the user to click a button, and returns a value indicating which button the user clicked.
Syntax: MsgBox(“Hello World”)
String Functions:
StrComp: Returns a value indicating the result of a string comparison.
Usage:
A=Strcmp(“Hello”,”Hello”)
A will have value 0 which means true.
InStr: Returns the position of the first occurrence of one string within another
Usage:
val1="welcome to India"
val2="India"
val=InStr(1,val1,val2)
val will have value 12 . This means that the position of the word India in val1 is 12.
Split: Returns a zero-based, one-dimensional array containing a specified number of substrings with respect to delimiter.
Usage:
Val=”appleXballXcatXdog”
Sval=Split(val,”X”,-1)
Now Sval(0) will have apple
Sval(1)=ball
Sval(2)=cat.
That is Split command will split the string based upon the delimiter specified.
Date and Time Functions:
Now: Returns the current date and time according to the setting of your computer's system date and time.
Usage:
Dim MyVar
MyVar = Now ' MyVar contains the current date and time.
DateAddf: Returns the number of intervals between two dates
Usage:
DiffADate = "Days from today: " & DateDiff("d", Now,"2/7/2008" )
MsgBox DiffADate
DiffADate will have the no of days between today and "2/7/2008"
DateAdd: Returns a date to which a specified time interval has been added.
Usage:
NewDate = DateAdd("m", 1, "31-Jan-95")
The NewDate will be “28-Feb-95”. One month latter than “31-Jan-95”
Day(now): This will return todays day alone. Like 21, 15 or 12
Hour(now): This will retun the current hour alone.
User Defined Function:
Example Function
Public Function Total(a,b, ByRef c)
c=a+b
End Function
Call Total(2,3,d)
D will have the output, the value of c.
Syntax For Writing a Function.
[Public [Default] | Private] Function name [(arglist)]
[statements]
[statements]
End Function
Public
Indicates that the Function procedure is accessible to all other procedures in all scripts.
Default
Used only with the Public keyword in a Class block to indicate that the Function procedure is the default method for the class. An error occurs if more than one Default procedure is specified in a class.
Private
Indicates that the Function procedure is accessible only to other procedures in the script where it is declared or if the function is a member of a class, and that the Function procedure is accessible only to other procedures in that class.
name
Name of the Function; follows standard variable naming conventions.
arglist
List of variables representing arguments that are passed to the Function procedure when it is called. Commas separate multiple variables.
statements
Any group of statements to be executed within the body of the Function procedure.
File handling:
Writing Values From a File:
Const ForReading = 1, ForWriting = 2
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
MyFile.WriteLine "Hello world!"
MyFile.WriteLine "The quick brown fox"
MyFile.Close
Reading Values from a File:
Const ForReading = 1, ForWriting = 2
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.OpenTextFile("c:\testfile.txt", ForReading)
Val= MyFile.ReadLine
Val1=MyFile.ReadLine
MyFile.Close
Fetching Values from a Database using VBScript.
Set MyConn = CreateObject("ADODB.Connection")
MyConn.Open"Provider=Microsoft.Jet.OLEDB.4.0;DataSource=C:\Program”+_ "Files\Mercury Interactive\QuickTest Professional\samples\flight\app\flight32.mdb"
Set RS = MyConn.Execute("SELECT * FROM Orders")
While Not RS.EOF
msgbox RS("Order_Number").Value
Rs.MoveNext
Wend
QTP’S test Object Functions:
Exist: You can enter Exist and/or Wait statements to instruct QuickTest to wait for a window to open or an object to appear. Exist statements return a boolean value indicating whether or not an object currently exists. Wait statements instruct QuickTest to wait a specified amount of time before proceeding to the next step. You can combine these statements within a loop to instruct QuickTest to wait until the object exists before continuing with the test.
Example:
blnDone=Window("Flight Reservation").Dialog("Flights Table").Exist
counter=1
While Not blnDone
Wait (2)
blnDone=Window("FlightReservation").Dialog("FlightsTable").Exist counter=counter+1
If counter=10 then
blnDone=True
End if
Wend
Check Property: Checks whether the specified object property achieves the specified value within the specified timeout.
Syntax: object.CheckProperty (PropertyName, PropertyValue, [TimeOut])
Example:
var_CheckProperty = Browser("HP QuickTest Professional").Page("HP QuickTest Professional").Link("1.2 License Models").CheckProperty("text", "Licence Models")
Return Value
A Boolean value. Returns TRUE if the property achieves the value, and FALSE if the timeout is reached before the property achieves the value.
A TRUE return value reports a Passed step to the test results; a FALSE return value reports a Failed step to the test results.
GetTOProperty: Returns the value of the specified property from the test object description.
Syntax: object.GetTOProperty (Property)
Example : var_GetTOProperty = Browser("HP QuickTest Professional").Page("HP QuickTest Professional").Link("1.2 License Models").GetTOProperty("Innertext")
Return Value: A variant value which will have the inner text of the link “1.2 License Models”
GetROProperty: Returns the current value of the test object property from the object in the application.
Syntax: object.GetROProperty (Property)
Example : var_GetTOProperty = Browser("HP QuickTest Professional").Page("HP QuickTest Professional").Link("1.2 License Models").GetROProperty("Innertext")
Return Value: A variant value which will have the current inner text value of the link “1.2 License Models”
ReportEvent : Reports an event to the test results
Syntax: Reporter.ReportEvent EventStatus, ReportStepName, Details [, Reporter]
Example:
Reporter.ReportEvent 1, "Custom Step", "The user-defined step failed."
or
Reporter.ReportEvent micFail, "Custom Step", "The user-defined step failed."
SystemUtil.Run : You can run any application from a specified location using a SystemUtil.Run statement
Example:SystemUtil.Run"C:\ProgramFiles\InternetExplorer\IEXPLORE.EXE","","C:\Documents and Settings\Administrator","open"
The statement opens the Internet Explorer.
ExecuteFile: This can be used to execute an external VB Script File
Syntax: ExecuteFile FileName
Example : ExecuteFile “C:\sample.vbs”
The above discussed functions can be easily Accessed by step Generator:
http://no1tutorial.com/
learn step by step technologies:
http://no1tutorial.com/
VB Scripting:
Once the script is generated by recording, we may want to enhance the script to make it more effective. QTP allows you to do this with the help of VB script language elements. Following are some of the VB Script language elements that are commonly used.
Command: InputBox.
Displays a prompt in a dialog box, waits for the user to input text or click a button, and returns the contents of the text box.
Syntax: InputBox(“Enter your name”)
Command: MsgBox.
Displays a message in a dialog box, waits for the user to click a button, and returns a value indicating which button the user clicked.
Syntax: MsgBox(“Hello World”)
String Functions:
StrComp: Returns a value indicating the result of a string comparison.
Usage:
A=Strcmp(“Hello”,”Hello”)
A will have value 0 which means true.
InStr: Returns the position of the first occurrence of one string within another
Usage:
val1="welcome to India"
val2="India"
val=InStr(1,val1,val2)
val will have value 12 . This means that the position of the word India in val1 is 12.
Split: Returns a zero-based, one-dimensional array containing a specified number of substrings with respect to delimiter.
Usage:
Val=”appleXballXcatXdog”
Sval=Split(val,”X”,-1)
Now Sval(0) will have apple
Sval(1)=ball
Sval(2)=cat.
That is Split command will split the string based upon the delimiter specified.
Date and Time Functions:
Now: Returns the current date and time according to the setting of your computer's system date and time.
Usage:
Dim MyVar
MyVar = Now ' MyVar contains the current date and time.
DateAddf: Returns the number of intervals between two dates
Usage:
DiffADate = "Days from today: " & DateDiff("d", Now,"2/7/2008" )
MsgBox DiffADate
DiffADate will have the no of days between today and "2/7/2008"
DateAdd: Returns a date to which a specified time interval has been added.
Usage:
NewDate = DateAdd("m", 1, "31-Jan-95")
The NewDate will be “28-Feb-95”. One month latter than “31-Jan-95”
Day(now): This will return todays day alone. Like 21, 15 or 12
Hour(now): This will retun the current hour alone.
User Defined Function:
Example Function
Public Function Total(a,b, ByRef c)
c=a+b
End Function
Call Total(2,3,d)
D will have the output, the value of c.
Syntax For Writing a Function.
[Public [Default] | Private] Function name [(arglist)]
[statements]
[statements]
End Function
Public
Indicates that the Function procedure is accessible to all other procedures in all scripts.
Default
Used only with the Public keyword in a Class block to indicate that the Function procedure is the default method for the class. An error occurs if more than one Default procedure is specified in a class.
Private
Indicates that the Function procedure is accessible only to other procedures in the script where it is declared or if the function is a member of a class, and that the Function procedure is accessible only to other procedures in that class.
name
Name of the Function; follows standard variable naming conventions.
arglist
List of variables representing arguments that are passed to the Function procedure when it is called. Commas separate multiple variables.
statements
Any group of statements to be executed within the body of the Function procedure.
File handling:
Writing Values From a File:
Const ForReading = 1, ForWriting = 2
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
MyFile.WriteLine "Hello world!"
MyFile.WriteLine "The quick brown fox"
MyFile.Close
Reading Values from a File:
Const ForReading = 1, ForWriting = 2
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.OpenTextFile("c:\testfile.txt", ForReading)
Val= MyFile.ReadLine
Val1=MyFile.ReadLine
MyFile.Close
Fetching Values from a Database using VBScript.
Set MyConn = CreateObject("ADODB.Connection")
MyConn.Open"Provider=Microsoft.Jet.OLEDB.4.0;DataSource=C:\Program”+_ "Files\Mercury Interactive\QuickTest Professional\samples\flight\app\flight32.mdb"
Set RS = MyConn.Execute("SELECT * FROM Orders")
While Not RS.EOF
msgbox RS("Order_Number").Value
Rs.MoveNext
Wend
QTP’S test Object Functions:
Exist: You can enter Exist and/or Wait statements to instruct QuickTest to wait for a window to open or an object to appear. Exist statements return a boolean value indicating whether or not an object currently exists. Wait statements instruct QuickTest to wait a specified amount of time before proceeding to the next step. You can combine these statements within a loop to instruct QuickTest to wait until the object exists before continuing with the test.
Example:
blnDone=Window("Flight Reservation").Dialog("Flights Table").Exist
counter=1
While Not blnDone
Wait (2)
blnDone=Window("FlightReservation").Dialog("FlightsTable").Exist counter=counter+1
If counter=10 then
blnDone=True
End if
Wend
Check Property: Checks whether the specified object property achieves the specified value within the specified timeout.
Syntax: object.CheckProperty (PropertyName, PropertyValue, [TimeOut])
Example:
var_CheckProperty = Browser("HP QuickTest Professional").Page("HP QuickTest Professional").Link("1.2 License Models").CheckProperty("text", "Licence Models")
Return Value
A Boolean value. Returns TRUE if the property achieves the value, and FALSE if the timeout is reached before the property achieves the value.
A TRUE return value reports a Passed step to the test results; a FALSE return value reports a Failed step to the test results.
GetTOProperty: Returns the value of the specified property from the test object description.
Syntax: object.GetTOProperty (Property)
Example : var_GetTOProperty = Browser("HP QuickTest Professional").Page("HP QuickTest Professional").Link("1.2 License Models").GetTOProperty("Innertext")
Return Value: A variant value which will have the inner text of the link “1.2 License Models”
GetROProperty: Returns the current value of the test object property from the object in the application.
Syntax: object.GetROProperty (Property)
Example : var_GetTOProperty = Browser("HP QuickTest Professional").Page("HP QuickTest Professional").Link("1.2 License Models").GetROProperty("Innertext")
Return Value: A variant value which will have the current inner text value of the link “1.2 License Models”
ReportEvent : Reports an event to the test results
Syntax: Reporter.ReportEvent EventStatus, ReportStepName, Details [, Reporter]
Example:
Reporter.ReportEvent 1, "Custom Step", "The user-defined step failed."
or
Reporter.ReportEvent micFail, "Custom Step", "The user-defined step failed."
SystemUtil.Run : You can run any application from a specified location using a SystemUtil.Run statement
Example:SystemUtil.Run"C:\ProgramFiles\InternetExplorer\IEXPLORE.EXE","","C:\Documents and Settings\Administrator","open"
The statement opens the Internet Explorer.
ExecuteFile: This can be used to execute an external VB Script File
Syntax: ExecuteFile FileName
Example : ExecuteFile “C:\sample.vbs”
The above discussed functions can be easily Accessed by step Generator:
No comments:
Post a Comment