ASP de üyelik sistemi yapalim - ASP Webmaster bilgi bankası, knowledge base Webmaster Araçları

AnaSayfa > ASP > ASP de üyelik sistemi yapalim
Kategori: ASP
Gönderen: Admin
Tarih: 2008-11-11
Puan: 0   Puan:0 | Katılımcı:0 | Katılımcı : 0
Okunma: 6458
  
 
1 puan 2 puan 3 puan 4 puan 5 puan 6 puan 7 puan 8 puan 9 puan 10 puan

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

Evet arkadaşlar, bu dersimizde üyelik sistemi yapacağız.

Üyelik sisteminde admin ve mod panelerine bağlantı linkeleri oluşturacağız, fakat panellerimiz yok tabi ki, neyse başlayalım umarım işinize yarar.

Veri tabanı bağlantımız için:

ayarlar.asp



Kod Çizelgesi Kod Dili: php
<%
set bag=server.createobject("adodb.connection")
bag.open "provider=microsoft.jet.oledb.4.0;data source="& server.mappath("vt.mdb")
%>




Kullanıcının üye olması için formumuzu hazırlıyoruz:

uyeol.asp



Kod Çizelgesi Kod Dili: php
<!--#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">

<form id="form2" name="form2" method="post" action="uyeyap.asp"><br>
<table width="229" border="0">
<tr>
<td >Adınız:</td>
<td ><input name="ad" type="text" id="ad" size="12" /></td>
</tr>
<tr>
<td >Soyadınız:</td>
<td ><input name="soyad" type="text" id="soyad" size="12" /></td>
</tr>
<tr>
<tr>
<td class="current">Nerelisiniz:</td>
<td><input name="bulyer" type="text" id="bulyer" size="12" /></td>
</tr>
<td width="108" class="current">Kullanıcı Adınız:</td>
<td width="76"><input name="uyead" type="text" id="uyead" size="12" /></td>
</tr>
<tr>
<td class="current">Mail Adresiniz:</td>
<td><input name="uyemail" type="text" id="uyemail" size="12" /></td>
</tr>
<tr>
<td class="current">Şifre:</td>
<td><input name="uyesifre" type="password" id="uyesifre" size="12" /></td>
</tr>
<tr>
<td class="current">Şifre Tekrar:</td>
<td><input name="uyesifret" type="password" id="uyesifret" size="12" /></td>
</tr>
<tr>
<td class="current"> </td>
<td><div align="center">
<input type="submit" name="button" id="button" value="Gönder" />
</div></td>
</tr>
</table>
</form>
</td>

</tr>
</table>
</div>
</body>
</html>





uyeol.asp den gelen bilgilerin işleme alınığı bölüm:

uyeyap.asp




Kod Çizelgesi Kod Dili: php
<!--#include file="ayarlar.asp"-->
<%
kuladi=request.form("uyead")
email=request.form("uyemail")
sifred=request.form("uyesifre")
sifred2=request.form("uyesifret")
adi=request.form("ad")
soyadi=request.form("soyad")
bulundugu=request.form("bulyer")
set uye=server.createobject("adodb.recordset")
sqlcumle="select * FROM uye where uyead='"&kuladi&"'"
uye.open sqlcumle,bag,1,3
if not uye.eof then
if kuladi<>"" then
response.Redirect("hata.asp?hata=1")
end if
end if

set mail=server.createobject("adodb.recordset")
sqlcumle="select * FROM uye where uyemail='"&email&"'"
mail.open sqlcumle,bag,1,3
if not mail.eof then
if email<>"" then
response.Redirect("hata.asp?hata=7")
end if
end if
if adi="" then
response.Redirect("hata.asp?hata=8")
end if
if soyadi="" then
response.Redirect("hata.asp?hata=9")
end if
if kuladi="" then
response.Redirect("hata.asp?hata=2")
end if
if email="" then
response.Redirect("hata.asp?hata=3")
end if
if sifred="" then
response.Redirect("hata.asp?hata=4")
end if
if sifred2="" then
response.Redirect("hata.asp?hata=5")
end if
if sifred<>sifred2 then
response.Redirect("hata.asp?hata=6")
end if


if kuladi<>"" and email<>"" and sifred<>"" and sifred2<>"" then

uye.addnew
uye("uyead")=kuladi
uye("uyemail")=email
uye("uyesifre")=sifred
uye("soyad")=soyadi
uye("ad")=adi
uye("bulyer")=bulundugu
uye("yetki")="0"
uye.update
session("girs")="giris"
session("id")=uye("id")
session("uyeadi")=uye("uyead")
session("yetki")=uye("yetki")
session("adi")=uye("ad")
session("soyadi")=uye("soyad")
session("bulundugun")=uye("bulyer")
response.Redirect("basarili.asp")
else

end if
%>
<%
uye.close
set uye=nothing
bag.close
set bag=nothing

%>



Yorumlar
Henüz Kimse Yorum Yapmamış, ilk yorumu siz ekleyin!
Yorum Ekleme Aparatı
Yorum Eklemek için lütfen sol menuden giris yapınız..
Toplam 0 yorum listelendi.