Dim a
a=WeekDayName(1)
Msgbox a
Output-Sunday
Dim a
a=WeekDayName(5)
Msgbox a
Output-Thursday
qtp script to return specific weekday name-VBScript Weekdayname function-script in qtp to display specific weekday name-QTP Scripts-VBScript examples
qtp script to return character corresponding to the given ASCII value-script in qtp to return the character associated with the specified ANSI code
Dim a
a=Chr(65)
msgbox a
Output-A
Dim a
a=Chr(97)
msgbox a
Output-a
qtp script to return specified number of characters from a string-VBScript Mid Function example-vbscript function commands-scripts in QTP-QTP Scripts
Dim a
a=Mid("qtp",2)
msgbox a
Output-tp
Dim a
a=Mid("Testing",1,4)
msgbox a
Output-Test
Dim a
a=Mid("Software Testing",10,7)
msgbox a
Output-Testing
Qtp script to return specific Month Name-MonthName Function example-qtp script to display specific Month Name-qtpscripts-basic scripts in qtp
Dim a
a = MonthName(5)
msgbox a
Output=May
Dim a
a = MonthName(12)
msgbox a
Output=December
qtp script to return square root of a number-basic qtp scripts-qtp scripts-Sqr function example-qtp scripts with outputs
Dim a
a = Sqr(16)
msgbox a
output=4
Dim a
a = Sqr(20)
msgbox a
output=4.47213
qtp script to return a string in reverse order-script in qtp to print string in reverse order-StrReverse String Function example-qtp basic scripts-qtp
Dim a
a = StrReverse("QTP")
msgbox a
Output-PTQ
Dim a
a = StrReverse("Software Testing")
msgbox a
Output-gnitseT erawtfoS
qtp script to print odd numbers-script in qtp to print odd numbers from 1 to 10-basic qtp scripts for beginners-qtp sample examples-qtp scripts-qtp
dim i
for i=1 to 10
if (i mod 2<>0) then
msgbox i&"is odd number"
end if
next
above example prints odd numbers from 1 to 10.
QTP Script to print even numbers-Program to print even numbers in quick test professional(QTP)-qtp basic scripts-qtp examples-qtp sample programs-qtp
dim i
for i=1 to 10
if (i mod 2=0) then
msgbox i&"is even number"
end if
next
above example prints even numbers from 1 to 10.
QTP Script to Insert Values Into Database Table-Script for Inserting values in database table in QTP
VBScript to insert values in database table.
We have table "EMP" in database "db"(Microsoft Access).
EMP Table has following data in it.
EMPNO EMPNAME EMPSAL
1 Lakshmi 30000
2 Laxmi 25000
3 Latha 15000
Check This Blog For SQL Queries
Check this post for Script to get column names from database table(MS Access).
Dim con,rs
set con= CreateObject( "ADODB.Connection")
set rs =CreateObject("ADODB.Recordset")
con.provider="microsoft.jet.oledb.4.0"
con.open"d:\db.mdb"
rs.open "insert into EMP(empno,empname,empsal) values(4,'Lakshmi',40000)",con
msgbox("Inserted")
Above script(code)will insert values in database table.
Output:
EMPNO EMPNAME EMPSAL
1 Lakshmi 30000
2 Laxmi 25000
3 Latha 15000
4 Lakshmi 40000
QTP Script to count no. of checkboxes in a webpage
SQL Queries Collection
QTP Script for Connecting to database
QTP Script to export database data to excel sheet
QTP Script to import database data to datatable
Connecting to MSAcess,Oracle,SQL Server Database
Hindi and Telugu Songs Lyrics
QTP Script to get column names from database table(MS Access).