Well, here's a script that removes non-numerics from a string. So maybe this will help:
http://www.mjtnet.com/forum/viewtopic.p ... ber+string
Or use VBScript's regular expressions. This script extracts all numerics from a string:
VBSTART
Function RegExpTest(patrn, strng)
Dim regEx, Match, Matches
Set regEx = New RegExp
regEx.Pattern = patrn
regEx.IgnoreCase = True
regEx.Global = True
Set Matches = regEx.Execute(strng)
For Each Match in Matches
RetStr = RetStr & Match.Value
Next
RegExpTest = RetStr
End Function
VBEND
Let>MyString=Today is 9th March 2005
VBEval>RegExpTest("(\d+)","%MyString%"),numbers
MessageModal>numbers
If you run that without modification the message box will display 92005.