Access使用rar.exe命令行解壓時如何使用相對路徑

我們知道Access可使用rar.exe或unrar.exe(無須授權(quán)） 的命令行方式可以用VBA來自動解壓文件

如果要解壓到 當(dāng)前目錄，且不需要考慮壓縮包里文件的相對路徑的話，可以使用 參數(shù) e

strSrc = CurrentProject.Path & "\patch.rar"
strDes = CurrentProject.Path
strCmdLine = CurrentProject.Path & "\rar.exe e -o+ -ep1 """ & strSrc & """ """ & strDes & """"

這樣解壓，壓縮包里的所有文件（包括子目錄 子目錄里的目錄）都會被解壓到 指定目標(biāo)目錄的根目錄下。

但如果希望解壓時保留 壓縮包里所有文件的相對路徑呢，則應(yīng)該將 e 命令改為 x  ,這樣就可保留相對路徑了

strSrc = CurrentProject.Path & "\patch.rar"
strDes = CurrentProject.Path
strCmdLine = CurrentProject.Path & "\rar.exe x -o+ -ep1 """ & strSrc & """ """ & strDes & """"

如下圖所示：