Office中国论坛/Access中国论坛

标题: [求助]Win7无法兼容Access2003的Shell函数(续) [打印本页]

作者: roych    时间: 2010-12-23 13:57
标题: [求助]Win7无法兼容Access2003的Shell函数(续)
经过几天的探索,现在找到了一半的解决方案,就是在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"

复制代码
但直接用Shell函数就不行(以下是Shell函数):
我注意到,当前用户的工作组文件在Winxp下是:
C:\Document and Settings\Roych\Application Data\Microsoft\Access\System.mdw
而在Win7下则没有相关文件,类似的文件夹只有这个(其它应用程序文件夹都没有):
C:\Users\Roych\App Data
请大家认真研究下,对后来者应该很有帮助,是不是?


作者: t小宝    时间: 2010-12-23 20:54
Shell strAPP, 3
你确定运行上面这句就出错吗?

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

作者: roych    时间: 2010-12-23 21:16
t小宝 发表于 2010-12-23 20:54
Shell strAPP, 3
你确定运行上面这句就出错吗?

每次打开后就弹出“启动出错”,也就是www的错误处理,不知道是不是路径不对。如果我用命令行来打开的话,就不会出现这个问题。
作者: t小宝    时间: 2010-12-23 21:54
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    时间: 2010-12-23 21:59
回复 t小宝 的帖子

在我的电脑没问题,明天上班时去装了Win7的电脑上试试才知道行不行。
作者: yanwei82123300    时间: 2010-12-24 08:22
尽量不要用win7,问题多多!office中好多项目存在兼容问题,像excel access等
作者: t小宝    时间: 2010-12-24 09:42
看来微软是要给普通用户使用方便安全, 而给编程人员制造麻烦
作者: roych    时间: 2010-12-24 10:19
回复 t小宝 的帖子

调试完毕,光标定在这一行,Dim Istm As New ADODB.Stream
提示:用户定义类型未定义。
请问小宝哥哥,文件没变化,而且都是Access2003版本,应该不存在引用库的问题吧?
作者: t小宝    时间: 2010-12-24 10:52
那就是引用的问题了, ACCESS在不同环境下引用会变的, 看是否引用了ADO2.5以上版本
作者: roych    时间: 2010-12-24 11:32
把这句改为 Set Istm =CreateObject (“ADODB.Stream”)能否解决问题?
作者: roych    时间: 2010-12-24 13:25
调试完毕,直接由Msgbox strfilepath & strSecuredFileName 时可以弹出路径
但是Dir以后就不行了,——就是改成Msgbox Dir(strfilepath & strSecuredFileName),弹出来的什么都没有了。大家知道怎么回事呢?

作者: t小宝    时间: 2010-12-27 10:19
回复 roych 的帖子

就是说 strfilepath & strSecuredFileName 这个文件不存在
作者: roych    时间: 2010-12-27 10:24
觉得很奇怪的是,把这个dll文件复制到office安装路径下还是出错。——现在我都向微软认输了……
作者: t小宝    时间: 2010-12-27 12:22
是什么错误提示?
作者: roych    时间: 2010-12-27 13:57
回复 t小宝 的帖子

我打算用Setup Factory重新封装一下源程序后再试试看。
作者: davidliu9116    时间: 2011-1-3 17:21
谢谢学习了
作者: yanghua1900363    时间: 2012-9-28 10:39
多谢分享
作者: feihu520    时间: 2014-9-1 21:34
????????????
作者: ACSXY    时间: 2015-1-1 22:05
来学习
作者: 文棣    时间: 2017-2-20 09:01
看看学习学习




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3