Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Kiểm tra đường dẫn có chứa file hình
#1
Mình muốn viết hàm kiểm tra đường dẫn nếu đường dẫn có chứa file hình thì lưu lại và lần sau mở Form lên thì xuất đường dẫn đã lưu, còn đường dẫn không có file hình thì báo lỗi.
Mình thiết kế form như sau:
1 textbox (chứa đường dẫn file hình)
1 button (lưu đường dẫn file hình)

Mong mọi người giúp đỡ !!!!
Chữ ký của hanbaoquan210x Xin chào, mình là hanbaoquan210x, Tham gia http://thuthuataccess.com/forum từ ngày 22-07 -14.
Reply
Những người đã cảm ơn
#2
(21-08-14, 12:44 PM)hanbaoquan210x Đã viết: Mình muốn viết hàm kiểm tra đường dẫn nếu đường dẫn có chứa file hình thì lưu lại và lần sau mở Form lên thì xuất đường dẫn đã lưu, còn đường dẫn không có file hình thì báo lỗi.
Mình thiết kế form như sau:
1 textbox (chứa đường dẫn file hình)
1 button (lưu đường dẫn file hình)

Mong mọi người giúp đỡ !!!!
Chào bạn!
bạn có thể dùng lệnh dir("Đường dẫn") để kiểm tra file hình có tồn tại không.
Ví dụ: Mình có đường dẫn: C:\1.jpg
Viết code kiểm tra như sau
If Dir("C:\1.jpg") <> "" then
' Lệnh khi file tồn tại
else
' Lệnh khi file không tồn tại
end if
Chữ ký của hanyoungmine Bí ẩn!
Reply
Những người đã cảm ơn
#3
http://www.thuthuataccess.com/forum/thread-6270.html

Có đầy đủ những thứ bạn cần
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 hanyoungmine
#4
Mình có viết hàm kiểm tra folder cho file hình nhưng chương trình không hiểu. Mọi người xem giúp mình làm sai chỗ nào ???
Me.tb_path là textbox để cho đường dẫn vào.


If Dir(Me.tb_path, vbDirectory) = "\*.jpg,bmp" Then
MsgBox "Folder nay co chua hinh !!!!"
Else
MsgBox "Folder nay khong co hinh!!!!"
End If
Chữ ký của hanbaoquan210x Xin chào, mình là hanbaoquan210x, Tham gia http://thuthuataccess.com/forum từ ngày 22-07 -14.
Reply
Những người đã cảm ơn
#5
(22-08-14, 03:55 PM)hanbaoquan210x Đã viết: Mình có viết hàm kiểm tra folder cho file hình nhưng chương trình không hiểu. Mọi người xem giúp mình làm sai chỗ nào ???
Me.tb_path là textbox để cho đường dẫn vào.


If Dir(Me.tb_path, vbDirectory) = "\*.jpg,bmp" Then
MsgBox "Folder nay co chua hinh !!!!"
Else
MsgBox "Folder nay khong co hinh!!!!"
End If
Chào bạn!
Có phải ý đồ của bạn là tạo Folder chứa hình, folder này nằm cùng với file Access. Ví dụ: Trong thư mục: C:\VD có 1 folder tên Hinh, và 1 file access.
Bạn cần biết:
Để lấy được vị trí của database hiện tại:
Dùng code Application.CurrentProject.Path
Bây giờ, muốn kiểm tra các file hình có định dạng .jpg, .bmp trong folder Hinh thi bạn viết code này.
If (Dir(Application.currentProject.Path & "\Hinh\*.jpg) <> "") or (Dir(Application.currentProject.Path & "\Hinh\*.bmp) <> "") then
'....Hành động nếu có hình
else
'....Hành động nếu k có hình
end if
Chữ ký của hanyoungmine Bí ẩn!
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
  Tạo form tìm kiếm thông tin Mỹ Hạnh 2 106 29-03-18, 02:28 PM
Bài mới nhất: Mỹ Hạnh
  Không thể mở hình ảnh theo đường link ảnh trên access 2016 tvn_hut 0 62 14-03-18, 04:24 PM
Bài mới nhất: tvn_hut
Photo Tao nut tim kiem va cho ket qua tren form tuong ung voi cac truong Winston nguyen 10 349 07-03-18, 08:19 AM
Bài mới nhất: Winston nguyen
  Hướng Dẫn Tìm kiếm theo nhiều tiêu chí trên Form mrtoanbin 10 660 11-02-18, 04:19 PM
Bài mới nhất: haidc
Photo Thiết kế combobox chứa giới tính trong Access binhpc 4 345 09-11-17, 03:05 PM
Bài mới nhất: ongke0711

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ơ| PMA Nha Trang| Gỗ Acrylic Không Đường Line