如何将recordset对象中的数据显示到msflexgrid最好是直接帮定上去,别的几个控件有没有更好用的,我只要能显示数据就可.
解决方案 »
- visual studio2005能用作VBS的编辑器不
- 一个能自动与你的QQ好友聊天的程序(源码)
- 控制音量,可以说下思路 也可以给出代码 谢谢
- ADO的Provider数据库类型能添加吗?
- 为什么下面语句在sqlserver2000数据库中可执行而access中不行
- 界面的问题
- 求教:也是关于调用dll时函数声明的问题
- 急!关于访问文件的问题?
- VB中函数怎么才能接受一个color值?调用时怎么把color值传递给函数?
- 如何截取WINDOWS MediaPlayer 控件播放时视频窗口中的视频图像,使之可以被Picture控件播放(像播视频电影那样连贯的播放截取的图片!)
- VB SQL数据库中,如何使用触发器
- DataReport问题,请指点.
'添加MSHFlexGrid控件(工程/部件/Microsoft Hierarchical FlexGrid Control 6.0 (OLEDB))Private Sub Command1_Click()
Dim cn As New ADODB.Connection, rs As New ADODB.Recordset
cn.CursorLocation = adUseClient
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Test.mdb;User Id=admin;Password=;"
rs.Open "select * from 表 ", cn, adOpenDynamic, adLockOptimistic
Set MSHFlexGrid1.DataSource = rs
End Sub
连接字符为 strConn = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;User ID=sa;Initial Catalog=你的数据库名;Data Source=数据库所在的计算机名"