El dato ingresado no existe en la base:

[Sonda]

Hola gente querida estoy haciendo un par de encuestas; tratando de que los códigos ingresados en dos campos sean solamente los que están en una tabla de Access y al querer ingresar un código inexistente me tire el error en una ssesión (“Mensaje”)el tema es que no se por donde encarar.
Tengo un formulario en access validado con VB que es algo similar que es así:

If IsNull(Me.iP8mod.Value) = True Then
MsgBox ("FALTA DATO EN EL CAMPO DE MODELOS ")
Cancel = True
Me.iP8mod.SetFocus
End If
If Me.iP8mod.Value <> 994 Then

Dim dbs As Database
Dim db As Database
Dim rs As Recordset
Dim sql As String
'Dim modelos As Integer

Dim modelos As Long
modelos = CLng(2000) * 365

modelos = Me.iP8mod.Value

Set dbs = CurrentDb

sql = "Select * From modelos where cod = " & modelos & ""

Set db = CurrentDb
Set rs = db.OpenRecordset(sql, dbOpenDynaset)

If rs.EOF Then

MsgBox ("EL CÓDIGO INGRESADO NO ES CORRECTO")

MsgBox (" Ó ACTUALIZAR LA TABLA DE MODELOS")
Cancel = True
End If

End If


Pero en asp como lo podría solucionar??