shell()中使用长文件名的问题[求助]

大飞

我用开发版做过安装，想打印放在程序安装目录下的标签模板文件，在Access程序中用shell调用外部程序如下：
filename = Application.CurrentProject.Path & "\Inner.btw"        （取得模板文件名）
Shell("C:\PROGRA~1\BarTender\bartend.exe /f=" & filename)        （输出命令行）

但用CurrentProject.Path读出来的路径中带有Program File这样的长文件名，shell输出的命令行没法执行。

请教高手该怎么解决这个问题。