| Вопрос: Хто работал с MySQL 5 из Visual Basic - HELP!!! | Добавлено: 04.06.07 13:10 |
Автор вопроса:  fuzytsfcrew | Web-сайт: video-edit.com.ua | ICQ: 314339 |
|
C простыми БД наконец хоть чуть-чуть разобрался. Теперь нужно переходить от простого к сложному. Скачал и установил MySQL 5. Стартанул сервер. Скачал ODBC драйвер, но не могу этот драйвер засунуть в Visual Basic. Как это сделать? Есть какая-то инструкция пошаговая или что-то вроде того? При выполнении программ-примеров для работы с БД MySQL система выдает ошибку 453:
Can't find DLL entry point mysql_connect in libmysql.dll Посоветуйте, что делать? А вот пример с http://www.vb.kiev.ua/code/db/VB-MySql_I15970865.zip пишет такую гадость - [Microsoft][Диспечер драйверов ODBC] Источник данных не найден и не указан драйвер, используемый по умолчанию. Please check the datasouurce name in the ODBC (data source) panel. Где искать эту гребаную панель? Куда и какой драйвер указывать? Нифига не понятно. В контролах все облазил, там даже ничего похожего на название MySQL нету. :( HELP люди добрые. Мнеб только к MySQL серваку подрубится на локальной тачке, а дальше я разберусь... |
| Ответы | Всего ответов: 16 |
|
Номер ответа: 1 Автор ответа:  EUGY Вопросов: 0 Ответов: 454 |
Профиль | | #1 | Добавлено: 04.06.07 14:21 |
|
ODBC точно-ли установлен.
Проверь: панель управления> администрирование> источники данных> драйверы. если нет - сам понимаешь - не скачал, или не установил. если - да - то подключение не сложнее чем к access, например, положи на форму ADO control и в свойствах выставь ConnectionString, используя нужный драйвер. |
||
|
Номер ответа: 2 Автор ответа: Arseny ICQ: 298826769 Вопросов: 53 Ответов: 1732 |
Профиль | | #2 | Добавлено: 04.06.07 15:38 |
2EUGY: я тоже из интереса пробовал как-то, подключился с полтыка, но все буквы кракозяблами отображались. Хотя кодировка была выставлена 1251... 
|
||
|
Номер ответа: 3 Автор ответа: EUGYВопросов: 0 Ответов: 454 |
Профиль | | #3 | Добавлено: 04.06.07 16:21 |
Вот, вам бы все на драйвер валить, а ведь драйверу обидно. 
|
||
|
Номер ответа: 4 Автор ответа:  fuzytsfcrewICQ: 314339 Вопросов: 30 Ответов: 102 |
Web-сайт: Профиль | | #4 | Добавлено: 04.06.07 16:35 |
|
Вроде бы с драйвером все в порядке..
Может я что-то не выставил в настройках, глянте - http://www.fuzy-prog.narod.ru/vb/ODBC.jpg |
||
|
Номер ответа: 5 Автор ответа: EUGYВопросов: 0 Ответов: 454 |
Профиль | | #5 | Добавлено: 04.06.07 16:54 |
|
Ты выбрал не то.
Должно быть - MySQL ODBC 3.51 Driver, а не MySQL, это разные вещи. |
||
|
Номер ответа: 6 Автор ответа: fuzytsfcrewICQ: 314339 Вопросов: 30 Ответов: 102 |
Web-сайт: Профиль | | #6 | Добавлено: 04.06.07 17:15 |
|
Поставил вместо MySQL - MySQL ODBC 3.51 Driver.
http://www.fuzy-prog.narod.ru/vb/ODBC2.jpg ничего не произошло...
пример (http://www.fuzy-prog.narod.ru/vb/mysql.rar) как не запускался до этого, так и не запускается...
|
||
|
Номер ответа: 7 Автор ответа: EUGYВопросов: 0 Ответов: 454 |
Профиль | | #7 | Добавлено: 04.06.07 17:47 |
|
Ты выбрал чужой, очень громоздкий пример, который использует API libmysql и не использует ODBC, этого я не учитывал, когда отвечал.
Может сам сервер не запущен(посмотри в процессах), или библа libmysql.dll лежит не в системных директориях. Попробуй, все-таки, через ADO и ODBC. |
||
|
Номер ответа: 8 Автор ответа: fuzytsfcrewICQ: 314339 Вопросов: 30 Ответов: 102 |
Web-сайт: Профиль | | #8 | Добавлено: 04.06.07 21:42 |
|
Как через ADO и ODBC? Мне нужно БД MySQL...
Самый банальный вопрос - у кого есть простяцкий пример подключения БД MySQL в Visual Basic 6.0...??? Ну помогите же, монстры прогрмирования... Плиззз... Я уже книг целую кучу пересмотрел, но конкретно БД MySQL + VB6 нигде не нашел. Все примеры, что я скачивал с www.vb.kiev.ua и т.д. не запускаются... Есть на форуме люди добрые???
|
||
|
Номер ответа: 9 Автор ответа: EUGYВопросов: 0 Ответов: 454 |
Профиль | | #9 | Добавлено: 04.06.07 22:43 |
|
O? my god!
Dim conn As New ADODB.Connection Dim rec As ADODB.Recordset conn.ConnectionString = "  river={MySql ODBC 3.51 Driver}; Server=ServerName; Option=16834;Port=3306;Stmt=ataBase=DataBaseName;Uid=UserName;Pwd=Secret;"
conn.Open Set rec = conn.Execute("SELECT * FROM [TABLE]" 
|
||
|
Номер ответа: 10 Автор ответа: fuzytsfcrewICQ: 314339 Вопросов: 30 Ответов: 102 |
Web-сайт: Профиль | | #10 | Добавлено: 05.06.07 09:20 |
|
А по подробнее можно... А то, вы же сами понимаете, ... -> http://www.fuzy-prog.narod.ru/vb/err_comp.jpg - с пол пинка не понимаем.
Если Вас не затруднит, напишите: 1. Состав формы (какие элем. упр. на ней и их имена)? 2. Какие настройки в панели упр. для ODBC? 3. Какие настройки в Visual Basic для ODBC? 4. Куда какой код писать? За ранее большое спасибо! Обязуюсь больше с такими глупыми и простыми вопросами не приставать.
|
||
|
Номер ответа: 11 Автор ответа: ArsenyICQ: 298826769 Вопросов: 53 Ответов: 1732 |
Профиль | | #11 | Добавлено: 05.06.07 12:32 |
| А ты вообще через ADO с базами данных работал? Хотя бы с MS Access? Все тоже самое, другая только строка подключения к БД. Если не работал, то хотя бы на примере *.MDB освой основы, только потом уж ставь MySQL | ||
|
Номер ответа: 12 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #12 | Добавлено: 06.06.07 02:32 |
|
fuzytsfcrew, так а шо ж скопипестил и усё.. ADO нужно ж наверное вначале подключить?
В вб, иди по менюхе Project->References и там в списке н найди "Microsoft ADO шо-то-там_дальше_непомню"... |
||
|
Номер ответа: 13 Автор ответа:  fuzytsfcrewICQ: 314339 Вопросов: 30 Ответов: 102 |
Web-сайт: Профиль | | #13 | Добавлено: 06.06.07 09:41 |
|
O? my god!
Dim conn As New ADODB.Connection
Dim rec As ADODB.Recordset conn.ConnectionString = " river={MySql ODBC 3.51 Driver}; Server=ServerName; Option=16834;Port=3306;Stmt=ataBase=DataBaseName;Uid=UserName;Pwd=Secret;"
conn.Open Set rec = conn.Execute("SELECT * FROM [TABLE]" Я не знаю на каком это вы языке мне написали... Я работаю на VB6 и в нем все это не проканывает... тем не менее я разобрался... Option Explicit
Private Sub cmdConnectMySQL_Click() Dim cnMySql As New rdoConnection Dim rdoQry As New rdoQuery Dim rdoRS As rdoResultset cnMySql.CursorDriver = rdUseOdbc cnMySql.Connect = "uid=;pwd=;server=localhost;" & _ "driver={MySQL ODBC 3.51 Driver};database=mysql;dsn='Название вашего Data Source name';" cnMySql.EstablishConnection '... ... '... ... '... ... rdoRS.Close cnMySql.Close все прекрасно заработало, только как-то пугающе
Сервер запущен на локальной машине, на ней же производится и запуск программы. Во первых - во время запуска программы винт начинает постоянно шуршать как-то ненормально и без остановки. Время его "шуршания" мне, почему-то, кажется большим - 4-5 сек. Это нормально? |
||
|
Номер ответа: 14 Автор ответа: hclubmk Вопросов: 0 Ответов: 1 |
Профиль | | #14 | Добавлено: 06.05.09 14:43 |
| Если есть DSN, зачем всё остальное? - в DSN всё уже есть. | ||
|
Номер ответа: 15 Автор ответа: ArsenyICQ: 298826769 Вопросов: 53 Ответов: 1732 |
Профиль | | #15 | Добавлено: 07.05.09 08:37 |
| хы... не прошло и два года... | ||