[antivitamin]

snitz forum'un bizim için bug sayılabilecek bir hatası vardı , kullanıcı adları sonuna boşluk konulmasına izin veriyordu ve ben bu hatayı register.ASP'ye eklediğim aşağıdaki yama ile aştığımı sandım

if (Instr(Request.form("Name"), ">") > 0 )_
 or (Instr(Request.form("Name"), "<") > 0)_
 or (Instr(Request.form("Name"), "&nbsp;") > 0)_
 or (Instr(Request.form("Name"), "*") > 0)_
 or (Instr(Request.form("Name"), "_") > 0)_
 or (Instr(Request.form("Name"), ".") > 0)_
 or (Instr(Request.form("Name"), ",") > 0) then
Err_Msg = Err_Msg & "<li>Lütfen başka bir kullanıcı adı seçin.</li>"
end if

sandım diyorum çünkü Alt+0160 ile kullanıcı adına yine boşluk koyarak kayıt yapılabiliyor.
Bunu nasıl engellerim?

Not:Üstteki boşluklardan birinde nbsp kullanılmıştır.

[wefra]

if (Instr(Request.form("Name"), ">") > 0 )_
or (Instr(Request.form("Name"), "<") > 0)_
or (Instr(Request.form("Name"), " ") > 0)_
or (Instr(Request.form("Name"), " ") > 0)_
or (Instr(Request.form("Name"), "_") > 0)_
or (Instr(Request.form("Name"), ".") > 0)_
or (Instr(Request.form("Name"), ",") > 0)_
or Asc(Request.form("Name") = 160 then
Err_Msg = Err_Msg & "<li>Lütfen başka bir kullanıcı adı seçin.</li>"
end if

kodlar bu sekide degistirilse sorun kalmaz

[antivitamin]

Microsoft VBScript compilation error '800a03ee'

Expected ')'

/ver8/forum/register.ASP, line 107

or Asc(Request.form("Name") = 160 then

yine de teşekkürler

[wefra]

kodlara eklediğim satırda
or Asc(Request.form("Name") = 160 then
Asc Fonksiyonun parantezi kapatılmamış. kapayıverseydin hata vermezdi.
doğrusu şöyle olcak
or Asc(Request.form("Name"))= 160 then

[antivitamin]

Bilgin olsun diye söylüyorum düzelttiğin kod çalışmadı.Sen de denemedin sanırım.Herneyse, ingilizcesi iyi olan bir arkadaşım (blackinwhite - teşekkürler) snitz e bir bug raporu verecek, öyle halledeceğiz sanırım.

[wefra]

çok özür dilerim seni boşuna uğraştırdım. ama bu sefer deneyerek yolluyorum. kodlara eklenen for döngüsü nbspyi yakalıyor.

if (Instr(Request.form("Name"), ">") > 0 )_
or (Instr(Request.form("Name"), "<") > 0)_
or (Instr(Request.form("Name"), " ") > 0)_
or (Instr(Request.form("Name"), " ") > 0)_
or (Instr(Request.form("Name"), "_") > 0)_
or (Instr(Request.form("Name"), ".") > 0)_
or (Instr(Request.form("Name"), ",") > 0) then
Err_Msg = Err_Msg & "<li>Lütfen başka bir kullanıcı adı seçin.</li>"
end if

str = Request.form("Name")
For a = 1 To Len(str)
If Mid(str, a, 1) = Chr(160) Then
Err_Msg = Err_Msg & "<li>Lütfen başka bir kullanıcı adı seçin.</li>"
End If
Next

[wefra]

çok özür dilerim seni boşuna uğraştırdım. yazım yanlışı bir yana inanılmaz da mantık hatası yapmışım. ama bu sefer deneyerek yolluyorum. kodlara eklenen for döngüsü nbspyi yakalıyor.

if (Instr(Request.form("Name"), ">") > 0 )_
or (Instr(Request.form("Name"), "<") > 0)_
or (Instr(Request.form("Name"), " ") > 0)_
or (Instr(Request.form("Name"), " ") > 0)_
or (Instr(Request.form("Name"), "_") > 0)_
or (Instr(Request.form("Name"), ".") > 0)_
or (Instr(Request.form("Name"), ",") > 0) then
Err_Msg = Err_Msg & "<li>Lütfen başka bir kullanıcı adı seçin.</li>"
end if

str = Request.form("Name")
For a = 1 To Len(str)
If Mid(str, a, 1) = Chr(160) Then
Err_Msg = Err_Msg & "<li>Lütfen başka bir kullanıcı adı seçin.</li>"
End If
Next

[antivitamin]

çok teşekkürler dostum, çok makbule geçti