Good Work Thejaswi..!!!
PFA Regular Expressions Functions Utility. You can add this as well by
creating a Regular Expressions section in the site.
'll keep sending you more... :)
Thejaswi VLoading...
7:49 PM (23 hours ago)
Regards
Shalabh Dixit
On Sun, Jul 31, 2011 at 10:28 AM, Rupa Karunakar
<[email protected]>wrote:
> Hello Everyone,
>
> I am new to this group as well as to the field of QA too....I am planning
> to take HP-QTP certification.Kindly let me know
>
> the course content and where will get the study material for the same. Are
> there any free downloadble websites for the material ??
>
> Looking forward for suggestions.Thanks in advance.
>
> Regards,
> Rupa.
>
>
>
> On Sun, Jul 31, 2011 at 12:41 AM, Sam Bhaumik <[email protected]>wrote:
>
>> Hi
>> A very much practical oriented site for everyone using QTP.Please add more
>> stuff into it.Thanks for the effort.Keep the good work up.
>>
>>
>> Cheers
>> Sam
>>
>>
>> On Sun, Jul 31, 2011 at 12:05 AM, dinesh singh <[email protected]>wrote:
>>
>>> add more script and really a good matter it is Thanksssssss
>>>
>>> On Sat, Jul 30, 2011 at 8:11 PM, Deepak Kizhakatra
>>> <[email protected]>wrote:
>>>
>>>> Hi,
>>>>
>>>> Site is nice and it will be very helpful for all.. Thanks for creating a
>>>> site like this..
>>>>
>>>> Thanks,
>>>> Deepak
>>>>
>>>> On Sat, 30, 2011 at 7:49 PM, Thejaswi V <[email protected]> wrote:
>>>>
>>>>> Hi,
>>>>>
>>>>> I created a google site with all scripts and help links for qtp.
>>>>> Please send me your scripts/ help links, i will update so that it will
>>>>> be useful for every body. Please send your comments/suggestions.
>>>>> https://sites.google.com/site/qtpsitematerial/
>>>>>
>>>>> Thanks,
>>>>> Nagaraj
>>>>>
>>>>> --
>>>>> 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
>>>> "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
>>>>
>>>
>>>
>>>
>>> --
>>> Thanks & Regards
>>> Dinesh Singh
>>> +91-9310813656
>>>
>>>
>>> --
>>> 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
>> "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
> "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
"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
''=====================================================================================================================================================================
'''Function to check if a string matches a Regular Expression Pattern
''=====================================================================================================================================================================
Function IsRegExMatch(strText, regEx_Pattern, blnMatchCompleteString)
Dim oRegExp, retVal
' Create regular expression object.
Set oRegExp = New RegExp
'Set pattern.
oRegExp.Pattern = regEx_Pattern
'Ignore case
oRegExp.IgnoreCase = True
'Match complete string or not
oRegExp.Global = blnMatchCompleteString
'Test the regular expression
IsRegExMatch = oRegExp.Test(strText)
Set oRegExp = Nothing
End Function
''=====================================================================================================================================================================
'''Function to Match a Regular Expression and Replace with a particular text if
a string matches a regular expression pattern.
''=====================================================================================================================================================================
Function
RegExMatchandReplace(strText,regEx_Pattern,strReplacementText,blnMatchCompleteString)
Dim oRegExp, retVal,strReplacedText
' Create regular expression object.
Set oRegExp = New RegExp
'Set pattern.
oRegExp.Pattern = regEx_Pattern
'Ignore case
oRegExp.IgnoreCase = True
'Match complete string or not
oRegExp.Global = blnMatchCompleteString
'Test the regular expression
RegExMatch = oRegExp.Test(strText)
If RegExMatch = True Then
strReplacedText = oRegExp.Replace(strText,strReplacementText)
End If
RegExMatchandReplace = strReplacedText
Set oRegExp = Nothing
End Function
''=====================================================================================================================================================================
'''Function to Get Total Number of Matches of a Regular Expression Pattern in a
particular string
''=====================================================================================================================================================================
Function GetRegExMatchCount(strText, regEx_Pattern, blnMatchCompleteString)
Dim oRegExp, retVal
'Create regular expression object.
Set oRegExp = New RegExp
'Set pattern.
oRegExp.Pattern = regEx_Pattern
'Ignore case
oRegExp.IgnoreCase = True
'Match complete string or not
oRegExp.Global = blnMatchCompleteString
'Test the regular expression
RegExpMatch = oRegExp.Test(strText)
If RegExpMatch Then
Set oRegExMatchCount = oRegExp.Execute(strText)
GetRegExMatchCount = oRegExMatchCount.Count
End If
Set oRegExp = Nothing
End Function
''=====================================================================================================================================================================
'''Function to Trim white space characters from end of a string
''=====================================================================================================================================================================
Public Function RTrimW(ByVal Text)
'String pattern ending with carriage return, tab, new line or a space
character
RTrimPattern = "[\s]*$"
Dim oRegExp
Set oRegExp = New RegExp
oRegExp.Pattern =RTrimPattern
oRegExp.Global = False
RTrimW = oRegExp.Replace(Text,"")
Set oRegExp = Nothing
End Function
''=====================================================================================================================================================================
'''Function to Trim white space characters from start of a string
''=====================================================================================================================================================================
Public Function LTrimW(ByVal Text)
'String pattern ending with carriage return, tab, new line or a space
character
LTrimPattern = "^[\s]*"
Dim oRegExp
Set oRegExp = New RegExp
oRegExp.Pattern = LTrimPattern
oRegExp.Global = False
LTrimW = oRegExp.Replace(Text,"")
Set oRegExp = Nothing
End Function
''=====================================================================================================================================================================
''Function to Trim white space characters from both start and end of a string
''=====================================================================================================================================================================
Public Function TrimW(ByVal Text)
TrimW = LTrimW(RTrimW(Text))
End Function
