机加工论坛:这段VB代码

来源:百度文库 编辑:杭州交通信息网 时间:2024/05/05 18:33:15
Private conn As New ADODB.Connection
Private rs As New ADODB.Recordset

Private Sub Command1_Click()
Set msf.DataSource = rs
End Sub

Private Sub Form_Load()
conn.CommandTimeout = 30
conn.ConnectionTimeout = 30
conn.Open "provider=sqloledb;uid=sa;pwd=;data source=.;database=car"
rs.CursorLocation = adUseClient
rs.Open "select * from aa", conn, adOpenStatic, adLockOptimistic
End Sub

说什么“对像变量或WITH快变量未设置”代码应该怎么改啊
msf是控件microsoft flexgrid control 6.0的名称

用“Set msf.DataSource = rs”有问题

flexgrid 不能直接和数据库链
要通过Ado Date控件,数据环境设计器之类的联