关于字符串连接问题(实为数据库连接)
本帖最后由 bcrun 于 2012-12-01 12:32:02 编辑 MDIform下面的子form 加载datagrid , Form_Load事件中datagrid绑定rs .
如果在Form_Load事件里面关闭rs 和cn ，子form的datagrid就没有内容显示，我只能在窗口退出时关闭rs 和cn. 但当我不关闭此form同时打开另外一个子form如果有数据库连接时就会出错，显示连接冲突。
求解决!
我的代码：
Private Sub Form_Load()
cn.Open constr
rs.CursorLocation = adUseClient
rs.Open "select * from aaa", cn, adOpenKeyset, adLockOptimistic
Set DataGrid1.DataSource = Nothing
Set DataGrid1.DataSource = rs
‘rs.close 这两行不能加，加了datagrid就没有数据
'cn.close 这两行不能加，
End Sub
Private Sub Form_Load()
cn.CursorLocation = adUseClient
cn.Open constr
rs.Open "select * from aaa", cn, adOpenKeyset, adLockOptimistic
Set DataGrid1.DataSource = rs
cn.close
set rs.activateconnection=nothing
set datagrid1.datasource=rs
End Sub
