| Вопрос: Mysql | Добавлено: 12.03.07 00:54 |
Автор вопроса:  Artem | Web-сайт: elite-net.am | ICQ: 248-187-918 |
|
Здравствуйте!
кто нибуть может дать реально работающий пример соеденения VB и mysql? чтоб и читал и записывал в базу mysql! |
| Ответы | Всего ответов: 5 |
|
Номер ответа: 1 Автор ответа:  astoro ICQ: 649109 Вопросов: 31 Ответов: 391 |
Профиль | | #1 | Добавлено: 12.03.07 05:34 |
|
Через DAO на VB 6.0
ConnHost = "192.168.0.1" ConnPort = "3006" ConnDataBase = "  ataBase"
ConnUser = " BUser"
ConnPass = " BPass"
strConn = "odbc RIVER={MySQL ODBC 3.51 Driver};" _
& "SERVER=" & ConnHost & "; " _ & "PORT=" & ConnPort & "; " _ & " ATABASE=" & ConnDataBase & "; _
& "USER=" + CStr(ConnUser) + "; " _ & "PASSWORD=" + CStr(ConnPass) + "; " _ & "OPTION=3" Set DB = DAO.OpenDatabase(ConnDataBase, dbDriverNoPrompt, False, strConn) 'Это для делитов, инсертов и проч. например " ROP TABLE YourTable"
DB.Execute ("!!HERE COMES YOUR SQL CODE!!" 
'Это для чтения DB.OpenRecord Set rs = DB.OpenRecordset("Select * From YourTable Order By YourField"
If rs.RecordCount > 0 Then rs.MoveFirst Do While Not rs.EOF Text1 = Text1 & rs!YourField & vbCrLf Loop End If Переменные соответствующих типов обяъвить наверное труда не составит. |
||
|
Номер ответа: 2 Автор ответа: astoroICQ: 649109 Вопросов: 31 Ответов: 391 |
Профиль | | #2 | Добавлено: 12.03.07 05:36 |
|
наверное лучше будет значение переменной ConnPass
присвоить как-нибудь сложнее чтобы в скомпилированном коде пароль открыто не лежал. к сожалению насколько я знаю в строке подключения нельзя передавать хеш, хотя может гуру меня поправят... |
||
|
Номер ответа: 3 Автор ответа: Artem ICQ: 248-187-918 Вопросов: 1 Ответов: 2 |
Web-сайт: Профиль | | #3 | Добавлено: 12.03.07 09:38 |
| пока не проверил! но все равно спасибо за быстрое реагирование | ||
|
Номер ответа: 4 Автор ответа: ArtemICQ: 248-187-918 Вопросов: 1 Ответов: 2 |
Web-сайт: Профиль | | #4 | Добавлено: 12.03.07 14:18 |
|
У меня не выходит!
если не трудно дайте написанный пример в архиве! чтоб выводил из базы в text1.text и ччтоб из text2.text записывал в базу |
||
|
Номер ответа: 5 Автор ответа: astoroICQ: 649109 Вопросов: 31 Ответов: 391 |
Профиль | | #5 | Добавлено: 12.03.07 14:57 |
|
под рукой нет вб 6
выложи код посмотрим что не выходит |
||
Страница: 1 |