Üyelik Sistemi Yapalım (2. Bölüm)

Üyelik sistemi konulu dersimize devam ediyoruz.

Veri tabanı kayıt işlemi başarılı olması durumunda:

basarili.asp

<!--#include file="ayarlar.asp"-->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-9" />
<title>emre çelebi Sanalkurs.net</title>

</head>
<body>

<div align="left">
  
    <tr>
    
      <td align="center" valign="top" bgcolor="#E4E4E4">		
      <%response.write("İşlem Başarılı.<br>")
	  response.write("Hoş Geldin "&session("uyeadi"))
		response.write("<br><a href='default.asp'>Anasayfa'ya Git</a>")
		
		%></td>
      
    </tr>
  </table>
</div>
</body>
</html>

anasayfada üye giris alanımız:

uyegiris.asp

<!--#include file="ayarlar.asp"--><head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-9" />
<title>emre çelebi sanalkurs.net</title>
</head>



<%
if session("id")<>"" then
%>

<div class="menutitle">Giriş</div>
Hoş Geldin  <%=session("uyeadi")%>
<%if session("yetki")="1" then%>
<br>
<a href="admin/default.asp">Admin Giriş</a>
<br>
<a href="moderator/default.asp">Moderator Giriş</a>
<br>
<%end if%>
<%if session("yetki")="2" then%>
<br>
<a href="moderator/default.asp">Moderator Girşi</a>
<br>
<%end if%>
<a href="cikis.asp">Güvenli Çıkış</a>
<%else%>
<div class="menutitle">Giriş</div><ul>
<form action="kontrol.asp" method="post">
Kullanıcı Adı:<br>
 <input name="uyead" type="text" id="uyead" size="12" /><br>
Şifre:    <br>    <input name="uyesifre" type="password" id="uyesifre" size="12" />
<input type="submit"  value="Giriş" />
<br>
<a href="uyeol.asp" class="menutitle">&nbsp;&nbsp; Üye Ol</a>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href="sifrehatirlat.asp">Şifremi Unuttum</a>
</form>
<%end if%>

uyegiris formundan alandan doldurulup formun kontrol için gönderildiği bölüm:

kontrol.asp

<!--#include file="ayarlar.asp"-->
<%
kuld=request.form("uyead")
sifd=request.form("uyesifre")

set uyead=server.CreateObject("adodb.recordset")
sql="select * from uye where uyead='"&kuld&"' and uyesifre='"&sifd&"'"
uyead.open sql,bag,1,3
if not uyead.eof then
session("giri&#254;")="giri&#254;"
Session("idd")=Session.SessionID
session("toplam")=session("toplam")+1
session("id")=uyead("id")
session("uyeadi")=uyead("uyead")
session("yetki")=uyead("yetki")
session("adi")=uyead("ad")
session("soyadi")=uyead("soyad")
response.Redirect("default.asp")
else
response.Redirect("hata.asp")
end if
%>

[/b]

"Üyelik Sistemi Yapalım (2. Bölüm)" dersi için 4 yorum var

Üye olmadan yorum ekleyemezsiniz !