Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Xem giúp em ] Chèn ảnh tự động trong acess 2003
#1
Em đang làm 1 bài quản lý sinh viên. Trên form Sinh viên em muốn sử dụng 1 nút để cập nhật ảnh tự động vào form. em có tham khảo đoạn code trên mạng. Các bác xem hộ em với.
Đoạn code em cho vào nè:
Private Sub cmdNhapHinhAnh_Click()
If IsNull(MaSV) Then
MsgBox "Mã Sinh viên Không duoc de trong"
Exit Sub
End If
Dim cPathAnh As String, cAnh As String
cPathAnh = cPath & "\" & Me.MaSV & ".JPG"
cAnh = UCase(Me.MaSV & ".JPG")
If Dir(cPathAnh) <> cAnh Then
MsgBox " Sinh vien Nay chua co anh !"
Exit Sub
End If
With HinhAnh
.Class = "Bitmap.Image"
.OLETypeAllowed = acOLELinked
.SourceDoc = cPathAnh
.Action = acOLECreateLink
End With
End Sub
Private Sub Form_Load()
cPath = Application.CurrentProject.Path
End Sub

Link em nó nè Các bác xem hộ em với . Em cảm ơn nhiều
Chữ ký của mosado Xin chào, mình là mosado, Tham gia http://thuthuataccess.com/forum từ ngày 02-11 -11.
Reply
Những người đã cảm ơn
#2
Tham khảo các topic này:
Lưu đường dẫn hình
http://thuthuataccess.com/forum/thread-81.html
Hiển thì hình khi có đường dẫn
http://thuthuataccess.com/forum/thread-82.html
Chữ ký của Noname 020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#3
Hi. Cảm ơn bác.
Chữ ký của mosado Xin chào, mình là mosado, Tham gia http://thuthuataccess.com/forum từ ngày 02-11 -11.
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
Question [Help] Link tất các table trong một file.mdb bằng VBA MinhnHang 9 231 Hôm qua, 06:11 PM
Bài mới nhất: maidinhdan
  [Thủ Thuật] Tìm số thứ tự bị thiếu trong dãy toanle 8 205 07-12-16, 02:25 PM
Bài mới nhất: toanle
  Tránh xung đột dữ liệu trong access quocdung9999 16 1,694 23-11-16, 11:13 AM
Bài mới nhất: quocdung9999
  [Hỏi] Kết nối nhiều lần hay kết nối 1 lần trong ADO ưu điểm hơn Minh Tiên 1 124 10-11-16, 10:41 AM
Bài mới nhất: maidinhdan
  Summary bằng VBA trong MS Access. MinhnHang 6 320 08-11-16, 08:36 AM
Bài mới nhất: MinhnHang

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ơ