sql = "INSERT INTO RETENCIONDEC1 (n_retencion, rif_agente, rif_contribuyente, n_factura, n_control, n_cheque, cod_concepto, periodo_mes, periodo_año, fecha_retencion, monto_operacion, monto_retenido, persona, estado, observaciones) VALUES ( " & conta & ", 'J002938897', '" & Combo4(0) & "', '" & Text2 & "', '" & Text3 & "', " & Text10(0) & ", '" & Combo5 & "', " & Combo2(0) & ", " & Combo3(0) & ", " & DTPicker1(0) & ", " & Text4(0) & ", " & Text12(0) & ", 'J','activo', '" & Text7(0) & "')"
con.Execute (sql)
sql = "INSERT INTO CONTRIBUYENTE (rif,nombre,apellido,persona) VALUES ('" & Combo4(0) & "', '" & Text1(0) & "', 'NA', 'J')"
con.Execute (sql)
