Slet specialtegn i et filnavn

Jeg ved godt, at "20" i tegnene "%20" ikke er specialtegn, men de skal væk alligevel :)

Du kan lave en function som denne med regexp som kun tillader karakter a->z 0->9 og . naturligvis. Alle andre tegn fjerne



Function fixName(myString)
Set rex = New RegExp
rex.Pattern = "[a-z0-9\.]"
rex.IgnoreCase = True
rex.Global = True
set matches = rex.Execute(myString)
for each match in matches
    myMatchString = myMatchString + match
Next
Set RegularExpressionObject = nothing
fixName = myMatchString
End Function


'Som test

Response.Write fixName("mit billede%20!""#¤%&/()=?.jpg")

Eagleeye kig lige på følgende spørgsmål

http://www.eksperten.dk/spm/362094

Super mange tak, men kan du ikke få et andet script til at slette mellemrummet (altså "%20") inden, at dit script gennemløbes ellers kommer der filen bare til at hedde: mitbillede20.jpg

>>jtc
Hvilken relevans skulle det have?

Ja ok, det så fordi den tillader tal i nanvet.

Der kan du bruge replace:

filnavn = "mit billede%20!""#¤%&/()=?.jpg"
filnavn = replace(filnavn,"%20","")
Response.Write fixName (filnavn)

Det har heller ikke nogen relevans i forbindelse med dette spørgsmål, men jeg prøver at få fat i eagleeye