代码如下
Private Sub Del_Click()
Adodc1.RecordSource = "delete from second where " + "控件名称 = " + "'" + DataGrid1.Columns(1).Value + "'" (这句代码原来在一行里)
Adodc1.RefreshEnd Sub
一运行就出错
错误3704:如果对象关闭,则不允许应用程序请求的操作
Private Sub Del_Click()
Adodc1.RecordSource = "delete from second where " + "控件名称 = " + "'" + DataGrid1.Columns(1).Value + "'" (这句代码原来在一行里)
Adodc1.RefreshEnd Sub
一运行就出错
错误3704:如果对象关闭,则不允许应用程序请求的操作
Adodc1.ConnectionString = "Provider=SQLOLEDB.1;" & _
"Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Ts_Song;Data Source=E200"
Aodoc1.RecordSource = "Select * from SongTT order by singer"
Adodc1.Refresh