Làm thế nào để biết được User hiện hành là ai ?

[dtngoc]

Em có 2 table:
+ tblUser: TenDN, HoVaTen, MatKhau
+ tblBanHang: Ngay, Khach, Hang, SoLuong, SoTien, NguoiBan
Khi khởi động chương trình em cho frmLogin là form khởi động, form này có: txtTenDN, txtMatKhau, cmdDangNhap, cmdThoat.
Sau khi đăng nhập thành công, Người bán (NguoiBan) sẽ mở frmBanHang để giao dịch với khách hàng; tại form này có txtNguoiBan và các txt cần thiết khác.
----->>>> Xin được anh/chị chỉ bảo em làm thế nào để txtNguoiBan kia đúng là txtTenDN (sau khi đăng nhập từ frmLogin), và từ đó lưu HoVaTen (tìm HoVaTen với txtTenDN không có gì để bàn) vào tblBanHang.

Rất mong được anh/chị chỉ bảo. Xin cảm ơn!

 

[phatnq2002]

Ðề: Làm thế nào để biết được User hiện hành là ai ?

Em có 2 table:
+ tblUser: TenDN, HoVaTen, MatKhau
+ tblBanHang: Ngay, Khach, Hang, SoLuong, SoTien, NguoiBan
Khi khởi động chương trình em cho frmLogin là form khởi động, form này có: txtTenDN, txtMatKhau, cmdDangNhap, cmdThoat.
Sau khi đăng nhập thành công, Người bán (NguoiBan) sẽ mở frmBanHang để giao dịch với khách hàng; tại form này có txtNguoiBan và các txt cần thiết khác.
----->>>> Xin được anh/chị chỉ bảo em làm thế nào để txtNguoiBan kia đúng là txtTenDN (sau khi đăng nhập từ frmLogin), và từ đó lưu HoVaTen (tìm HoVaTen với txtTenDN không có gì để bàn) vào tblBanHang.

Rất mong được anh/chị chỉ bảo. Xin cảm ơn!

1. Định nghĩa một biến toàn cục: glbUserName As String
2. Khi đã kiểm tra hợp lệ ở form đăng nhập, gán glbUserName = txtTenDN
3. Cho một label ở form bán hàng. Gán lblUserName.Caption = glbUserName lúc form Load. Cho txtNguoiBan.Visible = False.
4. Khi lưu record, cho txtNguoiBan = lblUserName

 

[dtngoc]

Ðề: Làm thế nào để biết được User hiện hành là ai ?

Vâng xin cảm ơn anh rất nhiều.
Làm phiền anh Phatnq2002 cho em xem một ví dụ cụ thể. Tiện đó em chế biến theo yêu cầu công việc của mình.
Cảm ơn anh nhiều ạh!

 

[behattieu]

Ðề: Làm thế nào để biết được User hiện hành là ai ?

Bác phat chỉ rõ rồi còn gì hả em.
Vào module tạo 1 module mới rồi khai báo biến
Public glbUserName As String
Ở form login tại nút lệnh Login thì sau đoạn code khi kiểm tra cho them dòng
glbUserName = txtTenDN

Buoc 3, 4 không phải nói thêm nữa

 

[dtngoc]

Ðề: Làm thế nào để biết được User hiện hành là ai ?

Giờ thì em làm được rồi, chạy ngon 2 anh ah.
Cảm ơn hai anh nhiều lắm!