Tùy chọn
Dùng hàm dir
- Dùng hàm dir
-
Dùng hàm dir
thanhdau > 03-09-19, 04:46 PM
Xin chào diễn đàn,
Tôi có sử dụng hàm Dir("D:\datans\anh\no.jpg"). Có thể viết lại để khi di chuyển thư mục Datans sang nơi khác hoặc chép sang máy khác không bị lỗi. -
RE: Dùng hàm dir
ongke0711 > 03-09-19, 09:03 PM
Để khi copy sang máy khác không bị lỗi, bạn phải dùng đường dẫn đông.
- Giả định là file .accdb của bạn cùng nằm trong folder "Datans".
- Dùng hàm Dir$() sẽ nhanh hơn (chiếm ít bộ nhớ hơn Dir()). Hàm này trả về dạng String còn Dir() trả về Variant, mà bạn đã biết rõ nó là String thì nên dùng Dir$. Tương tự cho Left$, Right$, Trim$... có đô-la Mỹ là nhanh.
Dim sFullPath As String
Dim sFileName As String
sFullPath= CurrentProject.Path & "\Anh\no.jpg"
sFileName= Dir$(sFullPath)
If sFileName <> "" Then
Msgbox " File tồn tại"
Else
Msgbox "Không tìm thấy file"
End If