Hej!

Har börjat på en liten kod för att få bort ogiltiga tecken ur användarnamn.

Nåt i stil med:

<%
dim Apa, i, a

Apa = "he#av%y me&tal 1/1"

for i = 0 to len(Apa)

a = left(Apa,i)
a = right(a,1)

'inte lika med a-ö eller 0-9
if not a = ? then
'blabla du får inte ha såna tecken
end if

next
%>

Frågan är nu hur man på något snabbt och enkelt sätt går igenom hela alfabetet utan att behöva skriva varje bokstav för hand.
Och 0-9 också givetvis..
Har för mig att det är nåt i stil med Like "[a-ö]" i Visual Basic?

Hoppas ni förstår och kan hjälpa mig (och förstå att koden ovan inte är så seriöst :) )

/Tobias
http://taxen.cjb.net

Hej
Förslag: att du betraktar tecknen som siffror 0 - 255
Chr$(0) - Chr$(255). Kolla in en ANSI standard tabell.

Dessa tecken plus en hel del till skal vara med.
48 - 57 , 65 - 90 , 97 - 122 196 197 214 228 229 245

mvh
Sven

Det skulle kanske kunna fungera. Har testat Asc$ (som i VB väl?) för att få fram de olika bokstävernas ASCII-värden, men det funka inte! Hur gör man det då?

/Tobias
http://taxen.cjb.net

Hej

Dim CharNum As Long

CharNum = Asc("A"). Kommer att lämna 65

mvh
Sven

Igen
Så här kan du göra för att få en lista

Private Sub Command1_Click()
Dim i As Long
For i = 0 To 255
List1.AddItem "ASCII " & Chr$(i) & " = " & Asc(Chr$(i))
Next 'i
End Sub

DS

Tacktack!

Får se om jag får ihop nåt bra i ASP också av det...

/Tobias
http://taxen.cjb.net