registros afectados

[gabriel cury]

Gente del foro, agradecería me puedan dar una mano al siguiente inconveniente que se me dificulta resolver.
Estoy generando unas rutinas simples de Alta, Baja y Modificacion y para poder tener la seguridad que la sentencia mysql impacto correctamente pregunto por los registros afectados. (al final les pongo la sintaxis), el inconveniente que me surge es en la rutina MODIFICACION ya que ejecuto el update aunque los valores de los campos no hayan sido modificados, osea hago un update con los mismos valores en todos los campos, y si el caso es que no se modifico ningun campo el update no impacta a ningun registro y me genera un error que no seria tal.

conexionPrincipal.Execute strsql, recordsAffected
If recordsAffected < 1 Then
msj = MsgBox("Error logico 009", vbCritical, titulo)
End If