%>
<%
if session("user")= "" then
response.redirect("Fsearch-user.asp")
else
set conNews=server.createobject("adodb.connection")
conNews.open = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("db_test.mdb") 'dbill.mdb
sql= "select * from register where username ='"& session("user") &"'"
set rs = createobject("adodb.recordset")
rs.open sql,conNews,1,3,&H0001
if not rs.eof then%>
<input name="txt_id" type = text class="Textbox" id="txt_id" value= "<%=rs("id")%>" size="25">
<input name="txt_username" type = text class="Textbox" id="txt_username" value= "<%=rs("username")%>" size="25">
<input name="txt_password" type = text class="Textbox" id="txt_password" value= "<%=rs("password")%>" size="25">
<input name="txt_name" type = text class="Textbox" id="txtusername" value= "<%=rs("name")%>" size="25">
<input name="txt_surname" type = text class="Textbox" id="txt_surname" value= "<%=rs("surname")%>" size="25">
<input name="txt_admin" type = text class="Textbox" id="txt_admin" value= "<%=rs("Admin")%>" size="25">