User ADMIN
Pass: 280882780

(11-07-12, 01:06 AM)dtv197 Đã viết: User ADMIN
Pass: 280882780

SAO MẬT KHẨU KHÔNG ĐÚNG THÌ PHẢI BẠN ƠI

(23-03-12, 04:29 PM)dtv197 Đã viết: Chương trình QLBH
Thiết kế lại theo hướng dẫn tại ketoanvoiaccess.googlepages.com/

Chức năng chính:
- Thêm/Xoá/Sửa Danh mục Hàng hoá, khách hàng, loại hàng, ...
- Thêm/Xoá/Sửa phiếu nhập, phiếu xuất, phiếu thu, phiếu chi,...
- Tổng hợp nhập hàng, xuất hàng, thu chi,...
- Lập báo giá,...
- Và 1 số chức năng khác

Chương trình sử dụng file CSDL riêng, đầu tiên phải kết nối tới CSDL DELTA 2012.mdb trước
Vào Menu Hệ thống - Kết nối CSDL

Em đang tiếp tục xây dựng, các bác xem và cho ý kiến nha....

Password giải nén: delta
mật khẩu kết nối: hlm46dt
Link file: http://www.mediafire.com/?1yq3zmvqp21gww1

Hi,
Cám ơn bài của bạn
bạn có thể hướng dẫn mình bài này nha. Minh có form "THông tin xuất kho", từ 1 record bất kỳ chọn (vd: STT 10)
khi bấm command button Open thì sẽ mở form Xuất kho (có STT 10). Mình muốn viết trong module, xin hướng dẫn.
Các Anh Chị Em đọc qua bài này biết, hướng dẫn giùm mình nha.

thanks all.

Gommom
dangkhanhdiep@hotmail.com

Cái này cũng đơn giản thôi, không cần phải dùng tới module đâu bạn.
Tôi nghĩ trường hợp của bạn là khi bạn có 1 form nào đó chẳng hạn như form Tổng hợp Phiếu Xuất trên form tổng hợp phiếu xuất đó có trường STT hay Số phiếu xuất và bạn muốn click đúp vào trường đó thì sẽ mở form Phiếu Xuất có STT hay số phiếu xuất mà bạn muốn... Nếu đúng như vậy bạn làm như sau:
Bạn tạo 1 macro để tìm và mở form (vd: ở đây mình cần mở form Phiếu xuất kho có STT = 10)
Action: Setvalue
Item: [Forms].[frmTongHopPhieuXuat].[txtSTT]
Expression: "10"

Action: OpenForm
Form name: frmPhieuXuat
View: Form
Where condition:[Tên cột STT/Số Phiếu]=[txtSTT]

(02-08-12, 10:12 AM)dtv197 Đã viết: Cái này cũng đơn giản thôi, không cần phải dùng tới module đâu bạn.
Tôi nghĩ trường hợp của bạn là khi bạn có 1 form nào đó chẳng hạn như form Tổng hợp Phiếu Xuất trên form tổng hợp phiếu xuất đó có trường STT hay Số phiếu xuất và bạn muốn click đúp vào trường đó thì sẽ mở form Phiếu Xuất có STT hay số phiếu xuất mà bạn muốn... Nếu đúng như vậy bạn làm như sau:
Bạn tạo 1 macro để tìm và mở form (vd: ở đây mình cần mở form Phiếu xuất kho có STT = 10)
Action: Setvalue
Item: [Forms].[frmTongHopPhieuXuat].[txtSTT]
Expression: "10"

Action: OpenForm
Form name: frmPhieuXuat
View: Form
Where condition:[Tên cột STT/Số Phiếu]=[txtSTT]

Sao phải cầu kỳ dùng 2 cái Action vậy, gom vào 1 cái thôi
Action : OpenForm
Form name: frmPhieuXuat
View: Form
Where condition:[Forms]![frmPhieuXuat]![txtSoPhieu]=[Forms]![frmTongHopPhieuXuat]![txtSoPhieu]

Muốn dùng VBA thì thế này cho gọn


Thân mến

Bác XuanThanh va dtv197 giúp cho em với, em cũng có trường hợp cần mở form như thế nhưng không làm được.
Dữ liệu của em đây: https://www.dropbox.com/s/9wv0m86ypi0m5i...accdb?dl=0
Em giải thích câu hỏi của mình: Khi nhập từ khóa tìm kiếm là "anh" vào Form F_timDt thì tìm được 6 record có ký tự "anh".
Mình muốn khi con trỏ chỉ vào bản ghi nào ví dụ là bản ghi Lê Xuân Anh, MaDT là 27 thì khi bấm vào nút "Mở để sửa" thì mở ra Form F_suaTT và trên Form này sửa luôn thông tin của Lê Xuân Anh chứ không phải nhập MaDT là 27 nữa. 
Bác giúp em nhé, loay hoay mãi mà không làm được

Em cũng nhập Code vào nút "Mở để sửa" như này nhưng không theo được yêu cầu của em
Docmd.OpenForm "F_suaTT", acNormal, "T_LyLich!MaDT='" me.TxtMaDT & "'"

Code bạn sai. Thiếu dấu "&"
Docmd.OpenForm "F_suaTT", acNormal, "T_LyLich!MaDT='" & me.TxtMaDT & "'"
Nếu MaDT trong table  kiểu Number thì bỏ luôn dấu nháy đơn " ' "
Docmd.OpenForm "F_suaTT", acNormal, "T_LyLich!MaDT=" & me.TxtMaDT

(25-02-16, 04:29 PM)ongke0711 Đã viết: Code bạn sai. Thiếu dấu "&"
Docmd.OpenForm "F_suaTT", acNormal, "T_LyLich!MaDT='" & me.TxtMaDT & "'"
Nếu MaDT trong table  kiểu Number thì bỏ luôn dấu nháy đơn " ' "
Docmd.OpenForm "F_suaTT", acNormal, "T_LyLich!MaDT=" & me.TxtMaDT

Bạn ơi tôi đã thử cả hai câu lệnh bạn viết rồi, có mở được Form F_suaTT nhưng không đúng record hiện hành trên Form F_timDT, bạn xem giúp tôi nhé

Vậy bạn xem lại chính tả. Trong form bạn đặt thuộc tính Name của textbox [MaDT] là txtMaDT hay TxtMaDT? Bạn đặt tên nó một đằng, trong VBA code bạn gọi tên thằng khác thì nó không ừ hử gì là đúng rồi đó.
Sửa code lại theo đúng tên: Me.TxtMaDT hoặc là Me.txtMaDT