Các cao thủ xin hỗ trợ dùm mình vấn đề này ạ! Khi mình làm ứng dụng trên access 2003 thì chạy ngon lành. Nhưng khi mình làm trên access 2016 thì nó lại báo lỗi không đọc được file ảnh. Không biết có cách gì khắc phục không? Vì giờ máy mới toàn cài office 2016 không hà.

(20-08-20, 09:08 PM)phungminhluan Đã viết: Các cao thủ xin hỗ trợ dùm mình vấn đề này ạ! Khi mình làm ứng dụng trên access 2003 thì chạy ngon lành. Nhưng khi mình làm trên access 2016 thì nó lại báo lỗi không đọc được file ảnh. Không biết có cách gì khắc phục không? Vì giờ máy mới toàn cài office 2016 không hà.

       --> Ở phiên bản cao hơn Từ Access 2007 trở lên ( 32/64bit) đã có hàm tự động quét ảnh. Bạn chỉ việc bỏ hàm Load ảnh (Hienthihinhanh va Loadhinhanh) của mình là ok.
Sau đó ở form có khung ảnh bạn chèn duy nhất 1 cú pháp sau:
Me.TenKhungAnh.Picture = Địa chỉ dẫn đến ảnh

Chào bạn,

mình gặp lỗi này sau khi mở file
https://drive.google.com/file/d/1u2dgzGU...sp=sharing

(14-09-20, 10:35 AM)maidinhdan Đã viết:

(20-08-20, 09:08 PM)phungminhluan Đã viết: Các cao thủ xin hỗ trợ dùm mình vấn đề này ạ! Khi mình làm ứng dụng trên access 2003 thì chạy ngon lành. Nhưng khi mình làm trên access 2016 thì nó lại báo lỗi không đọc được file ảnh. Không biết có cách gì khắc phục không? Vì giờ máy mới toàn cài office 2016 không hà.

       --> Ở phiên bản cao hơn Từ Access 2007 trở lên ( 32/64bit) đã có hàm tự động quét ảnh. Bạn chỉ việc bỏ hàm Load ảnh (Hienthihinhanh va Loadhinhanh) của mình là ok.
Sau đó ở form có khung ảnh bạn chèn duy nhất 1 cú pháp sau:
Me.TenKhungAnh.Picture = Địa chỉ dẫn đến ảnh

(14-09-20, 03:48 PM)btamsgn Đã viết: Chào bạn,



mình gặp lỗi này sau khi mở file

https://drive.google.com/file/d/1u2dgzGU...sp=sharing

Xóa tất cả 02 modules, không chừa gì cả.
Sau đó ở form có khung ảnh bạn chèn duy nhất 1 cú pháp sau ở sự kiển Current/Load form:

Me.TenKhungAnh.Picture = Địa chỉ dẫn đến ảnh

P/s:        --> Ở phiên bản cao hơn Từ Access 2007 trở lên ( 32/64bit) đã có hàm tự động quét ảnh với cú pháp như trên.

Chào bạn,

bạn cho mình hỏi làm sao để click vào nút "chèn hình" không bị lỗi. vì mỗi lần click vào để chọn đường dẫn file hình thì bị lỗi như thông báo.
vì hiện tại mình dùng windows 10 64bit

Đây là đoạn mã sử dụng cho access 16 bit + 32 bit bạn có thể tham khảo:
#If VBA7 Then (64 bit)
        Private Declare PtrSafe Function GetActiveWindow Lib "user32" () As Long
        Private Declare PtrSafe Function MessageBoxW Lib "user32" (ByVal hwnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long) As Long
#Else (32 bit)
        Private Declare Function GetActiveWindow Lib "user32" () As Long
        Private Declare Function MessageBoxW Lib "user32" (ByVal hwnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long) As Long
#End If

Mình thử mà bị báo lỗi gì không biết nữa
ở dòng này: lReturn = GetOpenFileName(OpenFile)