get the order no from the following orderdetails
orderstring="ORD13456PNR"
eg:13456

Answer Posted / srikanth

Dim mystring, myLength
mystring = "ORD13456PNR"
myLength = Len(mystring)

For i = 1 To myLength
If Asc(Mid(mystring, i, 1)) <> 32 Then
If Asc(Mid(mystring, i, 1)) >= 48 And Asc(Mid(mystring, i, 1)) <= 57 Then
myNumber = myNumber & Mid(mystring, i, 1)
End If
Else
msgbox("no numeric")
End If
Next
msgbox(myNumber)

Is This Answer Correct ?    1 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

What is ‘object spy’ and what is the function of object spy in qtp?

578


What is the use of an object spy tool in qtp?

561


What are the general steps involved in the data driven framework?

559


what is the difference between development and testing

2394


What is expert view in qtp?

589






Can anyone share/send me QTP 8.2 Crack as I had it before but now it's virus affected. Pls send me on Sawale.vijay@gmail.com Thanks, ~Vijay

2668


What is a recovery scenario?

573


what is description object?

1602


which type of testing process are you following in ur company? how to recognize a qtp page?

1409


Is any limitation to xml checkpoints?

565


Can any body please tell me the steps of keyword driven framework of QTP.

1570


Describe function procedure in vbscript.

555


I want to write some certification courses, so friends could you guide me? which certification is best and how to write exam and what tutorials need to be studied,what to do first, I am working on automation tool QTP 9.2

1498


How to create Reusable and Multiple Actions?

1713


What is meant by a Check Point in UFT? Also, explain the applicable Check Points.

709