上传的附件程序运行正常,就是改个连接数据库路经啊,这么长时间没老师答呀!很难吗?

[ 本帖最后由 曙光电子 于 2012-11-6 09:44 编辑 ]

那么多人下载,可是还是没人回答?

？？？什么都没看到，什么情况？

看了楼主的帖子及各楼层的回复,怀疑楼主app.path路径之下没有test文件夹。明天再来看,现在手机无法打开附件工程

Sub main()
    filename = App.Path & "\test.mdb"'--------你的原来代码中的"d:\test\test.mdb"也要替换掉才可以的。
    cnstr = "Provider =Microsoft.Jet.OLEDB.4.0;Data Source='" & filename & " ';Persist Security Info=False"
    conn.open cnstr
    frm_login.Show
End Sub
所说的app.path指的是工程VBP文件所在目录（准确地讲是你工程编译后的EXE文件所在的目录）
对于某些版本的操作系统而言，有的app.path的最后一个字符有“\”，通过8楼的IIF进行判断一下才好。

谢谢老师的解答,你能不能将我的附件改了给我发过来我看一下,我的邮箱是:617986369@

不用传，只需把你附件中的SUB MAIN 过程代码替换一下就行.

根据你的指点我已试了,是正确答案,再次表示谢谢!由于工作忙,这是我犯的低级错误,我在以后的工作中一定要细想检查.