% Set Database = Server.CreateObject("ADODB.Connection") Database.Open StringConexao wID_HOLDING=request.item("Holding") wID_EMPRESA=request.item("Empresa") wID_PLANO=request.item("Plano") SQL= "DELETE FROM EMPRESAS_HOLDING_PLANOS WHERE ID_HOLDING=" & wID_HOLDING & " AND ID_EMPRESA=" & wID_EMPRESA & " AND ID_PLANO=" & wID_PLANO Set TabHolding = Database.Execute(SQL) %>