Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Tạo Report lấy thông tin từ Form nhưng bị lỗi.
#1
Em có một tblThongtin: gồm các trường; tên công ty, địa chỉ, mã số thuế.
em tạo Report phiếu chi (R_chi), trên page hearder của report em muốn lấy thông tin
như tên công ty, địa chỉ, mã số thuế một cách tự động... từ frmThongtin nhưng hiện nay nó bị lỗi.
Em không biết cách làm như vậy có đúng không.

=[Forms]![frmThongtin]![txttendonvi]
=[Forms]![frmThongtin]![txtcongdoancoso]

http://www.mediafire.com/download/ilgwaz...congty.rar

Các bạn hướng dẫn thêm.
Cám ơn,
Chữ ký của anhemnhangu Xin chào, mình là anhemnhangu, Tham gia http://thuthuataccess.com/forum từ ngày 08-08 -13.
Reply
Những người đã cảm ơn
#2
(15-01-14, 11:48 AM)anhemnhangu Đã viết: Em có một tblThongtin: gồm các trường; tên công ty, địa chỉ, mã số thuế.
em tạo Report phiếu chi (R_chi), trên page hearder của report em muốn lấy thông tin
như tên công ty, địa chỉ, mã số thuế một cách tự động... từ frmThongtin nhưng hiện nay nó bị lỗi.
Em không biết cách làm như vậy có đúng không.

=[Forms]![frmThongtin]![txttendonvi]
=[Forms]![frmThongtin]![txtcongdoancoso]

http://www.mediafire.com/download/ilgwaz...congty.rar

Các bạn hướng dẫn thêm.
Cám ơn,
Nó chỉ hiển thị khi forms frmthongtin được mở thôi bạn à, còn lại thì can thiệp code vào nhé.
Bạn thay 2 đoạn code cũ thành
Mã:
=fthongtin("tendonvi")
=fthongtin("tencongdoan")

sau đó tạo 1 module thêm đoạn code chứa hàm fthongtin() này vào
Mã:
Function fthongtin(gt As String)

Dim db As DAO.Database
Dim rs As DAO.Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset("tblthongtin")
rs.MoveFirst
If gt = "tendonvi" Then
fthongtin = rs.Fields("tendonvi")
Else
fthongtin = rs.Fields("congdoancoso")
End If
End Function

File http://haiquan.id1945.com/up/file/_246_tencongty.rar
Chữ ký của quan_pc Lắp đặt Internet VNPT tại Điện Bàn - Quảng Nam - Hotline: 0915.636.745
ღღღღღTài sản của quan_pc (View All Items) ღღღღღ
Reply
Những người đã cảm ơn anhemnhangu
#3
gửi bạn
http://www.mediafire.com/download/r0hp47...congty.rar
Chữ ký của ketoan_it Xin chào, mình là ketoan_it, Tham gia http://thuthuataccess.com/forum từ ngày 29-06 -13.
Reply
Những người đã cảm ơn anhemnhangu
#4
Access có sẵn hàm DLookup sao mọi người không dùng nhỉ? Cứ thích "dài dòng văn tự"
Trên report có textbox txtTenDonVi. RecordSource của nó : =DLookup("TenDonVi","tblThongTin")
Các textbox khác cũng tương tự
Thân mến
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn quan_pc , anhemnhangu
#5
(15-01-14, 02:02 PM)Xuân Thanh Đã viết: Access có sẵn hàm DLookup sao mọi người không dùng nhỉ? Cứ thích "dài dòng văn tự"
Trên report có textbox txtTenDonVi. RecordSource của nó : =DLookup("TenDonVi","tblThongTin")
Các textbox khác cũng tương tự
Thân mến
cảm ơn anh Xuân Thanh lâu rồi em ko dùng Dlookup nên quên mất cái hàm này 015
Chữ ký của quan_pc Lắp đặt Internet VNPT tại Điện Bàn - Quảng Nam - Hotline: 0915.636.745
ღღღღღTài sản của quan_pc (View All Items) ღღღღღ
Reply
Những người đã cảm ơn anhemnhangu , hctol
#6
(15-01-14, 02:48 PM)quan_pc Đã viết: cảm ơn anh Xuân Thanh lâu rồi em ko dùng Dlookup nên quên mất cái hàm này 015

Cám ơn mà chẳng thấy "Thank's" 034
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn quan_pc , anhemnhangu , hctol
#7
(15-01-14, 05:25 PM)Xuân Thanh Đã viết:
(15-01-14, 02:48 PM)quan_pc Đã viết: cảm ơn anh Xuân Thanh lâu rồi em ko dùng Dlookup nên quên mất cái hàm này 015

Cám ơn mà chẳng thấy "Thank's" 034

à quên big green, đã làm ngay và luôn 015
Chữ ký của quan_pc Lắp đặt Internet VNPT tại Điện Bàn - Quảng Nam - Hotline: 0915.636.745
ღღღღღTài sản của quan_pc (View All Items) ღღღღღ
Reply
Những người đã cảm ơn anhemnhangu
#8
Cho em gửi lời cám ơn. Rất vui khi nhận được sự hướng dẫn nhiệt tình từ các bạn thành viên.
Trân trọng,
Chữ ký của anhemnhangu Xin chào, mình là anhemnhangu, Tham gia http://thuthuataccess.com/forum từ ngày 08-08 -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
  Lọc query có điều kiện để tạo report honglv157 3 152 01-12-16, 05:15 PM
Bài mới nhất: maidinhdan
  Cách huỷ bỏ các thông báo của append query. quanghoasla 10 2,132 11-08-16, 02:00 PM
Bài mới nhất: toancvp
  QUERY THÔNG BÁO LỖI Ranju 7 206 10-07-16, 11:32 PM
Bài mới nhất: Trần Linh
Photo [Lỗi] Bị lỗi khi lấy dữ liệu từ textbox form vào điều kiện của query phamlong24 3 222 08-04-16, 10:21 AM
Bài mới nhất: ongke0711
  Lấy những bản ghi >50% wintq 4 514 05-10-15, 04:52 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ơ