用VB(外部程序)启动ACCESS程序

huanghai

代码示例:  

1. Dim acc  As Object
   
   
2.     Set acc = CreateObject("access.Application")
   
   
3.     Shell (acc.SysCmd(9) & "msaccess.exe")  'acSysCmdAccessDir
   
   
4.     Set acc = Nothing

复制代码

主要运用ACCESS的APPLICATION.SysCmd对象到得ACCESS安装路径,这样就可以使用SHELL调用了,SHELL调用还可以加入一些参数以达到一些用途.如UNTIIME(运行时运行程序)/cmd (启动参数),或者加载工作组文件包括帐号等功能.