如何使用程序动态改变数据环境的 connection 对象所使用的数据库?急急急!

LYSSHE 2002-03-24 03:52:29
我使用 DataEnvironment1(数据环境)来做一个把数据分组打印的报表,现在想使用程序动态来改变DataEnvironment1.connection 对象所使用数据库的路径.使用如下方法可以正确设置:
DataEnvironment1.Connection1.ConnectionString = "provider={Microsoft.Jet.OLEDB.4.0};Data Source='" & FilePath & "';Persist Security Info=False"
但运行时出错!提示为:"从当前数据资源中读取得值失败!"

设置Connection 对象的ConnectionSource 时出现"对象不支持命参数?请问该如何解决动态路径的问题?
或者有什么方法不使用数据环境就可以实现分组汇总打印的功能?请各位多多指教!!
...全文
7 点赞 收藏 16
写回复
16 条回复
切换为时间正序
请发表友善的回复…
发表回复
ferrytang 2002-03-24
回复
LYSSHE 2002-03-24
我稍后再找你.ok?
回复
LYSSHE 2002-03-24
我的是 88495208 但上班时间我不能用的.只有晚上7:00之后可以偷偷地聊一下.这里太不好了.
回复
ferrytang 2002-03-24
13275013
回复
LYSSHE 2002-03-24
你现在在做商用的程序吗?
回复
LYSSHE 2002-03-24
你说的没有错,只是不使用 Set 就可以了,而直接用
Dim Report_Data As New ADODB.Connection
Private Sub DataEnvironment_Initialize()
With Report_Data
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & FilePath & ";Persist Security Info=False"
.Open
End With
DataEnvironment1.Connection1 = Report_Data
End Sub
这样也能拷定!谢谢你.
回复
LYSSHE 2002-03-24
谢谢你:ferrytang(ferry)
已经解决 (:-)
你的 QQ ? 交个朋友好吗?
回复
ferrytang 2002-03-24
数据环境的代码
======================================


Private Sub DataEnvironment_Initialize()
Dim strCon As String
strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Password=;Data Source=" & App.Path & "\store.mdb"
gCon.Open strCon
End Sub

Private Sub DataEnvironment_Terminate()
gCon.Close
' Set gCon = Nothing
End Sub

gcon就是你在数据环境中建的连接,
==============================
上面说错了,不用定义的
回复
LYSSHE 2002-03-24
为什么我使用 set DataEnvironment1.connetion=gcon 这样的方法
出错了!是不是需要特别的注意那个地方.
回复
ferrytang 2002-03-24
不能用!
回复
LYSSHE 2002-03-24
ferrytang(ferry) :
请你回来帮帮忙.
我按照你的做法去做了,可是有问题!
出错提示为:编译错误 "属性的使用无效!"
为什么呢?
回复
LYSSHE 2002-03-24
ferrytang(ferry) :
谢谢你! 但在试用你所说的那种方法之前还想问你一个问题.
能不能不在 DataEnvironment1 中定义与打开.因为我在当前工程打开时就已经定义一个全局使用的adodb.connection 对象了.这能使用吗?
回复
ferrytang 2002-03-24
yes
回复
ferrytang 2002-03-24
在DataEnvironment1中定义一个ado.connection gcon
就是代码打开的那种
然后,在数据环境初始化的时候
set DataEnvironment1.connetion=gcon
回复
LYSSHE 2002-03-24
我使用数据环境实现的功能有点类似于"子表与主表打印的功能"
即主表与子表是一对多的关系.现在要打印主表的明细资料.每打一条主表的记录之后再打印与之相对应的所有子表记录.这种功能一定使用报表设计器的"分组标头"吗?(VB6)
回复
ferrytang 2002-03-24
在DataEnvironment1中定义一个ado.connection gcon
就是代码打开的那种
然后,在数据环境初始化的时候
set DataEnvironment1.connetion=gcon
回复
发动态
发帖子

1180

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
社区公告
暂无公告