Üye Girişi
Bağlan Google+ ile Bağlan Facebook ile Bağlan
Yeni Kayıt
Tüm Forumlar
  • Tüm Forumlar
  • Web Tasarım - Programlama
  • Tasarım ve grafik
  • Web Tasarım ve Hazır Kodlar
  • Bu Konuda
Şimdi Ara

ASP ÜYE GİRİŞ SİSTEMİ YARDIM

Sıcak Fırsatlarda Tıklananlar
Editörün Seçtiği Fırsatlar
Bu Konudaki Kullanıcılar:
2 Misafir - 2 Masaüstü
5 sn
1
Cevap
0
Favori
786
Tıklama
Daha Fazla
İstatistik
  • Konu İstatistikleri Yükleniyor
Konuya Özel
0 oy
Öne Çıkar
Cevapla
Sayfa: 1
Giriş
Mesaj
  • 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>







    • 
Sayfa: 1

Benzer içerikler

- x
Bildirim
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz.
Hizmet kalitesi için çerezleri kullanabiliriz. DH’ye girerek kullanım izni vermiş sayılırsınız.
Anladım Veri Politikamız