<%
IF Session("admlogado") = "NAO" THEN
Response.redirect "logout.asp"
END IF
%>
<%
if request("acao")="foto" then
set oFile = server.CreateObject("Scripting.FileSystemObject")
if ofile.FileExists(path & request("foto")) then
oFile.DeleteFile(path & request("foto"))
end if
if ofile.FileExists(path_thumb & request("foto")) then
oFile.DeleteFile(path_thumb & request("foto"))
end if
objconexao.execute("DELETE FROM banners WHERE id="&int(seguranca(request("foto_id"))))
response.Clear()
response.Redirect "libera_banner.asp?msg=Banner deletado com sucesso!!&id="&seguranca(request("id"))
end if
if request("acao")="libera" then
banner = seguranca(request("foto_id"))
objconexao.execute("UPDATE banners SET desativado = 0 WHERE id="&banner)
end if
SQL = "SELECT * FROM banners Where desativado = true"
set rsCat = ObjConexao.Execute(SQL)
if not rsCat.Eof then
%>