Foros del Web » Programando para Internet » ASP Clásico »

Error '80040e14' al actualizar una base de datos

Estas en el tema de Error '80040e14' al actualizar una base de datos en el foro de ASP Clásico en Foros del Web. Hola chicos/as tengo un problemilla con un codigo y no se que hacer porque estoy atascado. Me da el siguiente error: ---------Inicio Error----------- Microsoft OLE ...
  #1 (permalink)  
Antiguo 17/03/2009, 07:50
 
Fecha de Ingreso: octubre-2008
Ubicación: Alicante
Mensajes: 24
Antigüedad: 16 años, 5 meses
Puntos: 0
Error '80040e14' al actualizar una base de datos

Hola chicos/as tengo un problemilla con un codigo y no se que hacer porque estoy atascado.

Me da el siguiente error:
---------Inicio Error-----------
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 'RefArticulo='Kalencom_Discos_Cocoa'UPDATE ARTICULOS SET [Stock]= '0' WHERE [RefArticulo] = 'Kalencom_Discos_Cocoa''.

/Includes/master.asp, línea 45
--------- Fin Error-----------


Lo que estoy intentado hacer
----- Inicio -------

AbreBaseDatos "Pedidos"
SQL="SELECT * FROM ARTICULOS WHERE NPedido='" & pedido & "'"
AbreRecordSet rs,SQL,ConPedidos

For art = 1 to rs.recordcount

AbreBaseDatos "Datos"
SQL="SELECT * FROM ARTICULOS WHERE RefArticulo='" & rs.fields("Ref") & "'"
AbreRecordSet rsArt,SQL,ConDatos

ActualizaStock = rsArt.fields("stock") - rs.fields("UnidadesArt")

AbreBaseDatos("Datos")
SQL = SQL & "UPDATE ARTICULOS SET [Stock]= '"& ActualizaStock &"' WHERE [RefArticulo] = '" & rs.fields("Ref") & "'"
AbreRecordSet rsArt,SQL,ConDatos

rs.movenext
Next

---- Fin Codigo ----

---- Codigo Master.asp ----

Sub AbreRecordset(recordset,consulta,conexion)
'Response.Write(CONSULTA & "<BR>")
Set Recordset=Server.CreateObject("ADODB.Recordset")
Recordset.Open consulta,conexion,adOpenStatic ----------------------- linea 45
End Sub

--- Fin Codigo Master.asp ----


Bueno no se si mucho rollo, pero creo que he puesto todo lo necesario.

Espero vuestra ayuda
  #2 (permalink)  
Antiguo 17/03/2009, 08:27
Avatar de Muzztein  
Fecha de Ingreso: agosto-2002
Ubicación: Hangar 18
Mensajes: 1.703
Antigüedad: 22 años, 7 meses
Puntos: 16
Respuesta: Error '80040e14' al actualizar una base de datos

en esta linea

AbreBaseDatos("Datos")
SQL = SQL & "UPDATE ARTICULOS SET [Stock]= '"& ActualizaStock &"' WHERE [RefArticulo] = '" & rs.fields("Ref") & "'"
AbreRecordSet rsArt,SQL,ConDatos



Por que concatenas el string SQL con si mismo ?????

creo que por ahi va el error
  #3 (permalink)  
Antiguo 17/03/2009, 10:01
 
Fecha de Ingreso: octubre-2008
Ubicación: Alicante
Mensajes: 24
Antigüedad: 16 años, 5 meses
Puntos: 0
Respuesta: Error '80040e14' al actualizar una base de datos

Cita:
Iniciado por Muzztein Ver Mensaje
en esta linea

AbreBaseDatos("Datos")
SQL = SQL & "UPDATE ARTICULOS SET [Stock]= '"& ActualizaStock &"' WHERE [RefArticulo] = '" & rs.fields("Ref") & "'"
AbreRecordSet rsArt,SQL,ConDatos



Por que concatenas el string SQL con si mismo ?????

creo que por ahi va el error

OK. Muchas gracias-

Estaba espeso y como habia copiado el codigo de otra web que he hecho se me habia pasado.

Un saludo
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 05:33.