1,217
社区成员
发帖
与我相关
我的任务
分享ACCESS+水晶报表的问题
安装时的路径不固定，如何在改变路径时设置与ACCESS与水晶报表的连接，
因为考虑以后添加报表的问题，因此，不能采用设置报表的数据源的办法
，也就是说，在不改动程序的情况下，可以动态的添加报表的个数。
我好象查到了一个LogOnServer的函数，但它只有连接SQL SERVER数据的方法，
ACCESS好象不知道它的参数如果传进去,请大家帮助。
因为考虑以后添加报表的问题，因此，不能采用设置报表的数据源的办法
，也就是说，在不改动程序的情况下，可以动态的添加报表的个数。
我好象查到了一个LogOnServer的函数，但它只有连接SQL SERVER数据的方法，
ACCESS好象不知道它的参数如果传进去,请大家帮助。
...全文
请发表友善的回复…
发表回复
LGQ1001 2004-12-28
- 打赏
- 举报
自己找到方法了，结帖 ^ _ ^
LGQ1001 2004-12-27
- 打赏
- 举报
我是想加载之后，改变ODBC连接或是用LogOnServer函数改变
报表的连接，使它能正确地找到数据库文件。
报表的连接，使它能正确地找到数据库文件。
LGQ1001 2004-12-27
- 打赏
- 举报
不是这个问题，我是想报表自动改变它的连接数据库。
谢谢。
谢谢。
yorkness 2004-12-27
- 打赏
- 举报
用不着用函数，直接用app.path就行了
iif(left(app.path,1)="\", app.path & "ado.mdb",app.path & "\ado.mdb")
Set Rp = Cryapp.OpenReport(App.Path & "\入库单.rpt")
打开数据库同理
iif(left(app.path,1)="\", app.path & "ado.mdb",app.path & "\ado.mdb")
Set Rp = Cryapp.OpenReport(App.Path & "\入库单.rpt")
打开数据库同理
