Hur gör jag för att sortera bort alla andra teckan än aA-öÖ samt 0-9
Alltså ta bort allt annat typ | [ { etc
------------------
fencing for you?
http://www.fencing4u.nu/"]http://www.fencing4u.nu/
6 svar · 218 visningar · startad av skarbratt
Hur gör jag för att sortera bort alla andra teckan än aA-öÖ samt 0-9
Alltså ta bort allt annat typ | [ { etc
------------------
fencing for you?
http://www.fencing4u.nu/"]http://www.fencing4u.nu/
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.
------------------
/Magnus aka Zaphod
www.designmodule.com.bi
Ok, men det verkar för mig vara så att det första programet inte fungerar så bra för mig... Gäller det bara mig?
------------------
fencing for you?
http://www.fencing4u.nu/
Vilket program???
------------------
Den som bär kläder har en anledning till detta...
www.webeye.nu
Program och program, menar väll snarare koden du bidog med här:
Får följande fel:
Körningsfel i Microsoft VBScript error '800a01f5'
Otillåten tilldelning: 'string'
content/test.asp, line 30
Och byter jag utt "string" till "text" får jag följande fel:
Körningsfel i Microsoft VBScript error '800a0005'
Ogiltigt proceduranrop eller argument.: 'Mid'
/content/test.asp, line 33
------------------
fencing for you?
http://www.fencing4u.nu/
Klantigt av mig, man måste ju börja på bokstav 1, byt detta:
For i = [b]1[/b] To Len(string)
------------------
Den som bär kläder har en anledning till detta...
www.webeye.nu
[Redigerat av Vide den 12 jul 2000]