
<%
if session("aktif_uyemiz") <> "" then
%>
<html>
<%Dim db_yolu,dsn
db_yolu = Server.MapPath("../../db/vt.mdb")
dsn = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & db_yolu
Set conn=CreateObject("Adodb.Connection")
conn.open (dsn)
Set rst=CreateObject("Adodb.Recordset")
rst.open "Select rg, sifre, adi, soyadi, bolum, sinif, ogretim, dogum, yer, mail from uyelik where num='" & session("aktif_uyemiz") & "'",conn,3,3
%>
<head>
<meta http-equiv="Content-Language" content="tr">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
<title>PROFİL</title>
</head>

<body topmargin="0" leftmargin="0" bgcolor="#F9F9F9" link="#800000" vlink="#800000" alink="#800000">

<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="329" id="AutoNumber1" height="350">
  <tr>
    <td width="329">
    <form method="POST" action="kontrol.asp">
      &nbsp;<br>
     
      <div align="center">
        <center>
     
      <table border="0" width="279" style="border-collapse: collapse" bordercolor="#111111" cellpadding="0" cellspacing="0" bgcolor="#F3F3F3">
      <tr>
      <td width="273" style="border: 1px dashed #000000; padding-left: 4; padding-right: 4; padding-top: 1; padding-bottom: 1">
      <table align=center border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber4">
        <tr>
          <td  width="100%">
          <table border="0" cellpadding="2" style="border-collapse: collapse" bordercolor="#111111" width="94%" id="AutoNumber5">
            <tr>
              <td width="49%" height="5" ></td>
              <td width="51%" height="5" ></td>
            </tr>
            <tr>
              <td width="49%" align="center" height="87">
              <% Response.Write "<img border=1 src=../../images/ogr/uyeler/" & session("aktif_uyemiz") & ".jpg>" %>
            </td>
              <td width="51%" height="87">
              <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber10">
                <tr>
                  <td width="100%">
                  <img border="0" src="../../IMAGES/OGR/profil/profil.jpg"></td>
                </tr>
                <tr>
                  <td width="100%">&nbsp;</td>
                </tr>
                <tr>
                  <td width="100%" style="border-left-width: 1; border-right-width: 1; border-top-style: dashed; border-top-width: 1; border-bottom-style: dashed; border-bottom-width: 1" bgcolor="#F9F9F9">
                  <p align="center"><font face="Verdana" color="#800000" size="2">
              <b><% Response.Write session("aktif_uyemiz") %></b></font></td>
                </tr>
                </table>
              </td>
            </tr>
            <tr>
              <td width="49%" height="4" >
              <p align="center"></td>
              <td width="51%" height="4" ></td>
            </tr>
          </table>
          </td>
        
        </tr>
        <tr>
          <td width="100%">
          <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="98%" id="AutoNumber6">
            <tr>
              <td width="10%" align="center">:</td>
              <td width="43%" align="left" bgcolor="#FFFFFF"><font face="Verdana" size="2">&nbsp;Bölüm
              </font></td>
              <td width="188%" bgcolor="#FFFFFF"><font face="Arial" size="2">
              <% Response.Write rst("bolum") %></font></td>
            </tr>
            <tr>
              <td width="10%" align="center">:</td>
              <td width="43%" align="left" bgcolor="#F9F9F9">
              <font face="Verdana" size="2">&nbsp;Sınıf</font></td>
              <td width="188%" bgcolor="#F9F9F9"><font face="Arial" size="2"><% Response.Write rst("sinif")%>.sınıf&nbsp;&nbsp;<%Response.Write rst("ogretim")%>.öğretim</font></td>
            </tr>
            <tr>
              <td width="10%" align="center">:</td>
              <td width="43%" align="left" bgcolor="#FFFFFF"><font face="Verdana" size="2">
              &nbsp;Resmi göster</font></td>
              <td width="188%" bgcolor="#FFFFFF">
              <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="93%" id="AutoNumber11" bgcolor="#FFFFFF">
                <tr>
                  <td width="50%">
                  
                  <input type="radio" value="E" <% if rst("rg")="E" then 
                  Response.Write "checked"
                  End If
                  %> name="rg"><font face="Verdana" size="2">Evet</font></td>
                  <td width="50%">
                  <input type="radio" name="rg" value="H" <% if rst("rg")="H" then 
                  Response.Write "checked"
                  End If
                  %>><font face="Verdana" size="2">Hayır</font></td>
                </tr>
              </table>
              </td>
            </tr>
            <tr>
              <td width="10%" align="center">:</td>
              <td width="43%" align="left" bgcolor="#F9F9F9">
              <font face="Verdana" size="2">&nbsp;Şifre</font></td>
              <td width="188%" bgcolor="#F9F9F9">
              <input name="sifre" size="16" style="color: #800000; border: 1px solid #747474; padding-left: 4; padding-right: 4; padding-top: 1; padding-bottom: 1; background-color: #FFFFFF" type="password" value=<% Response.Write rst("sifre") %>></td>
            </tr>
            <tr>
              <td width="10%" align="center">:</td>
              <td width="43%" align="left" bgcolor="#FFFFFF">
              <font face="Verdana" size="2">&nbsp;Şifre Tekrar</font></td>
              <td width="188%" bgcolor="#FFFFFF">
              <input name="sifre2" size="16" style="color: #800000; border: 1px solid #747474; padding-left: 4; padding-right: 4; padding-top: 1; padding-bottom: 1; background-color: #FFFFFF" type="password" value=<% Response.Write rst("sifre") %>></td>
            </tr>
            <tr>
              <td width="10%" align="center">:</td>
              <td width="43%" align="left" bgcolor="#F9F9F9"><font face="Verdana" size="2">&nbsp;Adı
              </font></td>
              <td width="188%" bgcolor="#F9F9F9">
              <input name="adi" size="20" style="color: #800000; border: 1px solid #747474; padding-left: 4; padding-right: 4; padding-top: 1; padding-bottom: 1; background-color: #FFFFFF" value=<% Response.Write rst("adi") %>></td>
            </tr>
            <tr>
              <td width="10%" align="center">:</td>
              <td width="43%" align="left" bgcolor="#FFFFFF"><font face="Verdana" size="2">&nbsp;Soyadı
              </font></td>
              <td width="188%" bgcolor="#FFFFFF">
              <input name="soyadi" size="20" style="color: #800000; border: 1px solid #747474; padding-left: 4; padding-right: 4; padding-top: 1; padding-bottom: 1; background-color: #FFFFFF" value=<% Response.Write rst("soyadi") %>></td>
            </tr>
            <tr>
              <td width="10%" align="center">:</td>
              <td width="43%" align="left" bgcolor="#F9F9F9"><font face="Verdana" size="2">&nbsp;Doğum 
              Tarihi </font></td>
              <td width="188%" bgcolor="#F9F9F9">
              <input name="dogum" size="20" style="color: #800000; border: 1px solid #747474; padding-left: 4; padding-right: 4; padding-top: 1; padding-bottom: 1; background-color: #FFFFFF" value=<% Response.Write rst("dogum") %>> </td>
            </tr>
            <tr>
              <td width="10%" align="center">:</td>
              <td width="43%" align="left" bgcolor="#FFFFFF"><font face="Verdana" size="2">
              &nbsp;Yaşadığı Yer </font></td>
              <td width="188%" bgcolor="#FFFFFF">
              <input name="yer" size="20" style="color: #800000; border: 1px solid #747474; padding-left: 4; padding-right: 4; padding-top: 1; padding-bottom: 1; background-color: #FFFFFF" value=<% Response.Write rst("yer") %>></td>
            </tr>
            <tr>
              <td width="10%" align="center">:</td>
              <td width="43%" align="left" bgcolor="#F9F9F9"><font face="Verdana" size="2">
              &nbsp;Mail adresi </font></td>
              <td width="188%" bgcolor="#F9F9F9">
              <input name="mail" size="20" style="color: #800000; border: 1px solid #747474; padding-left: 4; padding-right: 4; padding-top: 1; padding-bottom: 1; background-color: #FFFFFF" value=<% Response.Write rst("mail") %>></td>
            </tr>
            <tr>
              <td width="10%" align="center">&nbsp;</td>
              <td width="43%">&nbsp;</td>
              <td width="188%">&nbsp;</td>
            </tr>
            <tr>
              <td width="400%" colspan="3">
              <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber8" height="36">
                <tr>
                  <td width="94%" align="center" height="26">
              &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
                    <input type="submit" value="GÜNCELLE" name="GUNCELLE" style="font-family: Verdana; letter-spacing: 0; color: #000000; border: 1px solid #747474; padding-left: 4; padding-right: 4; padding-top: 1; padding-bottom: 1; background-color: #FBFBFB; width:76; height:22"54" ></td>
                  <td width="6%" height="26">
              <a href="javascript:window.close()">
              <img border="0" src="../../IMAGES/OGR/profil/close.gif"></a></td>
                </tr>
                <tr>
                  <td width="94%" align="center" height="10">
                  </td>
                  <td width="6%" height="10">
                  </td>
                </tr>
              </table>
              </td>
            </tr>
          </table>
          </td>
        </tr>
      </table>
	  </td>
	  </tr>
      </table>
      
        </center>
      </div>
      
    </form>
    <p>&nbsp;</td>
  </tr>
</table>

</body>

</html>
<%
else
Response.Write "Bu sayfa öğrencilere özel sayfadır. Eğer öğrenciyseniz ana sayfadan giriş yapınız."
end if
%>