Đá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 Present Nhận viết phần mềm, hỗ trợ viết phần mềm, hợp tác viết phần mềm trên nên Microsoft Access mọi phiên bản Liên hệ: Mr Đức -989276236. Email: Tantriviet.vnn@gmail.com website:http://www.tantrivietsoft.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 thêm dữ liệu vào form Main_Sub NganNguyen 1 35 Hôm qua, 02:23 AM
Bài mới nhất: maidinhdan
  Tự động hiện Form khi loading hết thời gian ChiMai 1 49 02-12-16, 08:59 PM
Bài mới nhất: ongke0711
Photo [Hỏi] Mở Form trên access 2007 báo lỗi jason 5 194 22-11-16, 09:23 AM
Bài mới nhất: jason
  Query hiện lên trên form? feeling 4 164 09-11-16, 09:49 PM
Bài mới nhất: toancvp
  [Help] Chỉnh giúp Form thống kê hoanghai902 2 124 28-10-16, 06:15 PM
Bài mới nhất: hoanghai902

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ơ