<% Response.Buffer = True %>
<% call esasUst() %><%
if Session("UserLoggedIn")<>"true" then
%>
Giriş yapmanız gerekmektedir.
<% else %>
<%
id = Request.QueryString("id")
if id=1 then
response.write "
DİKKAT
SİTEDEN ANA MENÜYÜ KALDIRAMAZSINIZ...
"
else
set conn = Server.CreateObject("ADODB.Connection")
conn.open Sur
conn.Execute("UPDATE menuler set monay=no where sira_no=" & id)
conn.Close
set conn = nothing
Response.redirect "menu.asp"
%>
<%
End If
End If
%>
<% call esasAlt() %>