<% 'response.buffer=false Server.ScriptTimeout = 9999999 %> <% call abreconexao Session.Timeout = 10 IF trim(Session("id")) = "" THEN response.write "" call fechaconexao 'conn.close response.end ' response.redirect "login.asp" end if %> <% 'response.Buffer=true ' response.Expires=1 'session.Timeout = 1 %> <% 'call abreconexao 'if session("id")="" or session("Usuario")="" or session("senha")="" then ' response.Redirect("index.asp") 'end if 'if session("Usuario")=false or session("senha")=false or session("id")=false then ' response.Redirect("index.asp") 'end if 'dim conexaodb 'sql="select * from administrador where admin_id="&session("id") 'set ors=conexaodb.execute(sql) 'if ors.eof then ' response.Redirect("index.asp?erro=1") 'end if 'ors.close 'set ors=nothing %>