%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% if session("usuario")="" then Response.Redirect("adm.asp") end if ' não armazenar esta página no cache Response.CacheControl = "no-cache" Response.AddHeader "pragma", "no-cache" Response.Expires = -1 erro = 0 Set rs = Server.CreateObject("ADODB.Recordset") filtro = request.queryString("e") %>