Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Hỏi] Xin giúp đỡ tạo form đăng nhập có liên kết với form Giao diện chính
#11
(17-01-18, 12:30 PM)lmthu Đã viết: Vướng mắc của bạn suốt mấy ngày qua nằm ở chổ sử dụng biến, bạn nên tìm hiểu thêm về tầm tác dụng của biến, sử dụng biến toàn cục (Public) và biến cục bộ (Private) (đây là 1 trong 3 khái niệm cơ bản của lập trình, Khai báo biến, Chương trình convòng lập). 
Bạn tạo thêm module, trong module này bạn khai báo 1 biến toàn cục như sau:
Public m_Username As String 
trong sự kiện Onclick của nút lệnh cmdlogin trong form đăng nhập bạn thêm 1 dòng mã xử lý như sau:
If Me.txtuser="Admin" then
 m_Username="Admin"
Else
 m_Username="Guest"
End if
trong sự kiện Onload của form F_MainChinh2 bạn thêm vào:
Me.Label167.Caption = "Xin chào " & m_Username & "-" & DLookup("user", "tadmin") & " | " & Time & " | " &  Date

Cảm ơn bạn, để mình làm thử theo cách của bạn. Cảm ơn bạn nhiều
Chữ ký của Thiên Hùng Thiên Hùng,gia nhập Thủ Thuật Access từ 10-11 -17.
Reply
Những người đã cảm ơn
#12
Của bạn đây
Thực ra thực hiện công việc của bạn rất đơn giản. Nhưng vì bận một số việc nên đến hôm nay mới xử lý cho bạn được. Vấn đề ở đây là bạn phải tìm cách truyền dữ liệu có sẳn trên form đăng nhập vào form chính. Để điều này xảy ra được thì 1/Không được Close form đăng nhập mà chỉ xử lý cho nó ẩn, để khi form chính open nó sẽ lấy dữ liệu từ form đăng nhập để truyền qua nó (cách này tôi cũng đã giới thiệu trên một chủ đề về form đăng nhập post lên forum khác lâu, nếu ban thích có thể search để tham khảo). 2/Thực hiện việc Open form chính và cho form chính nhận dữ liệu trên form đăng nhập, sau đó mới close form đăng nhập.
Tối xử lý cả 2 cách để bạn dễ dàng chon lựa. Chúc thành công.
Chữ ký của tranthanhan1962 Kết quả cuối cùng của một đời người, không phải bạn có được bao nhiêu tiền bạc, tài sản. Mà bạn còn bao nhiêu người bạn  thumbs up
ღღღღღTài sản của tranthanhan1962 (View All Items) ღღღღღ
Reply
Những người đã cảm ơn Thiên Hùng
#13
(17-01-18, 02:27 PM)tranthanhan1962 Đã viết: Của bạn đây
Thực ra thực hiện công việc của bạn rất đơn giản. Nhưng vì bận một số việc nên đến hôm nay mới xử lý cho bạn được. Vấn đề ở đây là bạn phải tìm cách truyền dữ liệu có sẳn trên form đăng nhập vào form chính. Để điều này xảy ra được thì 1/Không được Close form đăng nhập mà chỉ xử lý cho nó ẩn, để khi form chính open nó sẽ lấy dữ liệu từ form đăng nhập để truyền qua nó (cách này tôi cũng đã giới thiệu trên một chủ đề về form đăng nhập post lên forum khác lâu, nếu ban thích có thể search để tham khảo). 2/Thực hiện việc Open form chính và cho form chính nhận dữ liệu trên form đăng nhập, sau đó mới close form đăng nhập.
Tối xử lý cả 2 cách để bạn dễ dàng chon lựa. Chúc thành công.

Cảm ơn bản tranthanhan1962 
Mình đã thử theo cả 2 cách của bạn dựa trên phần hướng dẫn của bạn, vấn đề 1 xem như đã giải quyết xong.

Vấn đề 2 là phần đăng xuất thì mình có tham khảo một bài trên youtube và có hướng dẫn phần code sau:

Private Sub Label183_Click()
  'Dang xuat thi cai TRANGTHAI cho tai khoan dang co TRANGTHAI = 1 ve 0
    If MsgBox("Ban co chac chan dang xuat?", vbYesNo) = vbYes Then
        Dim rs As DAO.Recordset
        Set rs = CurrentDb.OpenRecordset("SELECT * FROM tadmin WHERE TRANGTHAI = 1")
        If rs.RecordCount > 0 Then
            rs.MoveFirst
            rs.Edit
                rs("TRANGTHAI") = 0
            rs.Update
            DoCmd.Close acForm, F_MainChinh2, acSaveYes
            Me.Visible = True
            DoCmd.OpenForm "F_Dangnhap2"
        End If
        rs.Close
        Set rs = Nothing
    End If
End Sub


*** Mình đã có bổ sung trong tadmin thêm cột trạng thái 
Tuy nhiên, code giữa phần đăng nhập với code bài hướng dẫn này mình thấy khác nhau, nên ko biết có thể vận dụng được ko?

Mình có test thử 2 cách, nhưng chưa đạt hiệu quả, không đăng xuất được.


Ở đây mình có phần thắc mắc:

Nếu làm theo cách 1 của bạn thì: form đăng nhập đã ẩn thì làm sao khi đăng xuất rồi để nó hiện trở lại bình thường?

Mình có thử áp dụng trong cách 2: mở lại form đăng nhập sau khi đã tắt trước đó thì vẫn không được, và đây là bài thử của cách 2 mình đính kèm : http://www.mediafire.com/file/1ibz2xikbm...p%29.accdb
021
Chữ ký của Thiên Hùng Thiên Hùng,gia nhập Thủ Thuật Access từ 10-11 -17.
Reply
Những người đã cảm ơn
#14
Khi đăng xuất theo cách 1 thì cho form đăng nhập Visible=true, txtuser trên form đăng nhập ="" hoặc null. Nếu theo cách 2 thì gọi open form đăng nhập. Với cả hai cách khi load form đăng nhập đều thiết đặt txtuser = "" hoặc null. Phần đăng xuất code của bạn mình vẫn giữ nguyên không sửa
Trên forum chủ để này rất nhiều (tử đơn giản đến chi tiết) bạn có thể tham khảo ở các link sau:
Thiết kế form đăng nhập phân quyền một cơ sở dữ liệu một cách rất đơn giản.
[Shared code]_Login + Phân quyền chi tiết tới từng cm(Gửi Ongke0711)
Demo Login + Phân quyền (Phần II) kể cả thanh Menubar
Demo Login + Phân quyền (Phần III) Phân cấp Menubar
Chữ ký của tranthanhan1962 Kết quả cuối cùng của một đời người, không phải bạn có được bao nhiêu tiền bạc, tài sản. Mà bạn còn bao nhiêu người bạn  thumbs up
ღღღღღTài sản của tranthanhan1962 (View All Items) ღღღღღ
Reply
Những người đã cảm ơn Thiên Hùng
#15
(18-01-18, 08:37 AM)tranthanhan1962 Đã viết: Khi đăng xuất theo cách 1 thì cho form đăng nhập Visible=true, txtuser trên form đăng nhập ="" hoặc null. Nếu theo cách 2 thì gọi open form đăng nhập. Với cả hai cách khi load form đăng nhập đều thiết đặt txtuser = "" hoặc null. Phần đăng xuất code của bạn mình vẫn giữ nguyên không sửa
Trên forum chủ để này rất nhiều (tử đơn giản đến chi tiết) bạn có thể tham khảo ở các link sau:
Thiết kế form đăng nhập phân quyền một cơ sở dữ liệu một cách rất đơn giản.
[Shared code]_Login + Phân quyền chi tiết tới từng cm(Gửi Ongke0711)
Demo Login + Phân quyền (Phần II) kể cả thanh Menubar
Demo Login + Phân quyền (Phần III) Phân cấp Menubar

Cảm ơn anh tranthanhan1962. Mình sẽ nghiên cứu thêm.
Chữ ký của Thiên Hùng Thiên Hùng,gia nhập Thủ Thuật Access từ 10-11 -17.
Reply
Những người đã cảm ơn
#16
(18-01-18, 08:37 AM)tranthanhan1962 Đã viết: Khi đăng xuất theo cách 1 thì cho form đăng nhập Visible=true, txtuser trên form đăng nhập ="" hoặc null. Nếu theo cách 2 thì gọi open form đăng nhập. Với cả hai cách khi load form đăng nhập đều thiết đặt txtuser = "" hoặc null. Phần đăng xuất code của bạn mình vẫn giữ nguyên không sửa
Trên forum chủ để này rất nhiều (tử đơn giản đến chi tiết) bạn có thể tham khảo ở các link sau:
Thiết kế form đăng nhập phân quyền một cơ sở dữ liệu một cách rất đơn giản.
[Shared code]_Login + Phân quyền chi tiết tới từng cm(Gửi Ongke0711)
Demo Login + Phân quyền (Phần II) kể cả thanh Menubar
Demo Login + Phân quyền (Phần III) Phân cấp Menubar

Cảm ơn anh tranthanhan1962. Mình sẽ nghiên cứu thêm.
Chữ ký của Thiên Hùng Thiên Hùng,gia nhập Thủ Thuật Access từ 10-11 -17.
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Hỏi] Cách tạo Cbo để lọc các mặt hàng trong Sub Form samacxanh 3 265 17-10-18, 10:33 AM
Bài mới nhất: vulhu06
  [Help] Điều khiển 1 form từ form khác tranthanhan1962 2 200 30-09-18, 05:57 PM
Bài mới nhất: tranthanhan1962
  [Help] Nhập số nguyên tự chuyển thành thập phân bằng lăng 15 955 26-09-18, 12:09 PM
Bài mới nhất: NguyenDungAnh
  Lỗi truyền tham số từ Form vào query cannguyen 2 135 20-09-18, 06:49 PM
Bài mới nhất: cannguyen
  [Hỏi] Load dữ liệu từ table lên form bằng lăng 2 187 19-09-18, 04:56 PM
Bài mới nhất: bằng lăng

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ| PMA Nha Trang| Gỗ Acrylic Không Đường Line