求助：在不安装VB6的环境运行时MSFlexGrid1与 Data1连接不上！
求助：在不安装VB6的环境运行时MSFlexGrid1与 Data1连接不上！Private Sub Form_Load()
'引用：DAO 3.6
'使用：MSFLXGRD.OCX
'窗体设置：
'Begin VB.Form frm发布问题
' Begin VB.Data Data1
' Begin MSFlexGridLib.MSFlexGrid MSFlexGrid1
' 设置： MSFlexGrid1.DataSource = Data1
Dim dbD As Database '库
Dim dbR As Recordset '动态集
Dim SQLs As String
SQLs = "SELECT * FROM [测试表] WHERE [年龄] > 20 "
Set dbD = OpenDatabase(App.Path & "\Access数据库.mdb") '开库
Set dbR = dbD.OpenRecordset(SQLs)
Set Data1.Recordset = dbR
Me.Caption = Data1.Recordset.Fields(0) & " " & _
Data1.Recordset.Fields(1) & " " & _
Data1.Recordset.Fields(2) 'id、姓名、年龄
End Sub
我把所有 dll文件、ocx文件和【发布测试.exe】、【Access数据库.mdb】放在同一文件夹下，在安装有VB6的环境运行正常，但在不安装VB6的环境运行时MSFlexGrid1 与 Data1 连接不上！ Me.Caption显示Data1.Recordset正常，但MSFlexGrid1没有数据。
先谢谢了！
使用 Package & Deployment 向导生成的发布包\Support\
========= 共有文件 19 个 ==========
* 1 Access数据库.mdb
* 2 asycfilt.dll
* 3 COMCAT.DLL
* 4 dao360.dll
* 5 FLXGDCHS.DLL
* 6 MSFLXGRD.OCX
* 7 msvbvm60.dll
* 8 oleaut32.dll
* 9 olepro32.dll
* 10 SETUP.EXE
* 11 Setup.Lst
* 12 SETUP1.EXE
* 13 ST6UNST.EXE
* 14 stdole2.tlb
* 15 vb6chs.dll
* 16 VB6STKIT.DLL
* 17 发布测试.BAT
* 18 发布测试.exe
* 19 发布测试.DDF
========= End ==========
msflexgrid mahflexgrid类型控件应该和adodc控件配合使用 控件需要注册 先谢谢两位！
1.由于使用adodc 连接有关联的查询时遇到问题，所以使用DAO,而dao 只能连接data、只能连接MSFlexGrid。
2.由于软件只是某系统外的辅助工具，不准许触动注册表，所以不能进行安装，只能做成准绿色软件。
只准绿色的话就无解了.
至少也得能运行安装包吧.
真要害怕弄坏系统的话可以先做个GHOST备份一下么.
不过这种担忧基本上都是不必要的.
补充：VB , 控件
