为什么不行呢?
Private Sub Form_Load()
Label2.Caption = Projectname
With Adodc1
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & myPath & ";Persist Security Info=False"
.CommandType = adCmdText
.Mode = adModeRead
.RecordSource = "select 环境质量项目,环境质量现状,环境质量标准,执行排放标准 from 建设项目环境质量信息 "
End With
Set DataGrid1.DataSource = Adodc1
End Sub
运行后总是说ADODC1验证失败,这是什么意思啊?