使用参数打开 Microsoft Access
Opening Microsoft Access with parameters
与 Form 对象的 OpenArgs 属性 类似,我是否可以使用传递的参数(比如从 .bat 文件)打开 Access Application 本身?
基本上,我希望通过可变链接到 .bat 文件来加快用户体验,这些文件可以打开同一文件,但指向不同的菜单屏幕等。
使用/cmd
命令行参数启动Access,Access中的Commmand()
函数-VBA读取
"C:\Program Files (x86)\Microsoft Office\Office14\MSACCESS.EXE" D:\Work\myDb.accdb /cmd foo
并且此函数由 Autoexec
宏调用:
Public Function AutoExec()
Dim sCmd As String
' ... other initializations ...
' Read /cmd command-line parameter
sCmd = Command()
Select Case sCmd
Case "foo": Call Foo()
Case "bar": Call Bar()
Case Else: Debug.Print "No valid command-line parameter passed."
End Select
End Function
与 Form 对象的 OpenArgs 属性 类似,我是否可以使用传递的参数(比如从 .bat 文件)打开 Access Application 本身?
基本上,我希望通过可变链接到 .bat 文件来加快用户体验,这些文件可以打开同一文件,但指向不同的菜单屏幕等。
使用/cmd
命令行参数启动Access,Access中的Commmand()
函数-VBA读取
"C:\Program Files (x86)\Microsoft Office\Office14\MSACCESS.EXE" D:\Work\myDb.accdb /cmd foo
并且此函数由 Autoexec
宏调用:
Public Function AutoExec()
Dim sCmd As String
' ... other initializations ...
' Read /cmd command-line parameter
sCmd = Command()
Select Case sCmd
Case "foo": Call Foo()
Case "bar": Call Bar()
Case Else: Debug.Print "No valid command-line parameter passed."
End Select
End Function