- У меня есть приложение VB6.0, работающее в Wine 5.0 на Ubuntu 18.04 LTS
- У меня есть SQL База данных сервера на удаленном Linux сервере (также Ubuntu 18.04 LTS)
- Я проверил подключение к базе данных в Wine с помощью ODB C Manager
- Я проверил подключение к базе данных в Linux с использованием Azure Data Studio
- VB приложение ссылается на библиотеку Microsoft ActiveX Data Object 2.8
Я создаю объект ADODB.Connection (проверено раннее и позднее связывание) и объект ADODB.Recordset.
With rec1
.ActiveConnection = gConn1
.CursorType = adOpenDynamic
.LockType = 1
.Source = "Select * from [tblUsers] WHERE Username='" & XXXXX & "'"
.Open
End With
Я получаю сообщение об ошибке автоматизации, ошибка 430, класс «Ошибка выполнения 430» не поддерживает автоматизацию или не поддерживает ожидаемый интерфейс.
Пожалуйста, помогите, это последнее препятствие в очень длинный проект.