alt = "alla tecken du vill ha med"
string = "din textsträng som du vill 'rena'"
For i = 0 To Len(string)
If Instr(alt, Mid(string,i,1)) > 0 then
tmpstr = tmpstr & Mid(string,i,1)
End If
Next
string = tmpstr
Nu ligger din sträng i string
------------------
Vides motto: Ju fler saker man tycker är roligt, desto roligare har man www.webeye.nu
Vore det inte bättre att göra en regExp funktion? Det är ju som gjort för sådana här funktioner!
Kolla in VBScripts Refrensen (Kolla asp FAQ:en för URL) för mer info. Jag har nämligen inte använt mig av regExp själv ännu. Men det borde finnas någon artikel på http://www.4guysfromrolla.com
Ska kanske ta och kolla upp det där själv. Skriver jag något så kan jag ju posta det här.