我想把检索出来的内容绑定给datagrid1,但是现在有问题,语句如下:
VB codePrivate Sub Command1_Click()
Dim strsql As String
Dim con As ADODB.Connection
Dim cmd As ADODB.Command
Dim rs As ADODB.Recordset
Set con = New ADODB.Connection
Set cmd = New ADODB.Command
Set rs = New ADODB.Recordset
strsql = "server=.;database=DB;uid=sa;pwd=123"
con.ConnectionString = strsql
con.Provider = "SQLOLEDB"
con.Open
cmd.CommandText = "select * from yh"
cmd.ActiveConnection = con
Set rs = con.Execute(cmd.CommandText, n)
Set DataGrid1.DataSource = rs
End Sub
现在提示上面这句‘行集合不能作为标签’,请帮忙解决!谢谢!
cmd.CommandText = "select * from yh"
貌似这句有问题吧
加一句
rs.CursorLocation = adUseClient