Error de sintaxis en la instrucción Update

[walo08]

buenas noches amigos..... he buscado por cielo, mar y tierra una solución a este problema que tengo, he copiado TODO IGUAL y a mi me sale ese error, asunto que a la otra persona NO....me podrían ayudar por favor? Les dejo el código del botón modificar.

Sub MODIFICAR()
Dim CMD As New OleDb.OleDbCommand("UPDATE datos set nom='" & txt_nom.Text & "', correo='" & txt_correo.Text & "', where nom='" & txt_nom.Text & "'", CN)
CN.Open()
CMD.ExecuteNonQuery()
CN.Close()
Call MOSTRAR()
MsgBox("Registro actualizado")
End Sub

NOTA: lo stoy haciendo en VB2010 vinculando con access 2007. Los 2 campos son de tipo TEXTO. me marca error en CMD.ExecuteNonQuery() (error de sintaxis UPDATE).