Другие языки программирования и технологии

Знатоки VisualBasic, как организовать подключение к внешней БД(Excel или Acces).?

Просто пример... .
Для подключения к Access:
Пусть на диске C: у нас будет файл с базой данных (1.mdb)
Положим на форму компонент DataGrid, переименуем его в grdDataGrid.
В ссылках подключим библиотеку "Microsoft ActiveX Data Objects 2.8 Library"
(msado15.dll)
Далее код формы

Option Explicit
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 запрос к базе данных, к таблице "Customers"
sSQL = "SELECT * FROM Customers;"
' Открываем набор записей
Set rs = New Recordset
rs.Open sSQL, cn

' Связываем данные с DataGrid
Set grdDataGrid.DataSource = rs
' (*) Можно еще проще, но так вроде наглядней

' Форма выгружается
Private Sub Form_Unload(Cancel As Integer)
' закрываем соединение
rs.Close
cn.Close
' освобождаем память
Set rs = Nothing
Set cn = Nothing
End Sub

Exel, не есть база данных, но с помощью ADO можно то же подключаться к файлу и читать/писать данные.
Андрей Tанченков
Андрей Tанченков
69 339
Лучший ответ
Компоненты ADO, все делается в несколько кликов =)
примеров в нете полно