Access獲取文件夾內的文件名及路徑

用access獲取系統(tǒng)文件夾中的文件名，可以對文件進行操作處理

如何獲取文件夾內所有文件的文件名及其路徑呢？

下列代碼獲取上圖文件夾中所有文件名及其路徑。

    Set fso = CreateObject("Scripting.FileSystemObject")
    
    Set getfso = fso.GetFolder("E:\Office交流網(wǎng)Access通用平臺_標準正式版").files
    
    For Each i In getfso
        s = s & ";" & i
        Me.List1.RowSourceType = "Value List"
        Me.List1.RowSource = s
   Next

把獲取到帶路徑的文件名放入列表框內，效果如下圖所示。