我使用的是Access2000,用ADO,使用的是DataGrid控件
我实现的操作是将数据库中表的内容通过DataGrid控件显示出来
代码如下:
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim sql As String
Private Sub Form_Load()
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\系统管理.mdb;Persist Security Info=False"
conn.Open
sql = "select * from manger"
rs.Open sql, conn, adOpenKeyset, adLockOptimisticSet DataGrid1.DataSource = rsEnd Sub
但运行后控件中没有显示任何数据,问题出在那里?
Dim rs As New ADODB.Recordset
Dim sql As String
Private Sub Form_Load()conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\系统管理.mdb;Persist Security Info=False"
conn.Open
sql = "select * from manger"
rs.cursorLocation = adUseClient
rs.Open sql, conn, adOpenKeyset, adLockOptimisticSet DataGrid1.DataSource = rs
End Sub
rs.cursorLocation = adUseClient
这句什么意思啊?
rs.cursorlocation=aduseclient
指的是游标位置为客户端类型