Using replace string in ASP

Question

I have a working function in JS

function countWords(s){
    s = s.replace(/(^\s*)|(\s*$)/gi,""); //modified trim function
    s = s.replace(/[ ]{2,}/gi," ");
    s = s.replace(/\n /,"\n");
    return s.split(' ').length;
}

The problem is when i change to ASP, it seems not working:

   Sub formatText(a)
        a = Replace("/(^\s*)|(\s*$)/gi",a,"")
        a = Replace("/[ ]{2,}/gi",a,"")
        a = Replace("/\n /",a,"\n")
        return a
    End Sub

It return nothing from the function, how to fix the problem? thanks

Changed to

'regEx initialization
Dim regEx
set regEx = New RegExp  'Creates a regexp object
regEx.IgnoreCase = True 'Set case sensitivity
regEx.Global = True     'Global applicability

'trim input text
Sub formatText(a)
    a = Replace("(^\s*)|(\s*$)",a,"")
    a = Replace("[ ]{2,}",a,"")
    regEx.IgnoreCase = False 'Set case sensitivity
    regEx.Global = False     'Global applicability
    a = Replace("\n ",a,"\n")
    return a
End Sub

still no luck please help..

The / at the beginning and end of your regexes is JavaScript regex literal syntax, not part of the actual regex expressions. You don't want it in your ASP version, though I don't know how to set the g and i flags or their equivalent in VB. — nnnnnn
– nnnnnn, Commented Jun 3, 2013 at 11:13
May be your problem will resolve from this link stackoverflow.com/questions/8219317/… — Amit
– Amit, Commented Jun 3, 2013 at 11:14

DAC84 · Accepted Answer · 2013-06-03 11:40:00Z

2

You'll need to use a regex object, like so:

'regEx initialization
Dim regEx
set regEx = New RegExp  'Creates a regexp object
regEx.IgnoreCase = True 'Set case sensitivity
regEx.Global = True     'Global applicability

regEx.Pattern = "<[^>]*>" 'Remove all HTML
strTextToStrip = regEx.Replace(strTextToStrip, " ")

Also remove the / from around the pattern.

UPDATED

'trim input text
Function formatText(a)
    Dim regEx
    set regEx = New RegExp  'Creates a regexp object
    regEx.IgnoreCase = True 'Set case sensitivity
    regEx.Global = True     'Global applicability

    regEx.Pattern = "(^\s*)|(\s*$)"
    a = regEx.Replace(a, "")

    regEx.Pattern = "[ ]{2,}"
    a = regEx.Replace(a, "")

    formatText = a
End Function

edited Jun 3, 2013 at 11:40

answered Jun 3, 2013 at 11:19

DAC84

1,2641 gold badge20 silver badges30 bronze badges

Sign up to request clarification or add additional context in comments.

3 Comments

user1871516 Over a year ago

is using count as -1 can do the same thing? Replace(expression, find, replacewith[, start[, count[, compare]]])

DAC84 Over a year ago

I don't believe so no, see msdn.microsoft.com/en-us/library/k9z80300(v=vs.84).aspx

user1871516 Over a year ago

sorry but would you mind have a look at my changed version, why it still return nothing?

Collectives™ on Stack Overflow

Using replace string in ASP

1 Answer 1

3 Comments

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

3 Comments

Your Answer

Sign up or log in

Post as a guest

Linked

Related