12/08/2004, 16:53
|
 | | | Fecha de Ingreso: marzo-2002 Ubicación: Capiatá
Mensajes: 88
Antigüedad: 23 años, 1 mes Puntos: 0 | |
 Problema con campo MEMO
Cuando intento guardar texto HTML en un campo memo me salta el siguiente error:
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression '' <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <html> <head> <title>Telesurf › Internet & Wireless</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <'.
/gustavoarriola/advertencia.asp, line 48
El código es el siguiente:
**************inicio**************
Dim idArticulo, TituloArticulo, DescripcionArticulo, CuerpoArticulo
Dim SeccionArticulo, AutorArticulo, EmailArticulo
Dim Fecha, EstadoArticulo, campo
TituloArticulo = Request.Form("txtTituloArticulo")
DescripcionArticulo = Request.Form("txtDescripcionArticulo")
CuerpoArticulo = Request.Form("txtCuerpoArticulo")
SeccionArticulo = Request.Form("lstSeccionArticulo")
AutorArticulo = Request.Form("txtAutorArticulo")
EmailArticulo = Request.Form("txtAutorEmail")
EstadoArticulo = Session("EstadoArticulo")
Fecha = Session("Fecha")
If EstadoArticulo = "Editar" then 'Si es una actualización del articulo
idArticulo = Session("idArticulo")
SQL = "UPDATE tblArticulos SET Titulo='" &TituloArticulo& "', Descripcion='" &DescripcionArticulo& "', Articulo='" &CuerpoArticulo& "', IdSeccion=" &SeccionArticulo& ", Autor='" &AutorArticulo& "', Email='" &EmailArticulo& "', FechaUpdate=" &Fecha& " WHERE IdArticulo=" &idArticulo
Conexiondb.Execute(SQL)
mensaje = "Su artículo ha sido actualizado correctamente<br>"
mensaje = mensaje & "Gracias por seguir escribiendo."
else 'Si es un nuevo articulo
SQL = "INSERT INTO tblArticulos (Titulo, Descripcion, Articulo, IdSeccion, Autor, Email, FechaPublic) "
SQL = SQL & "VALUES ('"&TituloArticulo& "', '"&DescripcionArticulo& "', '"&CuerpoArticulo& "', "& SeccionArticulo & " , '"&AutorArticulo& "', '"&EmailArticulo& "', " &Fecha & ")"
ConexionDB.Execute(SQL) 'Linea 47
mensaje = "Su artículo ha sido agregado correctamente<br>"
mensaje = mensaje & "Gracias por escribir."
End if
***********fin****************
Pero si intento guardar un HTML "corto", el artículo se publica sin problemas!!
¿A qué puede deberse esto?
Desde ya muchas gracias!! |