As we gather in this place today
Holyspirit come and have your way
Have your way
As we lay aside our own desires
Sweep across our hearts with Holy fire
Have your way
chorus:
This is your house your home
We welcome you Lord we welcome you
This is your house your home
We welcome you today
As we offer up our hearts and lives
Let them be a living sacrifice
Have your way
Be glorified in everything you do
Be glorified in everything we say
Have your way
This is your house your home
We welcome you Lord we welcome you
This is you House your home
We welcom you today
As we pray Oh Lord draw near
It's your voice we long to hear
Saturday, April 23, 2011
Lord have mercy - Easter - You were sent to heal the contrite
You were sent to heal the contrite,
Lord have mercy(2)
Lo-ord have on us Lord have mercy
You came to call the sinners too, Christ have mercy (2)
Chri-i-ist have mercy
Christ have mercy
You plead for us at the right hand, the right hand of god
Lord have mercy
Lord have mercy
Lord god have mercy
Lord have mercy on us
Lord have mercy
Lord have mercy(2)
Lo-ord have on us Lord have mercy
You came to call the sinners too, Christ have mercy (2)
Chri-i-ist have mercy
Christ have mercy
You plead for us at the right hand, the right hand of god
Lord have mercy
Lord have mercy
Lord god have mercy
Lord have mercy on us
Lord have mercy
Lord Have mercy on us - Easter Songs
You were sent to heal the contrite:
Lord, have mercy.
Lord, have mercy on us.
You came to call sinners:
Christ, have mercy.
Christ, have mercy on us.
You plead for us at the right hand of the Father:
Lord, have mercy. Lord, have mercy.
Lord, have mercy on us.
Courtesy : http://www.spiritandsong.com/compositions/16552
Lord, have mercy.
Lord, have mercy on us.
You came to call sinners:
Christ, have mercy.
Christ, have mercy on us.
You plead for us at the right hand of the Father:
Lord, have mercy. Lord, have mercy.
Lord, have mercy on us.
Courtesy : http://www.spiritandsong.com/compositions/16552
Praise my soul - Easter Song - Gloria
Praise my soul the might king of heaven tribute to him bring
ransomed healed restored and all forgiven praise to him now sing
chorus:
then glory to our king sing all ye joyful strain
out voice will ever ring for his saving love form ne
praise him for his grace and for his favour when you were distressed
praise him still the same and sing forever may his name be blessed
father like he loves and ever spares us weak we are he knows
in his hands he ever gently bears us keeps us from our foes.
angels hel us rightly to adore him whilst you see his face
sun and moon and earth now bow before him praise him time and space
ransomed healed restored and all forgiven praise to him now sing
chorus:
then glory to our king sing all ye joyful strain
out voice will ever ring for his saving love form ne
praise him for his grace and for his favour when you were distressed
praise him still the same and sing forever may his name be blessed
father like he loves and ever spares us weak we are he knows
in his hands he ever gently bears us keeps us from our foes.
angels hel us rightly to adore him whilst you see his face
sun and moon and earth now bow before him praise him time and space
Thursday, April 21, 2011
QTP : Example of Compare Text using InStr
Example of Compare Text for InStr
' Returns position 6
MsgBox InStr(1,"Moni Ajith Kumar","Ajith")
' Returns position 0 -
MsgBox InStr(7,"Moni Ajith Kumar","Ajith")
' Returns position 6
MsgBox InStr(1,"Moni Ajith Kumar","Ajith")
' Returns position 0 -
MsgBox InStr(7,"Moni Ajith Kumar","Ajith")
QTP : InStr with vbTextCompare vbBinaryCompare
Example Set 2: - String -"Todays India" Find the value "in"
' Position Value is 8 for "in"
MsgBox "Position of ""in"" is "& Instr(1,"Todays India","in",vbTextCompare)
' Returns Position Value 8
MsgBox "Position of ""In"" is "& Instr(1,"Todays India","In",vbTextCompare)
' Returns Position Value 0
MsgBox "Position of ""in"" is "& Instr(1,"Todays India","in",vbBinaryCompare)
' Returns Position Value 8
MsgBox "Position of ""In"" is "& Instr(1,"Todays India","In",vbBinaryCompare)
Example Set 2: Change Start position of Compare Text
' Returns 6
MsgBox InStr(1,"Moni Ajith Kumar","Ajith")
' Returns 0 -
MsgBox InStr(7,"Moni Ajith Kumar","Ajith")
' Position Value is 8 for "in"
MsgBox "Position of ""in"" is "& Instr(1,"Todays India","in",vbTextCompare)
' Returns Position Value 8
MsgBox "Position of ""In"" is "& Instr(1,"Todays India","In",vbTextCompare)
' Returns Position Value 0
MsgBox "Position of ""in"" is "& Instr(1,"Todays India","in",vbBinaryCompare)
' Returns Position Value 8
MsgBox "Position of ""In"" is "& Instr(1,"Todays India","In",vbBinaryCompare)
Example Set 2: Change Start position of Compare Text
' Returns 6
MsgBox InStr(1,"Moni Ajith Kumar","Ajith")
' Returns 0 -
MsgBox InStr(7,"Moni Ajith Kumar","Ajith")
QTP Find the Position of a String
'Find Position of the String "is" in a sentence
v_input_string="The Request is 123456"
v_text_to_find="is"
' Store the position
v_pos=InStr(1,v_input_string,v_text_to_find)
MsgBox "Position of the String ""is"" is : "&v_pos
MsgBox "Position of ""in"" is"& Instr(1,"Todays Developing India","In")
OutPut:
Position of the String "is" is 13
Position of "in" is 19
v_input_string="The Request is 123456"
v_text_to_find="is"
' Store the position
v_pos=InStr(1,v_input_string,v_text_to_find)
MsgBox "Position of the String ""is"" is : "&v_pos
MsgBox "Position of ""in"" is"& Instr(1,"Todays Developing India","In")
OutPut:
Position of the String "is" is 13
Position of "in" is 19
Wednesday, April 20, 2011
QTP Count the number of links in a page
' Get The Object
Set htmlObjCol_l=Browser("Oracle Applications Home").Page("Login").Object.links
' Count
Dim i
i=0
For each element in htmlObjCol_l
' HTML Anchor element
'MsgBox typename(element)
'MsgBox typename(element.toString())
MsgBox element
'MsgBox element.toString()
'MsgBox element.Name
'Print to the Report
Reporter.ReportEvent micPass,"Link : "&i,""&element.toString()&vbCrLf&vbCrLF&element.Name
i=i+1
Next
MsgBox "No of Links "&i
Set htmlObjCol_l=Browser("Oracle Applications Home").Page("Login").Object.links
' Count
Dim i
i=0
For each element in htmlObjCol_l
' HTML Anchor element
'MsgBox typename(element)
'MsgBox typename(element.toString())
MsgBox element
'MsgBox element.toString()
'MsgBox element.Name
'Print to the Report
Reporter.ReportEvent micPass,"Link : "&i,""&element.toString()&vbCrLf&vbCrLF&element.Name
i=i+1
Next
MsgBox "No of Links "&i
QTP Count the Number of Open Browser Sessions
QTP Count the Number of Open Browser Sessions
' Create a Description Object
Dim iDesc
Set iDesc = Description.Create
' Assign the micclass Property
iDesc("micclass").value="browser"
'Get the child objects using getChildObjects
Set iObj = Desktop.ChildObjects(iDesc)
'Displays the count
MsgBox iObj.Count
' Create a Description Object
Dim iDesc
Set iDesc = Description.Create
' Assign the micclass Property
iDesc("micclass").value="browser"
'Get the child objects using getChildObjects
Set iObj = Desktop.ChildObjects(iDesc)
'Displays the count
MsgBox iObj.Count
QTP : GetTOProperties of Image Object
'Image
Set Img=Browser("Login").Page("Login").Image("American English")
Set tImg=Img.GetTOProperties()
MsgBox typename(tImg)
icount=tImg.Count-1
For i=0 to icount
sName=tImg(i).Name
sValue=tImg(i).Value
Reporter.ReportEvent micPass,"Property:="&sName&"Value :="&sValue,""
Next
Set Img=Browser("Login").Page("Login").Image("American English")
Set tImg=Img.GetTOProperties()
MsgBox typename(tImg)
icount=tImg.Count-1
For i=0 to icount
sName=tImg(i).Name
sValue=tImg(i).Value
Reporter.ReportEvent micPass,"Property:="&sName&"Value :="&sValue,""
Next
QTP GetTOProperties for Page Object
Set Pg=Browser("Login").Page("Login")
MsgBox typename(Pg)
Set toPg=Pg.GetTOProperties()
'Dim i,icount
icount=toPg.Count-1
For i=0 to iCount
sName=toPg(i).Name
sValue=toPg(i).Value
Reporter.ReportEvent micPass,"Property:=" & sName & " Value :="&sValue,""
Next
MsgBox typename(Pg)
Set toPg=Pg.GetTOProperties()
'Dim i,icount
icount=toPg.Count-1
For i=0 to iCount
sName=toPg(i).Name
sValue=toPg(i).Value
Reporter.ReportEvent micPass,"Property:=" & sName & " Value :="&sValue,""
Next
QTP Get the Properties for Browser Object
'Get the Properties for Browser Object
Set br=Browser("Login")
Set toBr=br.GetTOProperties()
'Dim i,icount
icount=toBr.Count-1
For i=0 to iCount
sName=toBr(i).Name
sValue=toBr(i).Value
Reporter.ReportEvent micPass,"Property:=" & sName & " Value :="&sValue,""
Next
Set br=Browser("Login")
Set toBr=br.GetTOProperties()
'Dim i,icount
icount=toBr.Count-1
For i=0 to iCount
sName=toBr(i).Name
sValue=toBr(i).Value
Reporter.ReportEvent micPass,"Property:=" & sName & " Value :="&sValue,""
Next
QTP : GetTOProperties of Web Edit Object
' Program to get the Test Object Properties of a Web Edit Field
' Assumption:Objects are already learned into the Object Repository
Set we=Browser("Login").Page("Login").WebEdit("usernameField")
Set toProps=we.GetTOProperties()
Dim i,icount
icount=TOProps.Count-1
For i=0 to iCount
sName=TOProps(i).Name
sValue=TOProps(i).Value
Reporter.ReportEvent micPass,"Property:=" & sName & " Value :="&sValue,""
Next
Output :
Property :=type Value :=text
Property :=name Value :=usernameField
Property :=micclass Value :=WebEdit
Property :=html tag Value :=INPUT
' Assumption:Objects are already learned into the Object Repository
Set we=Browser("Login").Page("Login").WebEdit("usernameField")
Set toProps=we.GetTOProperties()
Dim i,icount
icount=TOProps.Count-1
For i=0 to iCount
sName=TOProps(i).Name
sValue=TOProps(i).Value
Reporter.ReportEvent micPass,"Property:=" & sName & " Value :="&sValue,""
Next
Output :
Property :=type Value :=text
Property :=name Value :=usernameField
Property :=micclass Value :=WebEdit
Property :=html tag Value :=INPUT
Tuesday, April 19, 2011
QTP : Create a text file using File System Object
'Create a file system object
Set fso=createObject("Scripting.FileSystemObject")
'Create a file over the file system object -
' Parameters -
' 1 - Path of the object
' 2 - True - denotes overwrite the file if it exists
set file1=fso.CreateTextFile("C:\test.txt",True)
' Write the text into the file
file1.write("hello world");
' file 1 is a TextStream Object
' Close the file
file1.close
Set fso=createObject("Scripting.FileSystemObject")
'Create a file over the file system object -
' Parameters -
' 1 - Path of the object
' 2 - True - denotes overwrite the file if it exists
set file1=fso.CreateTextFile("C:\test.txt",True)
' Write the text into the file
file1.write("hello world");
' file 1 is a TextStream Object
' Close the file
file1.close
Sunday, April 17, 2011
Top Quotes for the Day
- When your down and out, keep the faith and you will see that it was a necessary step for you to fly high
- If you love someone, tell them, show them ... Life is too short to hold back love. No Future is guarenteed
- The privilege of lifetime is being who you are - Joseph Campbell
- Forgiveness is the business of love
- If you are committed to your dream & don't give up, it's not a matter of "if" but "when"
- Give people room to decide for themselves ... that's LOVE
- Reminder : Letting go is another way of holding on
Tuesday, April 12, 2011
Word of the Day
Egocentric -
A self centered person with little regard for others.
Limited to or caring only about yourself and your needs.
Trepedation -
A feeling of alarm or dread
- A state of confusion, anxiety
Synonyms : apprehension
A self centered person with little regard for others.
Limited to or caring only about yourself and your needs.
- They are of the opinion that man is "Egocentric" by nature.
- Children are born egocentric, they stop crying when they are provided with what they require, and give nothing in return.
Trepedation -
A feeling of alarm or dread
- A state of confusion, anxiety
Synonyms : apprehension
- We all experience moments of trepedations and fear in our lives.
Monday, April 11, 2011
Number of Words in English Language
> 1,000,000 ( 1 million as on 2009 ) 1 millionth controversial word was "web2.0"
Word of the day
akin - similar in quality or character.
The basic vocabulary of German is akin to the English language.
ubiquitous - omnipresent
The language Hindi is ubiquitous in India.
summoned - Call in an official Manner, such as to attend a court
The Minister by summoned by the Prosecutor.
The basic vocabulary of German is akin to the English language.
ubiquitous - omnipresent
The language Hindi is ubiquitous in India.
summoned - Call in an official Manner, such as to attend a court
The Minister by summoned by the Prosecutor.
Thursday, April 7, 2011
Word of the Day
Salient - Prominent
Example :
Following are the good features of the product - Simple
Usage of Salient :
Following are the prominent features
Following are the salient features
Example :
Following are the good features of the product - Simple
Usage of Salient :
Following are the prominent features
Following are the salient features
Sunday, April 3, 2011
File - java.io.File
The following program displays the Free Space in various sizes of measurement Byte,KB,MB and GB for a particular drive.
package file_pkg;
import java.io.*;
public class file_cnt_words {
public static void main(String args[]) throws IOException
{
File file;
file=new File("D:/2011/Java Examples/files/file_txt.txt");
//D:/2011/Java Examples - getPath(); - get the path shows "PACKAGE FOLDER"
//file=new File("files/file_txt.txt");
sop(file.getAbsolutePath()); // Complete path
// Find Space on HDD
sop("Free Space in Drive is : "+file.getFreeSpace()+"Bytes");
sop("Free Space in Drive is : "+file.getFreeSpace()/1024+" KB");
sop("Free Space in Drive is : "+file.getFreeSpace()/1024/1024+" MB");
sop("Free Space in Drive is : "+file.getFreeSpace()/1024/1024/1024+" GB");
}
static public void sop(Object input)
{
System.out.println(input);
}
}
package file_pkg;
import java.io.*;
public class file_cnt_words {
public static void main(String args[]) throws IOException
{
File file;
file=new File("D:/2011/Java Examples/files/file_txt.txt");
//D:/2011/Java Examples - getPath(); - get the path shows "PACKAGE FOLDER"
//file=new File("files/file_txt.txt");
sop(file.getAbsolutePath()); // Complete path
// Find Space on HDD
sop("Free Space in Drive is : "+file.getFreeSpace()+"Bytes");
sop("Free Space in Drive is : "+file.getFreeSpace()/1024+" KB");
sop("Free Space in Drive is : "+file.getFreeSpace()/1024/1024+" MB");
sop("Free Space in Drive is : "+file.getFreeSpace()/1024/1024/1024+" GB");
}
static public void sop(Object input)
{
System.out.println(input);
}
}
Subscribe to:
Posts (Atom)