<% usersNo=Session("usersNo") Set Baglanti=Server.CreateObject("ADODB.CONNECTION") Baglanti.Open Cumle Set Rs=Server.CreateObject("ADODB.RECORDSET") Sorgu="Select * from users where id="& usersNo &" " Rs.Open Sorgu, Baglanti, 1, 3 if not RS.EOF then session("k_a")=Rs("k_ad") %>
 
Üyelik Bilgileriniz Aşağıdaki gibidir
Ad: " size="20">
Soyad: " size="20">
Kullanıcı Adı: <%=Rs("k_ad") %> 
Şifre: " size="20">
Gizli Soru: " size="20">
Cevap: " size="20">
E-Mail Adresi: " size="20">
Doğum Tarihi: " size="20">
Cinsiyet:
<% else Response.Redirect ("hata/hatauyeyok.asp") end if %>