Access - Ejecutar sql mediante codigo

 
Vista:

Ejecutar sql mediante codigo

Publicado por victor (4 intervenciones) el 21/10/2004 15:28:55
Hola,tengo un problemilla,tengo una tabla albaran con un campo cliente
y en el evento al salir de ese campo quiero comprobar si ese cliente existe en la tabla clientes pero no se como hacerlo,he probado a usar el comando DoCmd.RunSQL pero yo solo quiero seleccionar el identificador de la fila para dar aviso si no existe,¿podrias indicarme la sentencia a ejecutar?
Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Ejecutar sql mediante codigo

Publicado por joselito (14 intervenciones) el 22/10/2004 10:12:56
En el evento del campo, tienes que ejecutar una SQL de esta manera, o algo parecido, que te cuente el número de registros que existen en la tabla que coincidan con el criterio que especifiques. Más o menos sería algo así....
*******************

Dim laSQL As String
Dim conexion As New Connection
Dim Existe As Integer
Dim laSQL as String

Set conexion = CurrentProject.Connection

laSQL = "Select count(*) as cuenta from Tu_Tabla where CampoIdentificador = " & Int(Trim(TuCampo.Text))

rs.Open laSQL, conexion, adOpenDynamic, adLockBatchOptimistic

Existe = rs.fields("Cuenta")

if Existe > 0 then
msgbox "Existe"
else
msgbox "No Existe"
end if

rs.close
conexion.close

*************
Espero que te sirva. Un saludo.
JOSE.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar