[求助]Win7无法兼容Access2003的Shell函数（续）

roych

经过几天的探索，现在找到了一半的解决方案，就是在Win7下，如果直接输入命令行就可以登录，例如：

1. "C:\Program Files\Microsoft Office\OFFICE11\msaccess.exe " "C:\Program Files\PMS 2008\PrtOrder\后台数据库.mdb" /wrkgrp "C:\Program Files\PMS 2008\PrtOrder\Sysconfig.dll" /user "小鸟飞毛" /pwd "accessbbs.cn"
   
2. 
   

复制代码

但直接用Shell函数就不行（以下是Shell函数）：

游客，如果您要查看本帖隐藏内容请回复

我注意到，当前用户的工作组文件在Winxp下是：
C:\Document and Settings\Roych\Application Data\Microsoft\Access\System.mdw
而在Win7下则没有相关文件，类似的文件夹只有这个（其它应用程序文件夹都没有）：
C:\Users\Roych\App Data
请大家认真研究下，对后来者应该很有帮助，是不是？

t小宝

Shell strAPP, 3
你确定运行上面这句就出错吗？

你可自行新建一个库新建一个过程试运行此函数看效果如何

roych

t小宝 发表于 2010-12-23 20:54
Shell strAPP, 3
你确定运行上面这句就出错吗？

每次打开后就弹出“启动出错”，也就是www的错误处理，不知道是不是路径不对。如果我用命令行来打开的话，就不会出现这个问题。

t小宝

roych 发表于 2010-12-23 21:16
每次打开后就弹出“启动出错”，也就是www的错误处理，不知道是不是路径不对。如果我用命令行来打开的话， ...

新建一个库，添加一个模块，复制以下代码试运行看有什么错误提示
Sub test()

Shell """C:\Program Files\Microsoft Office\OFFICE11\msaccess.exe"" ""C:\Program Files\PMS 2008\PrtOrder\后台数据库.mdb"" /wrkgrp ""C:\Program Files\PMS 2008\PrtOrder\Sysconfig.dll"" /user ""小鸟飞毛"" /pwd ""accessbbs.cn"""

End Sub

roych

回复 t小宝 的帖子

在我的电脑没问题，明天上班时去装了Win7的电脑上试试才知道行不行。

yanwei82123300

尽量不要用win7，问题多多！office中好多项目存在兼容问题，像excel access等

t小宝

看来微软是要给普通用户使用方便安全, 而给编程人员制造麻烦

roych

回复 t小宝 的帖子

调试完毕，光标定在这一行，Dim Istm As New ADODB.Stream
提示：用户定义类型未定义。
请问小宝哥哥，文件没变化，而且都是Access2003版本，应该不存在引用库的问题吧？

t小宝

那就是引用的问题了, ACCESS在不同环境下引用会变的, 看是否引用了ADO2.5以上版本

roych

把这句改为 Set Istm =CreateObject （“ADODB.Stream”）能否解决问题？