MS Access,如何确定当前应用程序实例启动的命令行参数?
MS Access, How to determine the command line parameters that the current instance of application has started with?
我需要 VBA 解决方案来获取命令行参数,这些参数在应用程序的当前实例启动时已被馈送到 MS Access。例如如果它已经作为运行时等启动
我不相信您可以获得用于启动 Access 的完整命令行。但是,您当然可以在启动 swtichs 中添加一个 /cmd 选项,并且 VBA "command()" 将 return 这些值。
因此:
VBA 函数 command() 将 return /cmd
之后的值
因此:
典型的启动命令行如下所示:
"C:\Program Files (x86)\Microsoft Office\Office14\MSACCESS.EXE"
"c:\MyCoolProgram\MyApp.accde" /runtime /cmd "Parm1" "Parm2"
以上都是一行(中间有一个space)。要获取两个传递的参数,则
Debug.Print Split(Command(), " ")(0)
Debug.Print Split(Command(), " ")(1)
您还可以测试应用程序是否使用 /runtime 开关启动,或者您是否使用运行时版本:
If syscmd(acSysCmdRuntime) = true then
' runtime version
因此您可以使用 /cmd startup swtich 指定和传递启动参数
我需要 VBA 解决方案来获取命令行参数,这些参数在应用程序的当前实例启动时已被馈送到 MS Access。例如如果它已经作为运行时等启动
我不相信您可以获得用于启动 Access 的完整命令行。但是,您当然可以在启动 swtichs 中添加一个 /cmd 选项,并且 VBA "command()" 将 return 这些值。
因此: VBA 函数 command() 将 return /cmd
之后的值因此:
典型的启动命令行如下所示:
"C:\Program Files (x86)\Microsoft Office\Office14\MSACCESS.EXE"
"c:\MyCoolProgram\MyApp.accde" /runtime /cmd "Parm1" "Parm2"
以上都是一行(中间有一个space)。要获取两个传递的参数,则
Debug.Print Split(Command(), " ")(0)
Debug.Print Split(Command(), " ")(1)
您还可以测试应用程序是否使用 /runtime 开关启动,或者您是否使用运行时版本:
If syscmd(acSysCmdRuntime) = true then
' runtime version
因此您可以使用 /cmd startup swtich 指定和传递启动参数