I'm attempting to convert the code from VB to VBscript to use in a ASP page. I'm getting an error on the line in red.
The error message is; "An exception of type "Microsoft VBScript runtine error: Sub or Function not defined" was not handled
I'm assuming that the error is caused by the "[A-Z]" portion of the If statement.
How do I resolve?
' Convert all non-alpha ' chars to spaces. ' For i = 1 To Len(WordStr) b = Mid(WordStr, i, 1) If (Not (b Like "[A-Z]")) Then WordStr = Replace(WordString, b, " ") End If Next
Thank you for the input. I was able to find another method of doing a Soundex conversion. It is not as complex. I will have to read and learn about the RegExp