Cách tạo user và password trong access

Thảo luận trong 'Khoa Khoa Học Máy Tính' bắt đầu bởi langtulangthang, 9 Tháng năm 2009.

  1. Offline

    langtulangthang

    • Friends

    Số bài viết:
    125
    Đã được thích:
    47
    Điểm thành tích:
    40
    Có ai giúp mình với!
    Mình đang làm bài liên quan đến cái này?
    Có ai biết thì trả lời dùm cái.Cảm ơn trước nha.:D:P
  2. Offline

    chip

    • Thành viên sáng lập

    • Chíp sún
    Số bài viết:
    777
    Đã được thích:
    778
    Điểm thành tích:
    560
    tạo user và pass

    Ở đây mình xin hướng dẫn bạn các tạo user và pass thông qua ngôn ngũ lập trình VBA:
    Để tạo user và pass đầu tiên bạn phải tạo một form gồm 2 Text Box :là
    +Textuser:là tài khoản
    +Textpass 2:là mật khẩu.
    và một nút bấm(tên là cmdLogin) :ví dụ như đăng nhập.
    Sau đây là mã nguồn của nút bấm là :
    Mã:
    Private Sub cmdLogin_Click()
    
    Dim rs As Recordset ' Khai báo biến rs là một record
    'Sau đây là truy vấn vào table User lấy ra Username và thục hiện so sánh để có kết quả 
    Set rs = CurrentDb.OpenRecordset("select * from User where Username='" & txtUser.Value & "'") Lệnh SQL nghĩa là: lấy tất cả(*) dữ liệu trong table User với điều kiện(where) là textuser phải bằng trường username trong bản table 
    If Not rs.EOF Then
    Dim pass As String
    pass = rs.Fields("Password")
    If (pass <> txtPass.Value) Then
    MsgBox "Nhap sai pass"
    Else
    'Cho này bạn muốn mở form nào thì mở!
    End If
    Else
    MsgBox "Nhap sai username"
    End If
    End Sub
    
    Có gì không hiểu hỏi tiếp nha
    Thank cái nha.

Chia sẻ trang này

Advertising: Linux system admin | nukeviet | nukeviet 4 | Upload ảnh miễn phí