Ark. Ödev olarak site yapıyom ama giriskontol.asp sorun var. Siteye normal kullanıcı adı dogru ve sifre dogru ıken gırıyo. Ama hatalı kullanıcı adı ile girince yanlıs gırıs yaptınız kod blodgu ıslemıyo. Bi yardım ederseniz çok sevincem öıkamadım ısın ıcınden.
<%@language=vbscript%> <% dim conn,rs,Sorgu,Baglinti Set conn = Server.CreateObject("ADODB.Connection") conn.provider="microsoft.jet.oledb.4.0." conn.open(server.mappath("üye.mdb")) Set rs = Server.CreateObject("Adodb.Recordset") rs.open "select * from tablo where kullanici_adi='" & request.form("kullanici_adi") & "' and sifre='" & request.form("sifre") & "'",conn
'response.write (request.form("kullanici_adi")) 'response.write (request.form("sifre")) while not rs.eof if rs.recordcount<>("kullanici_adi") & ("sifre") then response.write("Kullanıcı girisi yapılmıştır. Lütfen devam etmek için <a href='main.asp'>buraya</a> tıklayınız.") else response.write ("Böyle bir kullanıcı bulunmadı. Tekrar giris ekranına dönmek için <a href='giris.asp'>buraya</a> tıklayınız.") end if rs.movenext wend %> <html> <body background="../resim/back.jpg"> </body> </html>
if rs.recordcount<>("kullanici_adi") & ("sifre") then arkadaşım bu ne çözemedim sanki tablondaki kullanıcı sayisi kullanıcı adı ve şifreye eşit deilse gibi birsey çıkıor...Söle yap...
<% if rs("kullaniciadi")<>request("kullanici_adi") or rs("sifrem")<>request("sifre") then response.write("Böyle bir kullanıcı bulunmamaktadır...%> <%else response.redirect "Burayda dogru oldgunda gitmesini istediğin sayfaya yönlendir..." %> <% end if %>