% varId = request("id") varTipo = request("tipo") sql = "SELECT * FROM " & varTipo & " WHERE id = " & varId Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql, MeuDB, 3, 3 rs.Delete strNxtSite = "form" & varTipo & ".asp" response.redirect strNxtSite %>