<% oda.MoveNext
NEXT
oda.close
set oda = Nothing
%>
<
%
if (Request.QueryString("oda2"))="sil" then
%>
<%
OdaID=Request.QueryString("OdaID")
set odac = Server.CreateObject("ADODB.RecordSet")
SQL="DELETE * from ODALAR where odaID like '"&odaID&"'"
odac.open SQL,connect,1,3
Response.Redirect "odalar.asp"
%>
<% end if %>
<%
if (Request.QueryString("oda"))="Bilgi" then
%>
<%
OdaID=Request.QueryString("OdaID")
set odac = Server.CreateObject("ADODB.RecordSet")
SQL="select * from ODALAR where odaID like '"&odaID&"'"
odac.open SQL,connect,1,3
%>
<%
if (Request.QueryString("formu"))="kaydet" then
%>
<%
odaadi=Request.form("odaadi")
odano=Request.form("odano")
misafir=Request.form("misafir")
odac("odaadi")=odaadi
odac("odano")=odano
odac("misafir")=misafir
odac.update
response.redirect Request.ServerVariables("HTTP_REFERER")
%>
<% end if %>