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

No coinciden los tipos de datos en la expresión de criterios.

Estas en el tema de No coinciden los tipos de datos en la expresión de criterios. en el foro de ASP Clásico en Foros del Web. Buenas a todos: Tengo un problema al actualizar que seguro es de comillas, pero no encuentro donde esta el error. Tengo una tabla con varios ...
  #1 (permalink)  
Antiguo 04/04/2006, 01:25
Avatar de chemita59  
Fecha de Ingreso: agosto-2005
Ubicación: Madrid
Mensajes: 107
Antigüedad: 18 años, 9 meses
Puntos: 0
No coinciden los tipos de datos en la expresión de criterios.

Buenas a todos:

Tengo un problema al actualizar que seguro es de comillas, pero no encuentro donde esta el error.

Tengo una tabla con varios campos (f1, f2, f3, f4)en los que introduzco el nombre de un fichero de imagen.

Tengo otro campo en el que quiero meter la ruta fisica de la imagen (foto1, foto2.....).

He creado el juego de registros y al intentar actualizar me dice:


Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E07)
[Microsoft][Controlador ODBC Microsoft Access] No coinciden los tipos de datos en la expresión de criterios.
/GESTOR/OKcentros.asp, line 46


La linea 46 corresponde a:

RSCECOS.ActiveConnection.Execute(misql)

Todos los campos que utilizo son de texto.

El juego de registros y el bucle es el siguiente:





<%@LANGUAGE="VBSCRIPT"% CODEPAGE="1252"%>
<!--#include file="../Connections/ConectaRRLL.asp" -->
<%
Dim RSCECOS
Dim RSCECOS_numRows

Set RSCECOS = Server.CreateObject("ADODB.Recordset")
RSCECOS.ActiveConnection = MM_ConectaRRLL_STRING
RSCECOS.Source = "SELECT * FROM CECOS"
RSCECOS.CursorType = 0
RSCECOS.CursorLocation = 2
RSCECOS.LockType = 1
RSCECOS.Open()

RSCECOS_numRows = 0

'DECLARAMOS LAS VARIABLES DE TRABAJO

Dim v0, v1, v2a, v2b, v2c, v2d, v3, v4, v5, v6
Dim misql

' Nos posicionamos en el primer registro para leer
RSCECOS.MoveFirst

' Iniciamos el bucle para asignar los valores a las variables y grabar
Do while Not RSCECOS.EOF


v4= Trim(RSCECOS.Fields.Item("ceco_actual")) ' Si el valor de v4 es 1 hay que actualizar
v0= Trim(RSCECOS.Fields.Item("ceco_codco99")) ' Guarda el numero de centro contable

If v4 = "1" then

v1="http://localhost/UPLOADS/IMAGESCT/" ' Dirección base de ruta imagenes
v2a= Trim(RSCECOS.Fields.Item("ceco_f1")) ' nombre del fichero de la foto nº 1
v2b= Trim(RSCECOS.Fields.Item("ceco_f2")) ' nombre del fichero de la foto nº 2
v2c= Trim(RSCECOS.Fields.Item("ceco_f3")) ' nombre del fichero de la foto nº 3
v2d= Trim(RSCECOS.Fields.Item("ceco_f4")) ' nombre del fichero de la foto nº 4
v3= Trim(RSCECOS.Fields.Item("ceco_goperati")) ' Numero de gerencia
v5="0" ' Registro actualizado

if v3 ="02" then

v1=v1 & "GOLE" & "/" & v2a
' Guardamos la ruta de la primera fotografia
misql= "UPDATE CECOS SET ceco_foto1 = '"&v1&"' WHERE ceco_codco99 = "&v0
RSCECOS.ActiveConnection.Execute(misql)
end if
End If

RSCECOS.MoveNext
Loop

RSCECOS.MoveFirst

%>


Agradecria una pequeña ayuda.

Salu2
  #2 (permalink)  
Antiguo 04/04/2006, 09:12
Avatar de sjam7  
Fecha de Ingreso: diciembre-2001
Ubicación: Guadalajara, Mexico
Mensajes: 3.672
Antigüedad: 22 años, 5 meses
Puntos: 16
a ver, intenta cambiando esta linea a asi:
misql= "UPDATE CECOS SET ceco_foto1 = '"&v1&"' WHERE ceco_codco99 = '"&v0&"'"

con comillas simples para tratarlo como texto
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 13:12.