Пакет для работы с MySQL.

Народ, скачал я phpMyAdmin-2.2.0, но не знаю, что с ним дальше делать.
Наверное, нужен сам PHP? Если да, то где и какую версию надо взять?

И еще вопрос:
Устанавливаю в VB свяэь с базой данных, которая называется mysql(системная которая) с помощью ADO через ODBC - все в порядке. А когда в процедуре соединения просто меняю эту базу на созданную мной, то VB ругается, когда я пытаюсь создать рекордсет. В чем дело? Что за ерунда?

Заранее спасибо!!!

0

>Наверное, нужен сам PHP?
Обязательно
>Если да, то где и какую версию надо взять?
Расширение у файлов видал ? Правильно php3, значит для тройки или выше.
>Устанавливаю в VB свяэь с базой данных, которая называется mysql
>(системная которая) с помощью ADO через ODBC - все в порядке.
>А когда в процедуре соединения просто меняю эту базу на созданную
>мной, то VB ругается, когда я пытаюсь создать рекордсет.
>В чем дело? Что за ерунда?
Поподробнее и скодом
>Заранее спасибо!!!
Не за что :-)

0

Спасибо что откликнулись, zans.
Ниже приведен код функции, где я пытаюсь(экспериментирую) установить связь с БД и открыть рекордсет.

Function connectMbase() As Boolean
On Error GoTo NoConnection
Set Conn = New Connection
Set rs = New Recordset
Conn.ConnectionString = 'driver={MySql};database=Mbase'
Conn.CursorLocation = adUseNone
Conn.Open
rs.Source = 'select * from type_Client'
Set rs.ActiveConnection = Conn
'rs.CursorLocation = adUseClient
rs.Open
MsgBox rs.State
Set MainForm.MSHFlexGrid1.DataSource = rs
connectMbase = True
On Error GoTo 0
Exit Function
NoConnection:
MsgBox 'Can't establish connect whith database: ' & Err.Description
connectMbase = False
On Error GoTo 0
End Function

Пояснение: если соединяюсь с БД mysql, то все в порядка, а если с Mbase, как в этом случае, то происходит ошибка в строке
Set MainForm.MSHFlexGrid1.DataSource = rs
Err.Description этой ошибки = Automation error.
Сам рекордсет открывается (rs.State=1)
Базу данных я создал, набив набор SQL команд в текстовый файл, с последующей передачей его в консоль самой СУБД MySql командой source.
Из консоли СУБД MySql такой же sql запрос, как и в строке:
rs.Source = 'select * from type_Client'
работает нормально.

Буду очень счастлив, если мне помогут разобраться с этим...

0

Спасибо что откликнулись, zans.
Ниже приведен код функции, где я пытаюсь(экспериментирую) установить связь с БД и открыть рекордсет.

Function connectMbase() As Boolean
On Error GoTo NoConnection
Set Conn = New Connection
Set rs = New Recordset
Conn.ConnectionString = 'driver={MySql};database=Mbase'
Conn.CursorLocation = adUseNone
Conn.Open
rs.Source = 'select * from type_Client'
Set rs.ActiveConnection = Conn
'rs.CursorLocation = adUseClient
rs.Open
MsgBox rs.State
Set MainForm.MSHFlexGrid1.DataSource = rs
connectMbase = True
On Error GoTo 0
Exit Function
NoConnection:
MsgBox 'Can't establish connect whith database: ' & Err.Description
connectMbase = False
On Error GoTo 0
End Function

Пояснение: если соединяюсь с БД mysql, то все в порядка, а если с Mbase, как в этом случае, то происходит ошибка в строке
Set MainForm.MSHFlexGrid1.DataSource = rs
Err.Description этой ошибки = Automation error.
Сам рекордсет открывается (rs.State=1)
Базу данных я создал, набив набор SQL команд в текстовый файл, с последующей передачей его в консоль самой СУБД MySql командой source.
Из консоли СУБД MySql такой же sql запрос, как и в строке:
rs.Source = 'select * from type_Client'
работает нормально.

Буду очень счастлив, если мне помогут разобраться с этим...

0