Replace 1

[mdr2273]

What is the syntax to replace a character in a string with another character or a blank? I want to replace the $ , and . someone might enter in a field I want to hold a currency amount.

 

[Tarwn]

Try this link

-T

 

[Abraxus]

Replace(Replace(Request.Form("myfield"),"$",""),".","")

And the general syntax for Replace is:

Replace([i]string, value to replace, replacement value[/i])

In your case Replace is being used twice to replace both $s and .s in the form field with nothing.

 

[madanthrax]

Hi,

If I wanted to replace several characters would I have to use replace replace...... for every one ? Or is there a neater way please?

Also is there a way to only allow Alphanumeric character in ASP/VB, I mean replace anything that is'nt a letter or number.

Thanks for any help.

Ant

[sub]"Nothing is impossible until proven otherwise"[/sub]​

 

[Abraxus]

I'm pretty sure that can be accomplished with regular expressions, but you'll have to look those up since I don't work with them very often

 

[DotNetGnat]

yes regular expressions are what you are looking for...

-DNG

 

[Tarwn]

The most basic way to use a regular expression to remove characters (or replace them) is:

Dim regex
Set regex = New regExp
regex.Global = True
regex.IgnoreCase = True
regex.pattern = "\$\."

Dim myString = "abcdefg$$$hij.kl.m$..etc"
Response.Write regex.Replace(myString,"")

Since both . and $ are special characters for regular expressions, I had to use a \ to escape them. you can find some good tutorials on regular expressions here:

http://www.4guysfromrolla.com/webtech/090199-1.shtml

- Two part intro to regular expressions and using them with VBScript

http://www.4guysfromrolla.com/webtech/031500-1.shtml

- More details on building regular expressions

The first page of the first link is useful, the second page jumps too far ahead (in my opinion)
The second link goes through the characters and how to build patterns and ends with some inofrmation on using the Replace() method.

Hope this helps,
-T

 

[madanthrax]

Excellent!

Thanks all.

[sub]"Nothing is impossible until proven otherwise"[/sub]​