


обновить элемент Adodc1 выплывает ошибка на весь экран.
Причем я скачивал и устанавливал
MDAC 2.8, но не помогло
- Код: Выделить всё
private sub Reconnect()
With Adodc1
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\articles;Persist Security Info=False"
.RecordSource="SELECT * FROM Articles"
End With
Set DG.DataSource = Adodc1
Adodc1.Refresh <-'а вот здеся этот глюк\багафича
помогите его пофиксить