Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Hỏi] Xin giúp tao form LOGIN
#1
Vâng, như tiêu đề, vì em đã dọc các HD nhưng cứ lung tung sao ấy.
Em có 2 form: 1 là LOGIN và form chương trình
1. Em muốn giúp em tạo code để login thành công thì vào form 2 (form chương trình)
2. ở phần password chuyển thành dạng ***
và code mở access ra nó hiện form login luôn
=> Nếu đc HD cự thể giúp em
Thank
Chữ ký của hungzero Xin chào, mình là hungzero, Tham gia http://thuthuataccess.com/forum từ ngày 01-10 -13.
Reply
Những người đã cảm ơn
#2
Search



http://thuthuataccess.com/forum/thread-71.html
http://thuthuataccess.com/forum/thread-542.html
http://thuthuataccess.com/forum/thread-1970-page-2.html
http://thuthuataccess.com/forum/thread-332.html
Chữ ký của cpucloi Tôi chỉ biết mỗi một điều là những điều tôi biết được còn quá ít 021
Gmail: cgiahuy13@gmail.com


ღღღღღTài sản của cpucloi (View All Items) ღღღღღ
Reply
Những người đã cảm ơn hungzero
#3
http://www.mediafire.com/?9f3o4o2bwu07k2w

híc, đây là bài em làm đơn giản nhất mà ko dc. các bạn chỉ mình mới (sửa lại bài cũng đc ạ)
Thank
Chữ ký của hungzero Xin chào, mình là hungzero, Tham gia http://thuthuataccess.com/forum từ ngày 01-10 -13.
Reply
Những người đã cảm ơn
#4
(21-10-13, 12:15 AM)hungzero Đã viết: http://www.mediafire.com/?9f3o4o2bwu07k2w

híc, đây là bài em làm đơn giản nhất mà ko dc. các bạn chỉ mình mới (sửa lại bài cũng đc ạ)
Thank
Gửi bạn
Mã PHP:
Private Sub cmdLogin_Click()
Dim use As String
Dim pas 
As String
use = DLookup("tblDSUser""tblDSUser")
pas DLookup("tblDSUpas""tblDSUser")
If 
IsNull(Me.tenThen
MsgBox 
"ten nguoi dung khong duoc de trong!"vbInformation"Thong bao"
Me.ten.SetFocus
Exit Sub
End 
If
If 
IsNull(Me.txtPassWordThen
MsgBox 
"mat khau khong duoc de trong"vbInformation"Thong bao"
Me.txtPassWord.SetFocus
Exit Sub
End 
If
If 
Me.ten.Value <> use Then
MsgBox 
"ten nguoi dung chua chinh xac"vbInformation"Thong bao"
Me.ten.SetFocus
Exit Sub
End 
If
If 
Me.txtPassWord <> pas Then
MsgBox 
"mat khau chua chinh xac"vbInformation"Thong bao"
Exit Sub
End 
If
If 
Me.ten = use And Me.txtPassWord pas Then
MsgBox 
"Dang nhap thanh cong! Chuc " Me.ten " lam viec vui ve "vbInformation"Thong bao"
DoCmd.OpenForm "main"acNormal
DoCmd
.Close acForm"frmlogin"
End If
End Sub 
Reply
Những người đã cảm ơn
#5
Cái này trên diễn đàn nhiều. cứ lấy về mà dùng
Mình nghĩ làm phần mềm cũng cần phải biết cách chế biến lại của người khác thành của mình
Chữ ký của tt1212 Nhận lập trình ứng dụng Access, PHP, C#  và hỗ trợ các bạn viết phần mềm ĐT:0989.276.236
Email. Tantriviet.vnn@gmail.com
Reply
Những người đã cảm ơn
#6
(20-10-13, 07:03 PM)hungzero Đã viết: Vâng, như tiêu đề, vì em đã dọc các HD nhưng cứ lung tung sao ấy.
Em có 2 form: 1 là LOGIN và form chương trình
1. Em muốn giúp em tạo code để login thành công thì vào form 2 (form chương trình)
2. ở phần password chuyển thành dạng ***
và code mở access ra nó hiện form login luôn
=> Nếu đc HD cự thể giúp em
Thank

Tham khảo http://giobui.mov.mn/bvct/chi-tiet/98/ta...ccess.html
027 hy vọng nó có ích với bạn!
Chữ ký của vinamilk0510 Xin chào, mình là vinamilk0510, Tham gia http://thuthuataccess.com/forum từ ngày 22-10 -13.
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 Khóa form không cho click ra ngoài toidjtjmtoi 3 106 08-09-17, 12:30 PM
Bài mới nhất: toidjtjmtoi
  Giúp đỡ in form toaneurowindow 2 87 28-08-17, 08:06 PM
Bài mới nhất: tranthanhan1962
  [Lỗi] Lỗi không mở được form cawboy 5 128 28-08-17, 06:42 PM
Bài mới nhất: ongke0711
  Thiết lập mở file pdf từ form feeling 1 114 10-08-17, 04:57 AM
Bài mới nhất: cpucloi
  Hiện nội dung record của subform lên main form hueqlhc 9 2,789 02-08-17, 04:36 PM
Bài mới nhất: tvn_hut

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ơ