ISELA
18 de Febrero del 2004

o con dos comillas o como.,
Clave = InputBox("Introduzca el numero del encargado a buscar", " BUSCAR ENCARGADO", "Escriba aquí")
bus = "select * from encargado where eccvec = '" & Clave & "'"

la variable clave la declaro como entero?...

sdemingo
18 de Febrero del 2004

Sin comillas

Clave = InputBox("Introduzca el numero del encargado a buscar", " BUSCAR ENCARGADO", "Escriba aquí")
If IsNumeric(Clave) Then
bus = "select * from encargado where eccvec = " & Clave
End If

Salu2
sdemingo

Baltasar
18 de Febrero del 2004

Como a veces se usan variables numéricas en lugar de textboxs para pasar parámetros a consultas SQL, yo prefiero hacer esto:

bus = "select * from encargado where eccvec = " & cstr(Clave)

Cstr convierte un numérico en string

Saludos

sdemingo
18 de Febrero del 2004

Hola Baltasar,

solo por curiosidad....
¿no funcionaría igual sin convertirla a String si el campo en la BD es de tipo numérico?
Es decir,
Dim clave as integer
clave = 123
bus = "select * from encargado where eccvec = " & clave

si eccvec está definido como numérico.

Salu2
sdemingo

ISELA
18 de Febrero del 2004

GRACIAS, ME FUI A DESAYUNAR Y ME ENCONTRE CON LA SOLUCION AL REGRESAR GRACIAS....