Answer Posted / 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()

If I change the object name in one action will it be updated in all the actions? Or not?

1070

---

Differences between text and test area checkpoints?

1115

---

How to perform cross platform testing and cross browser testing using qtp? Can you explain giving some example?

1017

---

How to remove the associated function library?

999

---

What ate the Technologies supported by QTP?

1158

---

How Can I find the least value in a bunch of variables using qtp.. E.g.:- A = 210, B = 212, C = 60, D = 111 I don’t want to write bunch of lines for this…. Is there a way to get the result in one line…..

2096

---

Excel sheet having some datas and some datas present in the application (in table). How will you compare these two datas? Write code to fetch datas from Excel sheet.

1982

---

how can we preform retesting(DATA driven test) using function please gine the code for loginpage

2901

---

How do know the number of browsers opened?

1081

---

hi can anybody help with an qtp 9.2 license key please. Thanks, Nitesh.

2355

---

What is the difference between run time object and test object?

1118

---

tell me exact differenceb bw qtp and selenium?(could not tell open soure and licennce? difference in usage and technical difference?

2163

---

distinguish between old version and new version QTP features.

2349

---

banking domain description for software tester for interview

3924

---

How can we retrieve the Bug Ids which are open&Reopen in status through QTP scrit?Please find the script which i tried... Dim objBugFactory, objBug Dim BugId Set TDConnection = QCUtil.TDConnection Set objBug = TDConnection.BugFactory If QCUtil.IsConnected then Reporter.ReportEvent 0, "Connected", "Connected to server: " + QCUtil.TDConnection.ServerName + chr (13) +"Project: " + QCUtil.TDConnection.ProjectName + chr (13) + "Domain: " + QCUtil.TDConnection.DomainName Reporter.ReportEvent 0, "Current time on server is","==>" & TDConnection.ServerTime Else Reporter.ReportEvent 1, "Not connected", "Not connected to Quality Center" End If If mybug.Status="Open" Then BugId=mybug.DefectId MsgBox BugId End If 'OR**********************************--------------------- -----********************************** If Bug_Fields("BG_STATUS").Value ="Open" Or "Re Open"Then BugId=Bug_Fields("BG_BUG_ID").Value MsgBox BugId End If

3041

---