• 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.  014

    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
  • RE: Dùng hàm dir

    thanhdau > 04-09-19, 09:36 AM

    Cảm ơn ongke0711 rất nhiều