1. Report em tạo ra,
Nếu có 1 record: in trang đầu tiên thì Ok
Nếu có nhiều records: thì khi ra lệnh in, sẽ in tất cả các record (phí quá)
Làm sao giải quyết, chỉ in record hiện hành thôi?
 
2. Em tạo query lọc dữ liệu, tìm theo [ID number], mong kết quả truy xuất:
(i) là Reprot theo [ID number] chưa được
Hoặc (ii) là Form chứa record có [ID number] vừa tìm kiếm thì phải làm sao?
 
Lỗi tại điều kiện lọc query hay tại đâu? Form nhập liệu, tạo nút tìm kiế theo [ID number] thì phải làm sao để cho kết quả về record có ID number cần tìm (ngay trên form)?

Kính nhờ quý anh chị giúp....Chân thành cảm ơn.
File của em đây: https://www.mediafire.com/file/biemxfj0r...ECFi.accdb

Invalid or Deleted File.

(03-11-17, 05:49 PM)tranthanhan1962 Đã viết: Invalid or Deleted File.

Là sao?

File của em vẫn đây mà???

http://www.mediafire.com/file/biemxfj0rb...%8Fi.accdb

Vài góp ý với bạn:
1. Nên đọc phần căn bản của Access, đặc biệt là cách sử dụng đặt tên các đối tượng như table, query, textbox, listbox, ....
2. Không nên đặt tên có khoảng trắng hoặc có dấu (nếu đặt có khoảng trắng, khi gọi đối tượng phải được để trong dấu []) => phần sau 


Bạn sử dụng câu lệnh mở report
1. Xem report trên màn hình
DoCmd.OpenReport "TenReport", acViewPreview
nếu muốn có thêm điều kiện khi mở:
DoCmd.OpenReport "TenReport", acViewPreview,,"TenFileddieukien like Dieukien"
Như trường hợp của bạn, TenFileddieukien là [Hanhchinh].[ID number]
Dieukien là Forms![KHAM BENH KE TOA]![ID number]
2. Để in trực tiếp
Thay acViewPreview = acViewNormal
Hoặc bạn có thể trực tiếp đặt điều kiện trong Query nguồn của Report
Filed [Hanhchinh].[ID number] = Forms![KHAM BENH KE TOA]![ID number]

cpucloi Đã viết:Vài góp ý với bạn:
1. Nên đọc phần căn bản của Access, đặc biệt là cách sử dụng đặt tên các đối tượng như table, query, textbox, listbox, ....
2. Không nên đặt tên có khoảng trắng hoặc có dấu (nếu đặt có khoảng trắng, khi gọi đối tượng phải được để trong dấu []) => phần sau 


Bạn sử dụng câu lệnh mở report
1. Xem report trên màn hình
DoCmd.OpenReport "TenReport", acViewPreview
nếu muốn có thêm điều kiện khi mở:
DoCmd.OpenReport "TenReport", acViewPreview,,"TenFileddieukien like Dieukien"
Như trường hợp của bạn, TenFileddieukien là [Hanhchinh].[ID number]
Dieukien là Forms![KHAM BENH KE TOA]![ID number]
2. Để in trực tiếp
Thay acViewPreview = acViewNormal
Hoặc bạn có thể trực tiếp đặt điều kiện trong Query nguồn của Report
Filed [Hanhchinh].[ID number] = Forms![KHAM BENH KE TOA]![ID number]

Chân thành cảm ơn,...

(04-11-17, 11:08 AM)cpucloi Đã viết: Vài góp ý với bạn:
1. Nên đọc phần căn bản của Access, đặc biệt là cách sử dụng đặt tên các đối tượng như table, query, textbox, listbox, ....
2. Không nên đặt tên có khoảng trắng hoặc có dấu (nếu đặt có khoảng trắng, khi gọi đối tượng phải được để trong dấu []) => phần sau 


Bạn sử dụng câu lệnh mở report
1. Xem report trên màn hình
DoCmd.OpenReport "TenReport", acViewPreview
nếu muốn có thêm điều kiện khi mở:
DoCmd.OpenReport "TenReport", acViewPreview,,"TenFileddieukien like Dieukien"
Như trường hợp của bạn, TenFileddieukien là [Hanhchinh].[ID number]
Dieukien là Forms![KHAM BENH KE TOA]![ID number]
2. Để in trực tiếp
Thay acViewPreview = acViewNormal
Hoặc bạn có thể trực tiếp đặt điều kiện trong Query nguồn của Report
Filed [Hanhchinh].[ID number] = Forms![KHAM BENH KE TOA]![ID number]

Dạ em chân thành cảm ơn...
Xin hỏi thêm, nếu có chuỗi: "ngày 5 tháng 11 năm 2017", có thể dùng lệnh/hàm như thế nào để cho kết quả là 5112017 hoặc 05112017?

(05-11-17, 07:25 AM)pvhung76 Đã viết: Xin hỏi thêm, nếu có chuỗi: "ngày 5 tháng 11 năm 2017", có thể dùng lệnh/hàm như thế nào để cho kết quả là 5112017 hoặc 05112017?

Cái này cũng đơn giản. Cách làm là cứ duyệt qua từng ký tự nếu nó là số (IsNumeric) thì thêm vô chuỗi số. Xác định nó là ký tự số cũng có 2 cách:
1. Select Case stChuoi
    Case "0 to "9"
    ...
2. dùng hàm IsNumeric.

Trong đây tôi dùng hàm IsNumeric(). Bạn dùng hàm trích số từ chuỗi bên dưới:

(05-11-17, 09:36 AM)ongke0711 Đã viết:

(05-11-17, 07:25 AM)pvhung76 Đã viết: Xin hỏi thêm, nếu có chuỗi: "ngày 5 tháng 11 năm 2017", có thể dùng lệnh/hàm như thế nào để cho kết quả là 5112017 hoặc 05112017?

Cái này cũng đơn giản. Cách làm là cứ duyệt qua từng ký tự nếu nó là số (IsNumeric) thì thêm vô chuỗi số. Xác định nó là ký tự số cũng có 2 cách:
1. Select Case stChuoi
    Case "0 to "9"
    ...
2. dùng hàm IsNumeric.

Trong đây tôi dùng hàm IsNumeric(). Bạn dùng hàm trích số từ chuỗi bên dưới:

Mã PHP:

Function TrichSoTuChuoi(ByVal stChuoi As String) As Long
   Dim intLen As Integer
   Dim n As Integer
   stChuoi = Trim(stChuoi)
   intLen = Len(stChuoi)
   n = 1    'Tim kiem bat dau tu vi tri 'n'
   If stChuoi = "" Or IsNull(stChuoi) Or intLen = 0 Then Exit Function
   Do
       If IsNumeric(Mid(stChuoi, n, 1)) Then    'Kiem tra tung ky tu co phai là So.
           TrichSoTuChuoi = TrichSoTuChuoi & Mid(stChuoi, n, 1)
           n = n + 1
       Else
           n = n + 1
       End If
   Loop Until intLen = (n - 1)

   'Luu y: neu ham tra ve gia tri 0 tuc là chuoi không có ký tu So

End Function 


Chân thành cảm ơn sự hướng dẫn tận tình của anh chị.
Bây giờ em set up trang report in khổ giấy A5, tại sao lề phải luôn la 0.336 inches (không thay đổi được) vậy????