• Home
 · 
• Files/File Controls/Input/Output
 · 
• Function to Check record exist in master file before opening transaction form

Function to Check record exist in master file before opening transaction form

Function to Check record exist in master file before opening transaction form

Rate Function to Check record exist in master file before opening transaction form

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Dim oprs As ADODB.Recordset
Set oprs = New ADODB.Recordset
SQL = "select * from " & fn
oprs.Open SQL, DB, adOpenKeyset, adLockReadOnly
If oprs.RecordCount <> 0 Then
   openfil = True
Else
   msg = "No Records In " & fn & " First Enter That!!"
   MsgBox msg
   openfil = False
End If
End Function

Call this function with master filename as parameter