[belajar-access] Mohon di luruskan..

mohon di contekan sejenak plz. sy buat event pada textbox di menu utama seperti ini :

Private Sub Label209_Click()
If Not V_loginLevel = "Admin" Then
MsgBox "Anda Tidak Punya hak akses untuk data ini !!", vbCritical, "Maaf.."
DoCmd.CancelEvent
Else
DoCmd.OpenForm "form1", acNormal
End If
End Sub

saya ingin memberi hak akses juga untuk user Level Supervisor. bagaimana ya codenya?. sy coba and dan or jg belum bisa. mohon bantuannya para master, apa di modul juga di ubah ya, sy coba add modul juga dengan G_loginlevel="supervisor" tapi tidak bisa.

terima kasih
hstod

------------------------------------

SPAM IS PROHIBITEDYahoo! Groups Links

<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/belajar-access/

<*> Your email settings:
Individual Email | Traditional

<*> To change settings online go to:
http://groups.yahoo.com/group/belajar-access/join
(Yahoo! ID required)

<*> To change settings via email:
belajar-access-digest@yahoogroups.com
belajar-access-fullfeatured@yahoogroups.com

<*> To unsubscribe from this group, send an email to:
belajar-access-unsubscribe@yahoogroups.com

<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/