Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Какие библиотеки нужно подключить для подключения к БД? / 4 сообщений из 4, страница 1 из 1
08.06.2011, 09:35
    #37299892
teCa
teCa
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие библиотеки нужно подключить для подключения к БД?
Что нужно подключить в Tools -> Reference что бы работал ADODB.Connection. Методом тыка так и не удалось мне установить.
Иначе в коде:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Private Sub InsertRecord(F1 As String, F2 As String, F3 As String, F4 As String, F5 As String, F6 As Date, F7 As Date, F8 As String, F9 As Integer)
    Dim cn As ADODB.Connection, rs As ADODB.Recordset, q As String
    
    Set cn = New ADODB.Connection
    cn.ConnectionString = "Provider=SQLOLEDB.1 бла бла бла"
    cn.Open
    
    Set rs = New ADODB.Recordset
    q = "INSERT INTO datafull VALUES ('" & F1 & "', '" & F2 & "', '" & F3 & "', '" & F4 & "', '" & F5 & "', '" & F6 & "', '" & Format(F7, "dd.mm.yyyy") & "', '" & F8 & "', '" & F9 & "', '" & F10 & "', '" & Format(F11, "dd.mm.yyyy") & "')"
    'rs.Open q, cn
    
    Debug.Print q
    
    'cn.Close
    Set cn = Nothing
End Sub
Вылетает следующая ошибка:
автор---------------------------
Microsoft Visual Basic
---------------------------
Compile error:

User-defined type not defined
---------------------------
ОК Справка
---------------------------
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.06.2011, 10:26
    #37299975
PlanB
PlanB
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие библиотеки нужно подключить для подключения к БД?
потыкайте в эти (не все относятся к коннекту, разумеется)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.06.2011, 15:58
    #37300780
teCa
teCa
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие библиотеки нужно подключить для подключения к БД?
На будущее - Microsoft ActiveX Data Objects (ADO)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.06.2011, 21:32
    #37301349
Cursky
Cursky
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие библиотеки нужно подключить для подключения к БД?
При раннем связывании

Запустить один раз для подключения ссылок
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Sub AddReferences()
    On Error Resume Next
    '364 Name:   ADODB
    'Description:   Microsoft ActiveX Data Objects 2.8 Library
    ThisWorkbook.VBProject.References.AddFromFile ("C:\Program Files\Common Files\System\ado\msado15.dll")
    'или по GUID:
    ThisWorkbook.VBProject.References.AddFromGuid GUID:="{2A75196C-D9EB-4129-B803-931327F72D5C}", Major:= 2 , Minor:= 8 
End Sub

Использовать в программе:
Код: plaintext
1.
2.
3.
4.
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset 
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset

При позднем связывании

Подключать библиотеки не надо; просто обьявляем переменную как объект, а потом создаём объект нужного класса:
Код: plaintext
1.
2.
3.
Dim objConnection As Object
Dim objRecordset As Object
Set objConnection = CreateObject("ADODB.Connection")
Set objRecordset = CreateObject("ADODB.Recordset")
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Какие библиотеки нужно подключить для подключения к БД? / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 410ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2176790]:
 0ms
get settings:
 6ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 145ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 38ms
get tp. blocked users:
 1ms
others: 196ms
total:  410ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]