maxmangion
AWF VIP
- Local time
- Today, 07:42
- Joined
- Feb 26, 2003
- Messages
- 2,805
Hi,
I have created a query from two tables which returns personal info such as firstname, surname, idcard etc. Due to data protection act i cannot distribute this information to third parties, however, i need a way where the third party can at least input the idcard number on a form and i simply return a message where that id exists in the list or not.
I have managed to achieve this by creating an unbound text box on a form to accept the id and used the dcount function to check whether the id exists i.e.
The above works fine, however, my only concern is how can i pass on this database but "totally" preventing them from viewing the tables/query data (as accessing the tables/query would be defeating the purpose of the database)
Thank You
I have created a query from two tables which returns personal info such as firstname, surname, idcard etc. Due to data protection act i cannot distribute this information to third parties, however, i need a way where the third party can at least input the idcard number on a form and i simply return a message where that id exists in the list or not.
I have managed to achieve this by creating an unbound text box on a form to accept the id and used the dcount function to check whether the id exists i.e.
Code:
Private Sub btnSearch_Click()
Dim LTotal As Long
LTotal = DCount("stu_extr", "Query1", "stu_extr = '" & Me.Text0 & "'")
If LTotal = 0 Then
MsgBox "Student Not Found"
Else
MsgBox "Record Found"
End If
End Sub
The above works fine, however, my only concern is how can i pass on this database but "totally" preventing them from viewing the tables/query data (as accessing the tables/query would be defeating the purpose of the database)
Thank You