Mandar mensaje al Usuario.

Hola.

Como puedo mandar un mensaje al usuario cuando no existe
un registro?

Puedo hacerlo desde VB con un Recordset, pero si hay 1
millon de registros tardara mucho?

rs.Open "Select IdNumero from Tibias WHERE IdNumero=1"

O bien podria mandarlo desde un Procedure para que fuera
mas rapido, pero como lo haria?

Gracias de antemano por su ayuda