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

2018-09-22 16:00:00
黃善超
原創
773

用access穫取繫統文件夾中的文件名,可以對文件進行操作處理

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



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

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



把穫取到帶路徑的文件名放入列錶框內,效果如下圖所示。

    分享