datagrid如何支持非绑定

Question

datagrid如何支持非绑定?
use connection and recordset
don't give to datagrid.datasorce and datagrid.datameber
how to use datagrid to bound connection and recordset?

Answer 1

用Access做后台数据库，在局域网内访问数据库中的内容的示例：
你首先要在VB菜单中：
“工程”－－＞“引用”－－＞“Microsoft AxtiveX Data Objects 2.X Library”
注：2.X为版本号，如果你机子上有高版本的就用高版本的，如：2.5或2.6的。
　　"工程"－－＞“部件”－－＞“MicroSoft DataGrid Control 6.0”
示例：
Private Sub ComOK_Click()
   Dim SQLstr As String,cnstr AS String
　 Dim cn AS New ADODB.Connection'连接对象
   Dim rs As New ADODB.Recordset'记录集对象
   cnstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Data Source=\\myServer\c:\inetpub\wwwroot\yourdb.mdb" '连接字符串
   cn.open' 打开数据库连接
   rs.CursorLocation =adUseClient'使用客户端游标
   sqlstr="slect * from XXX表"
   rs.open sqlstr,cn,3,3'执行SQL语句，并返回记录
   set datagrid1.datasource=rs'将结果显示在datagrid控件中
   datagrid1.refresh
   rs.close'关闭记录集对象
   set rs=nothing
End Sub
本示例是将数据库中的一张表的记录显示在datagrid的控件中。
注：myserver为服务器名可以为IP地址。