Foros del web, para los que viven de bits

Hola amigos, aqui de nuevo je,je


superado un problema que es la concatenacion, me vi envuelto en otro...

tengo el sgte sentencia

Set rst_access = base_datos_access.OpenRecordset("Select * from producto where cod_prod = " & " ' " & var_final & " ' ", dbOpenDynaset)

cod_prod es de tipo numerico largo
var_final es string

anteriormente habia comparado numerico con string y funcionaba.
ahora no se que pasa

el error que me marca es el sgte :

"no coincide los tipos de datos en la expresion de criterios"

Por fa' necesito que me echen una manito
Gracias

where cod_prod = " & var_final

Es decir, quita las comillas simples ya que el dato es numérico.

Saludos.

trata poniendole Val(string) asi te transformara a numerico el dato
Set rst_access = base_datos_access.OpenRecordset("Select * from producto where cod_prod = " & " ' " & VAL(var_final) & " ' ", dbOpenDynaset)
TRATA con eso si no me avisas

ah!!! si tambien debes quitarle las comillas simples

¡¡¡VIVA TODOS LOS INTEGRANTES DEL FORO!!!!

me resulto con la sgte sintaxis:

Set rst_access = base_datos_access.OpenRecordset("Select * from producto where cod_prod = " & " " & Val(var_final) & " ", dbOpenDynaset)


nuevamente zenkiu a todos

Tambien puedes usar directamente las funciones como las siguientes para la ocasion....

CBool(expresión) 'convierte a boolean

CByte(expresión) '..byte

CCur(expresión) 'currency

CDate(expresión) 'fecha

CDbl(expresión) 'doble

CDec(expresión) 'decimal

CInt(expresión) 'entero

CLng(expresión) 'largo

CSng(expresión) 'single

CStr(expresión) 'string

CVar(expresión) 'variant

Saludos y suerte...