Public Function Adodc(conString As String, adodc_name As Adodc, grid As DataGrid)
Dim cnStr As String
cnStr = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Wage;Data Source=(local)"
With adodc_name
.ConnectionString = cnStr
.CommandType = adCmdText
.RecordSource = conString
Set grid.DataSource = adodc_name
.Refresh
End With
End Function
这段代码我看了很多书都不是很理解，希望高手能够详细的讲解下，最好有资料。先谢了。。。。
在线等