• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

In hình ảnh khi có đường dẫn hình trong report

• Trang chủ

  • Thủ Thuật Access
  • Access Nâng Cao
  • Thư viện thủ thuật
  • In hình ảnh khi có đường dẫn hình trong report
• In hình ảnh khi có đường dẫn hình trong report

• RE: In hình ảnh khi có đường dẫn hình

  hungle2006 > 06-05-16, 11:56 AM

  Thưa bác Maidinhdan em không quản lý nhân viên của em mà em quản lý nhân khẩu, thế nên chưa biết lúc nào có ảnh của họ, hihi, nên cứ mở ra là nó thông báo không mở được, em cũng suy nghĩ về vụ này nhiều rồi mà không ra, chắc tại em gà mờ mà, mong bác chỉ giáo

• RE: In hình ảnh khi có đường dẫn hình

  maidinhdan > 06-05-16, 05:35 PM

  (06-05-16, 11:56 AM)hungle2006 Đã viết: Thưa bác Maidinhdan em không quản lý nhân viên của em mà em quản lý nhân khẩu, thế nên chưa biết lúc nào có ảnh của họ, hihi, nên cứ mở ra là nó thông báo không mở được, em cũng suy nghĩ về vụ này nhiều rồi mà không ra, chắc tại em gà mờ mà, mong bác chỉ giáo

  
  Vậy là bạn đã tải Demo không phải của mình rồi.... vui lòng vào tải lại.
  
  Tải Demo tại bài #6 dùm, dù không có ảnh nó cũng không báo lỗi gì cả
  
  Link: http://thuthuataccess.com/forum/thread-8...l#pid26714
  
  File Đính kèm có tên là: Code_Xem Anh.zip

• RE: In hình ảnh khi có đường dẫn hình

  hungle2006 > 07-05-16, 10:59 AM

  Code_xemanh của bác bị lỗi 2114 em không biết mở thế nào, bác xem lại giùm

• RE: In hình ảnh khi có đường dẫn hình

  maidinhdan > 08-05-16, 09:34 PM

  (07-05-16, 10:59 AM)hungle2006 Đã viết: Code_xemanh của bác bị lỗi 2114 em không biết mở thế nào, bác xem lại giùm

  
  1. Chụp hình lỗi Post lên đây.
  2. Bạn sử dụng Office mấy , Hệ điều hành ? bao nhiêu bit?
  
  Lý do: Code này đã được chứng minh như sau
  
  2. Thư viên DLL tham chiếu: Không có ( Vì ưu điểm này mà có thể chạy trên tất cả các Hệ điều hành và tất cả các bản Office 2003,2007,2010,2013...
  
  3. Quy định về Kích thước và kiểu file ảnh: Không có
  + Vì thế bạn đưa bất kỳ file ảnh nào lên dù kích thước lớn hay nhỏ nó tự động canh chỉnh theo khung Text vẽ, và hình mình xem trên Window đẹp như thế nào thì khi xem trên Access cũng như thế.

• RE: In hình ảnh khi có đường dẫn hình

  hungle2006 > 09-05-16, 11:54 AM

  Chào bác Maidinhdan, em dung òffice 2013, 64 bit, em da chuyen code sang 64 bit roi chay thi no bao loi 2114 nhu hinh sau:
  Bấm vào nút "Chèn hình" xuất hiện lỗi
   
  Ok tiếp :
  
  bác xem giúp nhé

• RE: In hình ảnh khi có đường dẫn hình

  maidinhdan > 09-05-16, 03:43 PM

  (09-05-16, 11:54 AM)hungle2006 Đã viết: Chào bác Maidinhdan, em dung òffice 2013, 64 bit, em da chuyen code sang 64 bit roi chay thi no bao loi 2114 nhu hinh sau:
  Bấm vào nút "Chèn hình" xuất hiện lỗi
   
  Ok tiếp :
  
  bác xem giúp nhé

  
  Hiện tại mình chỉ cài Access 2003 nên bạn nào có sẳn Office 2013 64 bit Test dùm bạn hungle. Xin cảm ơn
  
  Bạn đợi đến cuối tuần công việc mình rãnh, mình xóa cài Office 2013 64 bit, để test cho bạn nhé.
  
  Ghi chú ảnh từ Google Drive không đính trực tiếp trên diễn đàn được đâu. ( Chèn ảnh phải link trực tiếp bằng đuôi hình: *.jpg. *.bmp...)
  
  Xin chèn link ảnh của bạn lại: Ảnh 1 _____ Ảnh 2
  
  Tuy nhiên: Bạn thử vào chọn lại thư viện VBA - > Tool- > References. Xem dòng nào có chữ Misssing bạn chọn lại "Microsoft Access 11.0 Object Library" chọn số cao hơn thử xem ( Hướng dẫn xử lý lỗi Missing - Không tìm thấy thư viện tham chiếu: Hướng Dẫn [Tổng hợp] Tham chiếu Thư viện Access và Lỗi Missing)
  
  Thân!

• RE: In hình ảnh khi có đường dẫn hình

  thdanh > 18-07-16, 10:58 AM

  Cho mình hỏi điều này. Tại sao minh đặt chương trình trên máy tính mạng chia sẽ ứng dụng dưới dạng shortcut ch các máy trạm mình sử dụng nút chọn file như đã nêu ở trên thì bi báo lỗi. Cao thủ nào bít cách khắc phục chỉ dùm mình với

• RE: In hình ảnh khi có đường dẫn hình

  maidinhdan > 18-07-16, 11:06 AM

  (18-07-16, 10:58 AM)thdanh Đã viết: Cho mình hỏi điều này. Tại sao minh đặt chương trình trên máy tính mạng chia sẽ ứng dụng dưới dạng shortcut ch các máy trạm mình sử dụng nút chọn file như đã nêu ở trên thì bi báo lỗi. Cao thủ nào bít cách khắc phục chỉ dùm mình với

  
  1. Mình không phải là tác giả của Demo này nên không rõ chi tiết hàm, nên đề nghị bạn post hàm chèn file lên đây.
  2. Bạn cho biết luôn đang sử dụng Office nào? bao nhiêu bit? Kể cả hệ điều hành đang dùng.
  
  Còn demo của mình thì đây: http://thuthuataccess.com/forum/thread-8...l#pid26714
  
  Ảnh minh họa
  

• RE: In hình ảnh khi có đường dẫn hình

  tvn_hut > 30-08-16, 04:37 PM

  (21-08-10, 11:31 AM)Noname Đã viết: Hỏi: Tôi đã lưu hình ảnh vào ổ đĩa G: ( G: là ổ đĩa mạng). Và có 1 cơ sở dữ liệu lưu đường dẫn theo dạng : tvhinh(mahang,txtpic). Bây giờ trong Report làm sao tôi có thể vẽ lại các hình tôi đã lưu!
  Đáp:
  Trong Report, bạn vẽ 1 textbox đặt tên là txtpic, đặt thuộc tính visible của nó là False.
  Vẽ 1 đối tượng image đặt tên nó là image1
  Sau đó cho đoạn code sau vào
  

  Mã:

  Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
On Error GoTo err_Pic
If IsNull(Me.txtPic) Then
   Me.Image1.Picture = ""
   Me.Image1.Visible = False
Else
   Me.Image1.Picture = txtPic.Value
   Me.Image1.Visible = True
End If
Exit Sub
err_Pic:
   MsgBox Err.Description, vbOKOnly
   Exit Sub
End Sub

  Cập nhật Demo
  
  Download

  Bạn noname ơi. mình làm theo hướng dẫn của bạn tuy nhiên khi in thì cái có hình cái không có mặc dù record nào cũng có đường link ảnh. Mình chưa biết giải quyết sao. Mong bạn hướng dẫn giúp

• RE: In hình ảnh khi có đường dẫn hình

  tvn_hut > 30-08-16, 10:51 PM

  (21-08-10, 11:31 AM)Noname Đã viết: Hỏi: Tôi đã lưu hình ảnh vào ổ đĩa G: ( G: là ổ đĩa mạng). Và có 1 cơ sở dữ liệu lưu đường dẫn theo dạng : tvhinh(mahang,txtpic). Bây giờ trong Report làm sao tôi có thể vẽ lại các hình tôi đã lưu!
  Đáp:
  Trong Report, bạn vẽ 1 textbox đặt tên là txtpic, đặt thuộc tính visible của nó là False.
  Vẽ 1 đối tượng image đặt tên nó là image1
  Sau đó cho đoạn code sau vào
  

  Mã:

  Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
On Error GoTo err_Pic
If IsNull(Me.txtPic) Then
   Me.Image1.Picture = ""
   Me.Image1.Visible = False
Else
   Me.Image1.Picture = txtPic.Value
   Me.Image1.Visible = True
End If
Exit Sub
err_Pic:
   MsgBox Err.Description, vbOKOnly
   Exit Sub
End Sub

  Cập nhật Demo
  
  Download

  
  Mình download về chạy thử, tuy nhiên khi số record nhiều lên (khoảng 20 chẳng hạn) thì lập tức khi in ra có nhiều record bị mất hình mặc dù vẫn có đường link hình. cả nhà thử xem có lỗi gì không nhỉ. Help me
• Bài trước Bài tiếp