Paulo Martins

<%
   '-- Declaração das variaveis
   Dim strSql

   Set Conn = Server.CreateObject("ADODB.Connection")

   Conn.Open "Provider=OraOLEDB.Oracle.1;Data Source=LOCALHOST;", "SYSTEM", "MANAGER"

   strSql = ""
   strSql = strSql & "DELETE FROM "
   strSql = strSql & "       T_CLIENTES "
   strSql = strSql & "WHERE  CPF_CLI = '" & Request.QueryString("cpf_cli") & "'"


   Set rsQuery = Conn.Execute(strSql)

   Conn.Execute("COMMIT")
   Conn.Close

   Response.write "CPF excluído com Sucesso!!!"

%>