Sasha2002

Помогите начинающему !!!
Есть локальная сеть, в которой есть SQL-Server. Нужно к нему обратиться-считать данные в программу, (для начала хотя бы в текстовые поля), изменить некоторые из них и обновить измененные данные на серваке.

Есть база данных myDB, в ней таблица 'AA' в которой 2 текстовых поля 'Pole1' и 'Pole2'. Вот данные которые нужны для подключения:
dsn=SQL2000
uid=UserTest
pwd=''
Помогите если незатруднит!!!

NikolayLosev

Ну друг мой, книжки никогда не пробовал читать или еще лучше MSDN'ом пользоваться.

Dim cn As ADODB.Connection
Dim rst As ADODB.Recordset

Set cn = New ADODB.Connection
cn.Open 'Provider=sqloledb;DataSource=Server2000;InitialCa talog=myDB;UserId=UserTest;Password=;'

Set rstEmployees = New ADODB.Recordset
rst.CursorType = adOpenKeyset
rst.LockType = adLockOptimistic
rst.Open 'AA', cnn1, , , adCmdTable
msgbox rst.fields('pole1').value & '<>' & rst.fields('pole2').value
rst.close
cn.close
set rst = nothing
set cn = nothing

только не забудь в Project/Reference ссылку на MS ADO поставить.