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

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

如果要解壓到 當前目録，且不需要考慮壓縮包裡文件的相對路徑的話，可以使用 蔘數 e

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

這樣解壓，壓縮包裡的所有文件（包括子目録 子目録裡的目録）都會被解壓到 指定目標目録的根目録下。

但如果希望解壓時保留 壓縮包裡所有文件的相對路徑呢，則應該將 e 命令改爲 x  ,這樣就可保留相對路徑瞭

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

如下圖所示：