<%if TestCaptcha("ASPCAPTCHA", Request.Form("captchacode")) then
kadi=postkontrol(Request.Form("kadi"))
sifre=postkontrol(Request.Form("sifre"))
sorgum="select * from uyeler where kadi='"&kadi&"' and sifre='"&sifre&"'"
rs.open sorgum,baglantim,1,3
if not rs.eof then
if rs("onay")=1 then
Session("uyegirdimi")="Evet"
session("kadi")=rs("kadi")
session("uyeid")=rs("id")
session("yetki")=rs("yetki")
rs("songiris")=now()
rs("ip")=Request.ServerVariables("HTTP_CLIENT-IP")
rs.update%>
Üye Girişi Başarıyla Gerçekleştirilmiştir.
<%else%>
Üyeliğiniz Devredışı Bırakılmıştır.
Lütfen Site Yönetimiyle İletişime Geçiniz.
<%end if%> Ana Sayfaya Otomatik Olarak Yönlendiriliyorsunuz.
Yönlendirme İşlemi İçin Tıklayınız.
<%else%>
Kullanıcı Adı veya Şifre Hatalı.
Lütfen Geri Dönüp Tekrar Deneyiniz.
Kullanıcı Adınızı veya Şifrenizi Unuttuysanız Geri Dönüp "Şifremi Unuttum" Linkini Tıklayınız.
<%end if%> <%else%>
Güvenlik Kodu Hatalı veya Eksik.
Lütfen Geri Gidip Güvenlik Kodunu Yenileyin Ve Düzgün Bir Şekilde Tekrar Girin.
<%end if%>
Üye Girişi Başarıyla Gerçekleştirilmiştir.
<%else%>
Üyeliğiniz Devredışı Bırakılmıştır.
Lütfen Site Yönetimiyle İletişime Geçiniz.
<%end if%> Ana Sayfaya Otomatik Olarak Yönlendiriliyorsunuz.
Yönlendirme İşlemi İçin Tıklayınız.
<%else%>
Kullanıcı Adı veya Şifre Hatalı.
Lütfen Geri Dönüp Tekrar Deneyiniz.
Kullanıcı Adınızı veya Şifrenizi Unuttuysanız Geri Dönüp "Şifremi Unuttum" Linkini Tıklayınız.
<%end if%> <%else%>
Güvenlik Kodu Hatalı veya Eksik.
Lütfen Geri Gidip Güvenlik Kodunu Yenileyin Ve Düzgün Bir Şekilde Tekrar Girin.
