Setelah saya membuat artikel Cara Membuat StatusBar atau StatusStrip Di VB.NET
kali ini saya ingin membuat hak akses pada user , misal nya seorang kasir dia hanya bisa transaksi saja dan tidak bisa entry data dan sedangkan admin bisa entry data . ini masih ada hubungan nya dengan status bar , bagi yang belum buat, bisa baca di CARA MEMBUAT STATUSBAR ATAU STATUSSTRIP DI VB.NET .
setelah status bar nya sudah di buat ,saya menggunakan menu strip , mari kita masuk codingan nya .
Nah codingan ini di taro di form load
If statusBarUser.Text = "kasir" Then
MasterToolStripMenuItem.Enabled = False
TransaksiToolStripMenuItem.Enabled = True
End If
Cara Kedua taro di button ok form login
Call opendb()
Dim aa As String = ""
aa = " select * from tlogin where userop ='" & txtusername.Text & "' " & _
" And jabatan ='" & "kasir" & "' "
cmd = New OleDb.OleDbCommand(aa, conn)
Dim rs As OleDb.OleDbDataReader
rs = cmd.ExecuteReader()
If rs.Read Then
Form2.Show()
Form2.MasterToolStripMenuItem.Enabled = False
Form2.TransaksiToolStripMenuItem.Enabled = True
Form2.mdilogin.Enabled = False
Me.Hide()
'Form2 adalah Fmenu
End If
Semoga bermanfaat .
Update Contact :
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email : Fajarudinsidik@gmail.com
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email: Fajarudinsidik@gmail.com
atau Kirimkan Private messanger melalui email dengan klik tombol order dibawah ini :