07. september 2002 - 23:41
Der er
4 kommentarer og
1 løsning
Tilladte tegn i brugernavn
Jeg bruger følgende til at tjekke for ugyldige tegn i et brugernavn ved oprettelsen samt ændring af brugernavn.
Hvordan skal den se ud, hvis jeg i stedet ønsker at angive alle de tilladte tegn i stedet for de ugyldige tegn som i nedenstående?
'Check username for ugyldige tegn
ArrTegn = Array("|","(",")","<",">","""","'","[","]","^","{","}","¿","/","\",",","?","!","¤","%","&","=","#","~",".",":")
for i = 0 to Ubound(ArrTegn)
if not inStr(username,ArrTegn(i)) = 0 then
Fejl = Fejl & Usernamenotvalid2 & ";"
exit for
end if
next
07. september 2002 - 23:47
#1
Eks på en function som tjekke for loglige tegn i en streng:
'function som tjekker efter lovlige karakter
function validStr(strInput)
validChar = "abcdefghijlkmnopqrstæøå01234567890 "
for i = 1 to len(strInput)
if inStr(1, validChar, Mid(strInput,i,1)) = 0 then
validStr = false
exit function
end if
next
validStr = true
end function
str = "mitnyebrugernavn"
if validStr(str) then
Response.write "Dit nye brugernavn er ok."
else
Response.write "Du har angivet ulovlige tegn"
end if
07. september 2002 - 23:55
#3
Hvis du vil undgå at skrive både store og små bogstaver kan denne linie:
if inStr(1, validChar, Mid(strInput,i,1)) = 0 then
Rettes til denne så den ikke tjekker på Case.
if inStr(1, validChar, Mid(strInput,i,1), 1) = 0 then
