Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / неименованный экземпляр драйвера ODBC (MySql ODBC) / 11 сообщений из 11, страница 1 из 1
10.02.2016, 00:27
    #39167195
Сергей Лалов
Сергей Лалов
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
неименованный экземпляр драйвера ODBC (MySql ODBC)
Привет всем, столкнулся с небольшим неудобством при присоединении access к серверу MySQL через MySQL ODBC Driver 5.3
Создаю именованный экземпляр драйвера в списке администрирования ODBC, настраиваю его, линкую таблицы , все работает. Но ссылаться при линковке таблицы нужно обязательно на именованный экземпляр созданный на компьютере. Только если настроен DSN.

Ладно, хрен с ним, пошел дальше, решил отучить аксесс от создания именованного DSN. Снес таблицу ,зашел в конструктор запроса,
сделал тип запроса к серверу, текст запроса сделал
Код: plsql
1.
SELECT * FROM tbl_goods



Строку подключения сделал в свойствах запроса несвязанную с конкретным именным подключением:
Код: plsql
1.
ODBC;Driver=MySQL ODBC 5.3 ANSI Driver; Server=.XX.XX.XXX.XXX;Database=XX_XXXX;User=XXXX;Password=XXXX;Option=3;



Все здорово и замечательно, запрос чудесно сделал выборку с сервера.

Теперь хочу спросить, а можно ли как нибудь отучить линкованную таблицу от именованного экземпляра подключения . Именно таблицу , не привязываться через DSN , который надо отдельно создавать, а по аналогии с запросом напрямую использовать драйвер myOdbc?? Если да, то где там в свойствах можно прописать мой connection string?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.02.2016, 00:51
    #39167201
Сергей Лалов
Сергей Лалов
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
неименованный экземпляр драйвера ODBC (MySql ODBC)
...пошел дальше..и решил задачку...

Через VBA создал линкованную таблицу, но процедуру создания пришлось писать кодом и вешать на кнопку..:

Код: vbnet
1.
2.
3.
4.
Private Sub Кнопка_Click()
DoCmd.TransferDatabase acLink, "ODBC", "ODBC;DRIVER=MySQL ODBC 5.3 ANSI Driver;" _
& " SERVER=XX.XX.XXX.XXX; User=XXXX;Password=XXXX;DATABASE=XX_XXXX", acTable, "как_называется_таблица_на_сервере", "как_она_будет_называться_у_меня"
End Sub



Все отлично работает, вопрос на 90% отпал, но может быть кто нибудь подскажет, где в настройках линкуемой таблицы ручками можно прописать источник данных ,минуя VBA?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.02.2016, 21:47
    #39170881
Сергей Лалов
Сергей Лалов
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
неименованный экземпляр драйвера ODBC (MySql ODBC)
Ребят, а как можно проверить программно состояние соединения Connection, через код VBA? После первого подключения и ввода MySQL евского логина и пароля все остальные таблицы по умолчанию хранят настройки подключения и все отлично работает.

А как проверить наличие данного соединения? Чтобы было True или False к примеру?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.02.2016, 22:28
    #39170899
а так?
а так?
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
неименованный экземпляр драйвера ODBC (MySql ODBC)
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
Public Function testcon() As Boolean
    Dim s$
    On Error GoTo 1
    s = "Driver={MySQL ODBC 5.1 Driver};" & _
         "Server=ХХ.ХХХ.ХХХ.Х;Port=3306;" & _
         "Database=ХХХХХХХ;" & _
         "User=ХХХХХ;" & _
         "Password=ХХХХХХХ;Option=3;"
    With New ADODB.Connection
        .ConnectionString = s
        .Open
    End With
    testcon = True
    Exit Function
1:  Debug.Print Err.Description
    Err.Clear
End Function
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2016, 13:28
    #39171285
Сергей Лалов
Сергей Лалов
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
неименованный экземпляр драйвера ODBC (MySql ODBC)
а так?
Код: vbnet
1.
2.
3.
4.
5.
6.
Public Function testcon()
 .....

         "User=ХХХХХ
         "Password=ХХХХХХХ
........



Этот пример понятен. Я его тестировал. Но есть один любопытный момент. После того как я один раз задействовал ввод логина и пароля MySQL ODBC driver при входе в проект аксесс, он на все время открытого проекта MS Access сохраняет настройки текущего соединения . Один раз ввожу логин и пароль в формочку как указано на картинке, и после этого для всех присоединенных таблиц ничего подобного вводить не надо. Где-то хранятся настройки текущего соединения.
 


И мне именно н ужно проверить текущее соединение проекта, без ввода логина и пароля. Просто наличие текущего соединения с MySQL ODBC driver ом

Можете подсказать, как это сделать?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2016, 14:54
    #39171379
Шыфл
Шыфл
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
неименованный экземпляр драйвера ODBC (MySql ODBC)
Сергей Лалов,
посмотри
Код: vbnet
1.
2.
3.
4.
application.CurrentProject.Connection.State 
application.CurrentProject.Connection.ConnectionString
application.CurrentProject.AccessConnection.State
application.CurrentProject.AccessConnection.ConnectionString


Может там хранится?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2016, 15:02
    #39171389
Шыфл
Шыфл
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
неименованный экземпляр драйвера ODBC (MySql ODBC)
Ну а вообще-то это тут
Код: vbnet
1.
currentdb().TableDefs("Моя_прилинкованная_таблица").Connect
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2016, 15:08
    #39171406
Сергей Лалов
Сергей Лалов
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
неименованный экземпляр драйвера ODBC (MySql ODBC)
ШыфлНу а вообще-то это тут
Код: vbnet
1.
currentdb().TableDefs("Моя_прилинкованная_таблица").Connect



Ну это как частность более. Соединение это объект/свойство, который можно проверить без привязки к конкретной таблице.
Попробую четыре варианта предложенные чуть выше. State пробовал вчера, дебаггер ругаиццо, попробую остальное сегодня.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2016, 15:30
    #39171439
Шыфл
Шыфл
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
неименованный экземпляр драйвера ODBC (MySql ODBC)
Сергей ЛаловСоединение это объект/свойство, который можно проверить без привязки к конкретной таблице.

То, что каждая таблица может быть прилинкована к другому серверу вас, как бэ, не смущает, я так понимаю...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2016, 15:43
    #39171453
Сергей Лалов
Сергей Лалов
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
неименованный экземпляр драйвера ODBC (MySql ODBC)
[quot Шыфл]Сергей ЛаловТо, что каждая таблица может быть прилинкована к другому серверу вас, как бэ, не смущает, я так понимаю...

Как бы нет, у меня одно активное соединение, по архитектуре проекта
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2016, 15:46
    #39171456
Сергей Лалов
Сергей Лалов
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
неименованный экземпляр драйвера ODBC (MySql ODBC)
ШыфлСергей Лалов,
посмотри
Код: vbnet
1.
2.
3.
4.
application.CurrentProject.Connection.State 
application.CurrentProject.Connection.ConnectionString
application.CurrentProject.AccessConnection.State
application.CurrentProject.AccessConnection.ConnectionString


Может там хранится?

Спасибо, сегодня гляну )
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / неименованный экземпляр драйвера ODBC (MySql ODBC) / 11 сообщений из 11, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 160ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1613916]:
 0ms
get settings:
 11ms
get forum list:
 15ms
check forum access:
 5ms
check topic access:
 5ms
track hit:
 38ms
get topic data:
 14ms
get forum data:
 3ms
get page messages:
 54ms
get tp. blocked users:
 1ms
others: 14ms
total:  160ms
x
x
Закрыть


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