al insertar el símbolo ' en una base de datos da error

[LinosINK]

Hola a todos, estoy insertando en una base de datos y funciona todo bien pero en el momento que inserto ' por ejemplo: Ana's me da el siguiente error:

Código:

Microsoft OLE DB Provider for ODBC Drivers error '80040e14' 

[Microsoft][Controlador ODBC Microsoft Access] Error de sintaxis (falta operador) en la expresión de consulta ''Ana's','Ana's''. 

/prueba/CONTROL/InsertarNoticiaM.asp, línea 143

Cojo los datos de un formulario e inserto de la siguiente manera:

Código:

cad="insert into Noticias values(" & strID & ",date(),'" & strTitulo & "','" & strSubtitulo & "','" & strNoticia & "')"

¿Como puedo corregir este error?

gracias a todos.

[daniel00]

Que tal LinosINK.

Te falto buscar un poco más, esa pregunta ya esta repetido varias veces, pero en fin.

Puedes hacer lo siguiente.

Código:

cad = replace( cad, "'", "''")

Es decir reeplazar cada caracter ' por dos '' , ojo , no es una comilla doble son dos apostrofes.

El error que te marca es porque Acees usa los apostrofes como delimitadores de cadena.

Saludos!.

[LinosINK]

Hola daniel00, muchíiiimas gracias por tu respuesta, estuve buscando por el foro pero no lo había encontrado, perdón por repetir el post.

he usado el código que me dijiste, pero no se usarlo para la variable strNoticia ya que ya uso un replace para los intros, ¿podrías indicarme?

Código:

strTitulo=Replace(Request.Form("txtTitulo"), "'", "''")
strSubtitulo=Replace(Request.Form("txtSubtitulo"), "'", "''")
strNoticia = Replace(Request.Form("txtNoticia"), vbCrLf, "<br />")

gracias.

[JuanRAPerez]

strNoticia = Replace(Request.Form("txtNoticia"), vbCrLf, "<br />")
strNoticia = Replace(strNoticia, "'", "''")

prueba asi :)

suerte

[u_goldman]

Nada, un desliz ja ja

[LinosINK]

muchísiiiimas gracias, funciona a la perfección.

saludos!!!!