สอบถามนะครับ เราสามารถกำหนดให้ user แต่ละสิทธิพอloginเข้าแล้วให้เปิดฟอร์มของตัวเองตามที่กำหนดได้หรือเปล่าครับ
เช่นการตลาด loginแล้วเข้าฟอร์มการตลาด
จัดซื้อ login แล้วเข้าฟอร์มจัดซื้อ
ซึ่งปัจจุบันผมใช้การกำหนดสิทธิที่ปุ่มเมนูแทน โดยการ Enable=false เป็นต้น
ผมเห็น ตัว login ของคุณ prajak ใช้การตรวจสอบ ID และ พาสเวิร์ด โดยใช้ Dlookup ถ้าต้องการให้เปิดฟอร์มไหน ผมว่า
น่าจะเพิ่ม Field ในตาราง อีก Field หรือ สร้างตารางและให้มี Field UserID เพื่อ สร้างความสัมพันธ์กัน
เช่น tblDepartment เก็บ UserID UserName และ Department
โดย เราจะกำหนดว่า เมื่อ ID และ Password ถูกต้องแล้ว ให้ dlookup Dapartment มาเก็บไว้ เป็นตัวแปลโดยอ้างอิงจาก Username ที่ Login
แล้วใช้ IF ไปกำหนดการเปิดฟอร์มอีกที เช่น
Dim StrDepart as string
StrDepart = Dlookup("Department","tblDepartment", "[Username]='" & Me.Userbox & "'")
IF strDepart = "แผนกขาย" then
Docmd.openForm "FormSell"
ElseIF strDepart = "การตลาด" then
Docmd.openForm "FormMaketing"
end if
เสียดายผมดันลบไฟล์เก่าที่เคยส่งมาไปหมดแล้ว ที่จริงจะลองทำให้ดูเลยครับ
