How do you find out whether the string is Numeric or Alpha numenric.Suppose..&

How do you find out whether the string is Numeric or Alpha
numenric.Suppose..'QTP is an automation testing tool 12345'
How should I know it is alphanumeric.Can any one please
write the code for this

Question Posted / guest

4 Answers
17630 Views
I also Faced
E-Mail Answers

Answers were Sorted based on User's Feedback

How do you find out whether the string is Numeric or Alpha numenric.Suppose..'QTP is an autom..

Answer / ashish sharma

str = "QTP is an automation testing tool "
Dim ianRegEx
Set ianRegEx = New RegExp
ianRegEx.Pattern = "[a-z]+[\s]*[0-9]+"
ianRegEx.Global = True
ianRegEx.IgnoreCase = True
msgbox ianRegEx.Test(str)

Is This Answer Correct ?

4 Yes

0 No

How do you find out whether the string is Numeric or Alpha numenric.Suppose..'QTP is an autom..

Answer / a.thirumalareddy@gmail.com

use this function it will help u..

Function IsAlphaNumeric()
If IsNull(str) Then str = "QTP is an automation testing tool 12345"
Dim ianRegEx
Set ianRegEx = New RegExp
ianRegEx.Pattern = "[^a-z0-9]"
ianRegEx.Global = True
ianRegEx.IgnoreCase = True
IsAlphaNumeric = (str = ianRegEx.Replace(str,"QTP is an automation testing tool 12345"))

msgbox IsAlphaNumeric

End Function

call IsAlphaNumeric()

Is This Answer Correct ?

4 Yes

2 No

How do you find out whether the string is Numeric or Alpha numenric.Suppose..'QTP is an autom..

Answer / xyz

Hi Tirumalareddy thanks for giving the reply.I have
executed the script.It is working fine for the above
srting.but if I removed 12345 from the string,still it is
displaying TRUE.I think it is not correct.anyhow thanks for
reply

Is This Answer Correct ?

2 Yes

0 No

How do you find out whether the string is Numeric or Alpha numenric.Suppose..'QTP is an autom..

Answer / mrclock

A.thirumalareddy was on the right track, but here is a
revised and working version of his code:

Function IsAlphaNumeric()
Dim strText: strText = "QTP is an automation testing tool
12345" 'Search String
Dim ianRegEx
Set ianRegEx = New RegExp
ianRegEx.Pattern = "[^a-z0-9]" 'Define Search Pattern
ianRegEx.Global = True 'Apply Globally
ianRegEx.IgnoreCase = True 'Ignore upper/lower case
IsAlphaNumeric = ianRegEx.Test(strText) 'Use Test method
for a True/False test
msgbox IsAlphaNumeric 'Display True/False
End Function

call IsAlphaNumeric()

Is This Answer Correct ?

1 Yes

1 No

Post New Answer