Visual Basic Programming Code Examples
Visual Basic > Database SQL Stuff Code Examples
Check record exist in master before opening transaction form
Check record exist in master before opening transaction form
Public Function openfil(fn)
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 file name