| Вопрос: ADO | Добавлено: 30.12.08 21:13 |
Автор вопроса:  Aston | ICQ: 214-179-991 |
|
Привет всем!
У меня такой вопрос как проверить программно, открыто ли подключение или нет в адо. Public m_db As ADODB.Connection
Public Function DBConnect(ByVal szDataBase As String) As Boolean
On Error GoTo err_h Set m_db = New ADODB.Connection m_db.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & szDataBase & ";Persist Security Info=False" Call m_db.Open DBConnect = True Exit Function err_h: DBConnect = False Set m_db = Nothing End Function Ка узнать открыто оно или нет? |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа:  Ученик Вопросов: 6 Ответов: 22 |
Профиль | | #1 | Добавлено: 07.02.09 13:35 |
Обработай в ошибках... ну например:
или просто переместись по базе rs.movenext и так далее и посмотри в проверке EOF & BOF если передвинется то всё гуд. да даже если взять просто rs.recordcount то тоже можно проверить.. думай сам как тебе удобнее 
но это всего лишь моё мнения.. я всеголишь Ученик.. |
||
|
Номер ответа: 2 Автор ответа: VerhoLom Вопросов: 20 Ответов: 285 |
Профиль | | #2 | Добавлено: 15.02.09 16:03 |
|
У ADODB.Connection есть событие Disconnect - иногда очень помогает...
А еще свойстьво State, з0начению которого соответствует перечисление adStateEnum - посмотрите в броузере объектов. |
||
Страница: 1 |