Duda con formateo de texto

[NeoZ]

Holas!
Estoy montando una ins SQL, por ejemplo:

Código:

ins_sql = "INSERT INTO NOMBRES (nombre) VALUE ('" & varNombre & "')"

El problema viene cuando la variable varNombre contiene carácteres " ' ", como por ejemplo " l'alguer "

Cuando ejecuto el Command, me aparece el error de sintaxis en la instrucción sql.
Por ahora lo he solucionado realizando un Replace(varNombre, "'", "´") donde lo sustituyo por el acento, pero...

¿Existiria alguna otra solución?

Gracias!!!

[Fabuazul]

mhhh!!!, creo que nop...

Bueno, por lo menos yo no me sé otra, además porque quieres cambiar a otra función? Esta te parece complicada?

[NeoZ]

Hola Fabuazul.

Bueno, más que nada como se trata de información que introduce un usuario, luego puede volver a editarla. Pero bueno, he hecho la inversa para la edición, donde me vuelve a realizar un Replace(nombre, "´", "'") y listos.
Me he creado una función, que dependiendo del valor de la varialbe, me formatea el texto para la inserción o para la edición. Por ejemplo:

Código:

Function formateaTexto(texto as string, estado as integer)
    If estado = 0 then
        'Inserción
        texto = Replace(texto, "'", "´")
        formateaTexto = texto
    Else
        'Edición
        texto = Replace(texto, "´", "'")
        formateaTexto = texto
    End If
End Function

En la función podemos ir añadiendo tantos Replace queramos para ir formateando correctamente el texto.

Bueno, gracias por todo!!!
Saludos.