<%
Set ObjCon_ilet = Server.CreateObject("ADODB.Connection")
ObjCon_ilet.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../veri/veri.mdb")
%>

<%
id=Request.QueryString("id")
Set ObjRs=Server.CreateObject("adodb.recordset")
strSQL="Select * From musteri Where id=" & id
ObjRs.Open StrSql, ObjCon_ilet, 1, 3
%>
<style type="text/css">
<!--
.style3 {font-family: Tahoma; font-size: 9px; }
.style6 {font-family: Tahoma; font-size: 10px; }
.style7 {font-size: 10px}
.style8 {
font-size: 12px;
color: #0033FF;
}
-->
</style>
<table width="514" border="0">
<tr>
<td width="62"><span class="style3">Adı</span></td>
<td width="173"><font color="#FFFFFF" size="1" face="Tahoma"><font color="#0099FF">
<input name="adi" type="text" id="adi" value="<%=ObjRs("adi")%>" />
</font></font></td>
<td width="91"><span class="style3">Soyadı</span></td>
<td width="170"><font color="#FFFFFF" size="1" face="Tahoma"><font color="#FFFFFF" size="1" face="Tahoma"><font color="#0099FF">
<input name="soyadi" type="text" id="soyadi" value="<%=ObjRs("soyadi")%>" />
</font></font></font></td>
</tr>
</table>
<br>
<table width="512" border="0">
<tr>
<td width="255">Geri D&ouml;n </td>
<td width="253"><div align="right"><a href="musteri_duzenle_son.asp?id=<%=ObjRs("id")%>" class="style8">Kaydet</a></div></td>
</tr>
</table>