Üye Bilgi Güncelleme
<%if session("uyegirdimi")="Evet" then%> <%id=postkontrol(Request.QueryString("id" )) islem=Request.QueryString("islem") if islem="duzenle" then sorgum="select * from uyeler where id="&id Rs.Open Sorgum, Baglantim, 1, 3 rs("kadi")=postkontrol(Request.Form("kadi")) rs("sifre")=postkontrol(Request.Form("sifre")) rs("gizlisoru")=Request.Form("gizlisoru") rs("gizlicevap")=Request.Form("gizlicevap") rs("isim")=postkontrol(Request.Form("isim")) rs("soyisim")=postkontrol(Request.Form("soyisim")) rs("cinsiyet")=Request.Form("cinsiyet") rs("dogum")=Request.Form("dogum") rs("sehir")=postkontrol(Request.Form("sehir")) rs("ulke")=postkontrol(Request.Form("ulke")) rs("meslek")=postkontrol(Request.Form("meslek")) rs("email")=Request.Form("email") rs("website")=Request.Form("website") rs("aciklama")=Request.Form("aciklama") rs.update Response.Redirect("bilgilerimi_degistir.asp?kadi="&rs("kadi")&"&id="&rs("id")&"&islem=tamam") Response.Write("
Üyeyi Güncelliyorum
") end if if id<>"" then sorgum="select * from uyeler where id="&id&" order by id desc" Rs.Open Sorgum, Baglantim, 1, 3 if rs.eof or rs.bof then%> <% else %>
Üyelik Tarihi :
" size="25" maxlength="25" readonly="true">
Cinsiyet :
Adınız :
" size="25" >
Soyadınız :
" size="25" >
Kullanıcı Adı :
" size="25" maxlength="25">
Şifreniz :
" size="25" >
Gizli Soru :
" size="25" >
Gizli Cevap :
" size="25" >
Şehir :
" size="25" >
Ülke :
" size="25" >
Web Site :
" size="25" >
E-Mail :
" size="25">
Doğum Tarihi :
" size="25" >
Meslek :
" size="25" >
Hakkınızda :
NOT : Tüm alanları eksiksiz ve doğru bi şekilde girmelisiniz. <%if request.QueryString("islem")="tamam" then%>

Bilgileriniz Başarıyla Güncelleştirildi.
<%end if%>
<% end if %><%end if%> <%else%>


Bu Sayfayı Görme Yetkiniz Yok.


<%end if%>