SQL Сервер + Linux + VB6 + Wine + Adodb.Recordset + Ошибка 430 - PullRequest
1 голос
/ 27 апреля 2020
  • У меня есть приложение 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» не поддерживает автоматизацию или не поддерживает ожидаемый интерфейс.

Пожалуйста, помогите, это последнее препятствие в очень длинный проект.

...