Автор Asik задал вопрос в разделе Другие языки и технологии
возможно настроить в visual basic 6.0 поддержку access 2003 ?? и получил лучший ответ
Ответ от Ev[гуру]
Имеется в виду связать Access и VB для работы с данными?
Вариантов много.
Во-первых, в Access встроен VBA (Visual Basic for Applications) - Visual Basic для приложений) .
Во-вторых, можно на VB 6.0 написать отдельную программу для работы с данными.
Связать БД можно с помощью компонента Data ( Стандартный VB компонент) . Можно воспользоваться компонентом ADOData Control.
В инете есть много готовых примеров.
Но самый лучший способ (и самый гибкий) , это работать с ADO напрямую.
Option Explicit
' Не забываем в ссылках подключить библиотеку "Microsoft ActiveX Data Objects 2.8 Library"
' (msado15.dll)
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
' Загрузка формы
Private Sub Form_Load()
Dim sConnectionString As String
Dim sSQL As String
Set cn = New Connection
With cn
' Задаем параметры соединения
.CommandTimeout = 30
.ConnectionTimeout = 10
.CursorLocation = adUseClient
.Mode = adModeReadWrite
' Создаем строку соединения
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=C:1.mdb;Persist Security Info=False;"
.Open ' открываем соединение
End With
' Создаем SQL запрос к БД
sSQL = "SELECT * FROM Статус"
' Открываем набор записей
Set rs = New Recordset
rs.Open sSQL, cn
' Связываем данные с DataGrid (не забыть положить на форму! )
Set grdDataGrid.DataSource = rs
' (*) Можно еще проще, но так вроде наглядней.. .
End Sub
' Форма выгружается
Private Sub Form_Unload(Cancel As Integer)
' закрываем соединения
rs.Close
cn.Close
' освобождаем память
Set rs = Nothing
Set cn = Nothing
End Sub
проще перейти на VB поздних версий
access 2003 ни в чьей поддержке не нуждается. Ни в visual basic, ни в Delphi, ни в С++