Necesito ayuda.
Tengo un formulario que hace un Insert en una BD MySql, entonces necesito hacer que me dé una confirmación de que los datos enviados fueron cargados en la BD.
Código:
había visto hacer algo así, cnn.Execute "INSERT INTO evaluaciones " _ & "(ID_LLAMADA, NOMBRE_AGENTE,FECHA_EVALUACION, HORA_EVALUACION, TIPO_EVALUACION," _ & "NOMBRE_EVALUADOR, SALUDO_INICIAL, PERSONALIZACION,SATISFACCION_GARANTIZADA,CIERRE_DEFINITIVO," _ & "USO_TPO_ESPERA,IDENTIFICA_CLIENTE,ESCUCHA_ACTIVA,RESUMIR,DETECTA_NECESIDAD_CLIENTE," _ & "ASESORAR,PROACTIVIDAD,CONTROL_LLAMADA,EMPATIA, COMUNICACION, ADAPTACION_SITUACION,DESEMPEÑO_COMERCIAL," _ & "CONOCIMIENTO_PRODUCTO, PROCEDIMIENTOS, CONOCIMIENTO_SISTEMA, DIRECCIONAR_LLAMADA," _ & "INGRESO_DATOS, PUNTO_ATENCION, FORTALEZAS)" _ & " VALUES( " _ & " '" & LblIdLlamada & "', '" & ComboAgente & "' , '" & LblFechaLlamada & "', " _ & " '" & LblHoraLlamada & "','" & ComboTipo & "', '" & ComboEvaluador & "'," _ & " '" & Combo4 & "','" & Combo5 & "','" & Combo6 & "','" & Combo7 & "','" & Combo8 & "' , " _ & " '" & Combo9 & "','" & Combo10 & "','" & Combo11 & "','" & Combo12 & "','" & Combo13 & "','" & Combo14 & "', " _ & " '" & Combo15 & "','" & Combo16 & "','" & Combo17 & "','" & Combo18 & "','" & Combo19 & "'," _ & " '" & Combo20 & "','" & Combo21 & "','" & Combo22 & "','" & Combo23 & "','" & Combo24 & "'," _ & " '" & TxtObservacion & "','" & TxtFortalezas & "')"
Código:
(lo tomé de un ejemplo con acces) pero siempre dice que no se han guardado, a pesar de que esta hecho el insert. Mi idea o necesidad es que una vez dado el comando para ejecutar el Insert, me levante un msgbox en el que me diga que los datos fueron cargadas, y que el numero de id ( autoincremetal de la tabla) es el xxxx.If iRow = 1 Then MsgBox "Los datos fueron guardados" Else MsgBox " Hubo un error en la carga de datos" End If
Espero que alguien me halla entendido y me pueda dar una mano
Gracias