access 如何才能正常地调用外部程序？

[yonghuaxie]

用shell()虽然可以运行一个外部，但程序的当前目录却是access的，而且好像不能在程序改
所以这个被运行的程序不能正常运行，是否还有其他可用的方法？

[changechange]

但程序的当前目录却是access的-----建立一个 APPLICATION 即可

dim a as ???.application

[wwwwb]

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hWnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
ShellExecute 0, "open", "notepad.exe", "", "", 1
上述例子是调用写字板，你可以修改一下。

[wwwwb]

ShellExecute 0, "open", "你的目录+你的程序", "", "", 1

[yonghuaxie]

>>Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
>> (ByVal hWnd As Long, ByVal lpOperation As String, _
>> ByVal lpFile As String, ByVal lpParameters As String, _
>> ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
>>ShellExecute 0, "open", "notepad.exe", "", "", 1



不能解决问题

关键在于解决当前目录问题
被运行的程序的当前目录必须能够被修改为程序所在的目录，
而不是access 的默认数据库目录
上面的代码并没有处理这个问题
用shell()同样可以正常运行notepad.exe
因为当前目录是什么对notepad.exe没影响