Office中国论坛/Access中国论坛

标题: 谁用过janus gridex,交流一下，看看这种情况怎么办 [打印本页]

作者: pxfinal 时间: 2006-6-30 03:29
标题: 谁用过janus gridex,交流一下，看看这种情况怎么办
这几天一直研究access，为了能使用折叠grid，所以想起来以前有个控件，janus

gridex能实现，所以装上了，在vb中我已经通过help建立了工程，但是在access中，我发现，通过修改自带属性也能使用，但是数据库不能是当

前数据库，比如说，db1.mdb中有个表“user".当时在db1.mdb中的窗体中使用janus

gridex却无法访问”user"表，无法使用currentproject.connection.

不知道那位老大用过，能不能交流一下。谁用过janus gridex控件，好像版主用过？？？？

估计是配置的问题，就是不知道如何确定数据源。

作者: zhuyiwen 时间: 2006-6-30 04:41
这个控件有专门针对Access的版本。但具体如何使用，没有研究过。

作者: yodong 时间: 2010-6-10 16:54
Dim grobject As GridEX
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim sqlstr As String
Set cn = CurrentProject.Connection
Set grobject = Me.GridEX9.Object
grobject.DatabaseName = cn
'grobject.DataMode = jgexADO
MsgBox grobject.DatabaseName
sqlstr = "up_cl_v所有请购单_Cost_Fnd '" & Me.datebegin & "','" & Me.dateend & "','" & Me.Buyer & "','" & Me.BuyTeam & "','" & Me.BuyDept & "','" & Me.Whs & "'"
'日期,采购员,采购组,采购部门,仓库
Set rs = cn.Execute(sqlstr)
MsgBox rs.RecordCount '有12条记录
grobject.HoldFields
Set grobject.Recordset = rs'运行到这句的时候显示类型不匹配.不知道是什么原因.我是用在ADP中的.

作者: yodong 时间: 2010-6-15 17:56
哦,原来把这行去掉就可以了.grobject.HoldFields

作者: LeeTien 时间: 2010-6-16 12:55
楼主
请教个问题
逐个字段赋值可以吗

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)