Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Tạo query trong Module
#1
Shocked 
Gửi Anh, Chị.
Anh, Chị giúp em tạo một query trong Module để khi em nhập dữ liệu trong frmBH thì kết quả sẽ như khi em đặt Record Source qryBH
Mục đích của em là: Hạn chế số lượng query và cần tạo trong Module là để em sẽ gọi cho nhiều form khác.
Anh, Chị giúp em nhé.
Em cảm ơn Anh, Chị nhiều ah!

http://www.mediafire.com/download/zkcj89...BH2003.rar
Chữ ký của minhhang02081992 Xin chào, mình là minhhang02081992, Tham gia http://thuthuataccess.com/forum từ ngày 16-03 -15.
Reply
Những người đã cảm ơn
#2
Cho em phép bỏ đường link khác vào đây nhé.
Vì em ko thấy chỗ nào để em gắn file đính kèm.

Em xin cảm ơn!
Chữ ký của minhhang02081992 Xin chào, mình là minhhang02081992, Tham gia http://thuthuataccess.com/forum từ ngày 16-03 -15.
Reply
Những người đã cảm ơn
#3
(19-03-15, 09:35 AM)minhhang02081992 Đã viết: Hỏi: tạo một query trong Module
- Khi nhập dữ liệu trong frmBH thì kết quả sẽ như khi em đặt Record Source: qryBH
- Mục đích của em là: Hạn chế số lượng query

File đây ah: http://www.giaiphapexcel.com/forum/attac...1426728255

File của bạn Access 2007, Mình dùng Access 2003, bạn chuyển thành Access 2003 đi. Trên đây hình như mọi người dùng 2003 nhiều.

Còn link file thì tạo Accout tại trang http://www.mediafire.com để bên Giải pháp Excel có tài khoản mới tải được.

Cuối cùng, bạn tham khảo bài này chắc chắn bạn sẽ tự tìm đươc cách làm:
Tên bài viết: Thay Query bằng SQL trong VBA
Link : http://thuthuataccess.com/forum/thread-6619.html
Người trả lời: Xuân Thanh
Người đặt câu hỏi: tt1212

Thân mến!
Chữ ký của maidinhdan * Để được hỗ trợ tốt nhất, nhấn vào link dưới đây để xem.
1. [Hướng dẫn] Kiểu file gửi lên để được giúp đỡ
2. [Hướng dẫn] Nội quy diễn đàn
3. [Hướng dẫn] Cách Đưa file và hình vào diễn đàn
4.[Hướng dẫn] Để xây dựng một ứng dụng hoàn hảo và lời cảm tạ
5. Cần tìm Demo hay ứng dụng sử dụng thanh tìm kiếm phía trên cùng, bên phải của diễn đàn.
* Nếu muốn cảm ơn, hãy nhấn nút thank, không cần viết thêm bài nào nửa.



ღღღღღTài sản của maidinhdan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn minhhang02081992
#4
Dạ vâng, em gửi lại đường link để download đây ah.

Em đã chuyển sang Access 2003 rồi đấy ah.

Cảm ơn anh, chị

http://www.mediafire.com/download/zkcj89...BH2003.rar
Chữ ký của minhhang02081992 Xin chào, mình là minhhang02081992, Tham gia http://thuthuataccess.com/forum từ ngày 16-03 -15.
Reply
Những người đã cảm ơn
#5
(19-03-15, 06:39 PM)minhhang02081992 Đã viết: Hỏi: tạo một query trong Module
- Khi nhập dữ liệu trong frmBH thì kết quả sẽ như khi em đặt Record Source: qryBH
- Mục đích của em là: Hạn chế số lượng query
Link file: http://www.mediafire.com/download/zkcj89...BH2003.rar

Bạn minhhang thân mến, tôi đã xem qua qryBH và frmBH của bạn rồi mình có một số góp ý cụ thể như sau:

Thứ 1, Tên câu hỏi của bạn cần đặt là : Thay Query bằng SQL trong VBA
Thứ 2, với kết cấu Relationships( quan hệ bảng) thì bạn tạo Query "qryBH" dù bằng Query hay SQL đều cũng cho ra số liệu không chính xác. Bạn thử mở Query bạn ra xem nó đâu có chạy được ( nó chỉ chạy được khi table 2 và table 3 của bạn tương đương ID nhau. Xin nói thêm là table 2 của bạn có đến 10 dòng, table 3 không có dòng nào, nhưng khi bạn nạp 1 dòng cho table 3 thì chay qryBH thì xuất hiện 1 dòng...và cứ như thế...( không biết nói nhiu bạn có tưởng tượng ra được không nửa). Tới đây query chưa chạy thì làm gì nghĩ đến chuyện làm form để chạy SQL trong VBA ( thế đó)

--> Cách khắc phục:
+ Bạn tạo dùm mình 3 form khác nhau: lấy Record Source từ table1, 2, 3 ( vậy là không cần thông qua Query cho đúng ý bạn) tạm gọi 3 form mới tạo là frm1, 2, 3
+ Tiếp đến, bạn thẩy frm2, 3 vào frm1 là xong.

Chú ý link Child/Master fields của frm 2,3 ( mặc định thẩy vào nó tự kết nối rồi, chả cần thao tác thêm gì)

Góp ý: Bạn cứ xem vấn đề trên để khắc phục trước đi. Nếu bạn vẫn cương quyết muốn tạo lấy Record Source bằng SQL trong VBA thì mình sẽ giúp bạn.

Thân mến.
Chữ ký của maidinhdan * Để được hỗ trợ tốt nhất, nhấn vào link dưới đây để xem.
1. [Hướng dẫn] Kiểu file gửi lên để được giúp đỡ
2. [Hướng dẫn] Nội quy diễn đàn
3. [Hướng dẫn] Cách Đưa file và hình vào diễn đàn
4.[Hướng dẫn] Để xây dựng một ứng dụng hoàn hảo và lời cảm tạ
5. Cần tìm Demo hay ứng dụng sử dụng thanh tìm kiếm phía trên cùng, bên phải của diễn đàn.
* Nếu muốn cảm ơn, hãy nhấn nút thank, không cần viết thêm bài nào nửa.



ღღღღღTài sản của maidinhdan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn minhhang02081992
#6
Dạ vâng, chắc em làm vội quá nên ko để ý ah.
Em cũng xin giải trình nội dung như sau: Em nhập trên form là để dữ liệu lưu vào table3 (sổ theo dõi chi tiết), và để đảm bảo nhập được trong table3 thì ID (mã hàng và tên hàng trong table1) và Đơn giá (đã có theo Mã hàng trong table2) phải có trước (đăng ký trước)
Khi em làm bằng query kiểu "lưới" thì em đã làm được, giờ các bác cho em xin một example khi em muốn lấy SQL để thay qry kia ah.
Em cảm ơn nhiều a!
Chữ ký của minhhang02081992 Xin chào, mình là minhhang02081992, Tham gia http://thuthuataccess.com/forum từ ngày 16-03 -15.
Reply
Những người đã cảm ơn
#7
(19-03-15, 10:46 PM)minhhang02081992 Đã viết: Dạ vâng, chắc em làm vội quá nên ko để ý ah.
Em cũng xin giải trình nội dung như sau: Em nhập trên form là để dữ liệu lưu vào table3 (sổ theo dõi chi tiết), và để đảm bảo nhập được trong table3 thì ID (mã hàng và tên hàng trong table1) và Đơn giá (đã có theo Mã hàng trong table2) phải có trước (đăng ký trước)
Khi em làm bằng query kiểu "lưới" thì em đã làm được, giờ các bác cho em xin một example khi em muốn lấy SQL để thay qry kia ah.
Em cảm ơn nhiều a!

Các công việc cần nắm khi sử dụng Row Sourse bằng SQL trong VBA ( gọi tắt là SQL-VBA) thay cho table/Query

1. Form chạy SQL-VBA chỉ để xem/lọc dữ liệu chứ không thể tác động gì đến nó, Vì thế ta phải tạo form nhậo liệu bằng SQL-VBA. ( thế là ta làm 2 việc)

Bước 1: Tạo form hiện thị bằng SQL-VBA: gọi form này là frmHienthi
code: Chen vào sự kiện Form_Load
Mã PHP:
Private Sub Form_Load()
Dim sql As String
sql 
"SELECT * FROM Table3"
Me.RecordSource sql  'Gắn thuộc tính RowSource giống như bạn chọn table/Query vậy.
End Sub 

Bước 2: Tạo form nhập liệu bằng SQL-VBA ( nhập xong cho nó hiện vào form trên)
- Tạo 1 text box đặt tên là : txtID
- Tạo 1 nút Command đặt tên là : Capnhat

Thêm code vào sự kiện Click của nút Capnhat
Mã PHP:
Private Sub Capnhat_Click()
Dim sql As String
sql 
"UPDATE Table3 SET Table3.ID = txtID"   ' cập nhật vào table3 cột ID , table 3 có 2 cột vì trường kia là AutoNuber nên kg cần làm gì cả
DoCmd.RunSQL sql
DoCmd.Close
Forms("frmHienthi").Requery
End Sub 

Từ từ ngâm cứu nhé, mình chỉ vidu trên một table thôi cho bạn dể hiểu, bạn thêm bao nhiêu Row Source nửa cũng được! Good luck.
Chữ ký của maidinhdan * Để được hỗ trợ tốt nhất, nhấn vào link dưới đây để xem.
1. [Hướng dẫn] Kiểu file gửi lên để được giúp đỡ
2. [Hướng dẫn] Nội quy diễn đàn
3. [Hướng dẫn] Cách Đưa file và hình vào diễn đàn
4.[Hướng dẫn] Để xây dựng một ứng dụng hoàn hảo và lời cảm tạ
5. Cần tìm Demo hay ứng dụng sử dụng thanh tìm kiếm phía trên cùng, bên phải của diễn đàn.
* Nếu muốn cảm ơn, hãy nhấn nút thank, không cần viết thêm bài nào nửa.



ღღღღღTài sản của maidinhdan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#8
Dạ vâng, em đã hiểu và thực hành gợi ý của bác khi ép 1 table.
Bác dạy em việc viết code cho các table này có quan hệ với nhau nhé, đặc biệt là tạo thành một cái gì đó mà bất kỳ form nào em cũng gọi được các kết quả từ đây.
Em cảm ơn nhiều ah.
Chữ ký của minhhang02081992 Xin chào, mình là minhhang02081992, Tham gia http://thuthuataccess.com/forum từ ngày 16-03 -15.
Reply
Những người đã cảm ơn
#9
(20-03-15, 08:15 AM)minhhang02081992 Đã viết: Dạ vâng, em đã hiểu và thực hành gợi ý của bác khi ép 1 table.
Bác dạy em việc viết code cho các table này có quan hệ với nhau nhé, đặc biệt là tạo thành một cái gì đó mà bất kỳ form nào em cũng gọi được các kết quả từ đây.
Em cảm ơn nhiều ah.

Tôi không hiểu ý câu này lắm: "tạo thành một cái gì đó mà bất kỳ form nào em cũng gọi được các kết quả từ đây"

Các yêu cầu cần và đủ để hướng dẫn bạn làm được:
1. Bạn cụ thể bằng cách cho tôi table đầy đủ.
2. Bạn tạo sẳn form mẫu theo ý bạn bằng Query. Sau đó mình sẽ hướng dẫn bạn viết bằng cấu trúc SQL trong VBA.
3. Bạn nhập số liệu vào mỗi table khoản 10 dòng ( để chạy code kiểm tra nó ra đúng không ấy mà)

Đó là 3 việc mình cần bạn làm, vì mình không có nhiều thời gian để phán đoán ứng dụng bạn làm mục đích gì để có những đoạn code hướng dẫn sát với nhu cầu câu hỏi của bạn.

Xong rồi post file lên kèm câu hỏi như: tên form A có sub form B nạp vào table gì đó...

Thân mến chào bạn!
Chữ ký của maidinhdan * Để được hỗ trợ tốt nhất, nhấn vào link dưới đây để xem.
1. [Hướng dẫn] Kiểu file gửi lên để được giúp đỡ
2. [Hướng dẫn] Nội quy diễn đàn
3. [Hướng dẫn] Cách Đưa file và hình vào diễn đàn
4.[Hướng dẫn] Để xây dựng một ứng dụng hoàn hảo và lời cảm tạ
5. Cần tìm Demo hay ứng dụng sử dụng thanh tìm kiếm phía trên cùng, bên phải của diễn đàn.
* Nếu muốn cảm ơn, hãy nhấn nút thank, không cần viết thêm bài nào nửa.



ღღღღღTài sản của maidinhdan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#10
Dạ file em sửa đây ah: http://www.mediafire.com/download/a0pct8...BH2003.rar

Anh giúp em đoạn code sao cho kết quả ở form1 và form2 được như ở frmBH

Thanks!
Chữ ký của minhhang02081992 Xin chào, mình là minhhang02081992, Tham gia http://thuthuataccess.com/forum từ ngày 16-03 -15.
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 về bắt lỗi trong accc thanlaem 20 683 05-09-16, 10:53 PM
Bài mới nhất: thanlaem
  xuống dòng trong textbox report tieuho828 3 266 08-05-16, 09:22 PM
Bài mới nhất: maidinhdan
  Module cộng trừ số lẻ vodainhan 4 396 25-11-15, 04:09 PM
Bài mới nhất: vodainhan
  [Help] Giúp đỡ về dàn dữ liệu trong phần Detail của Report!! phatdtcdsp 9 957 07-08-15, 09:50 AM
Bài mới nhất: tranthanhan1962
  [Help] Giúp tạo form tìm kiếm các file trong windows aitinh2005 1 533 25-07-15, 10:40 PM
Bài mới nhất: tranthanhan1962

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ơ