Запустить мою прогу про dbf на любой другой машине - никак..

[Kundor]

Есть такая проблема. Написал наконец прогу на VB6. Всё у меня работает. Собрал дистрибутив (туда ессно вошел mdac, в проекте описан как ms ado 2.0, впрочем пробовал подставить разные ado). ставлю на виртуальной машине (VMWare с XP) у себя же, что б проверить. После установки - проверяю - не работает. Дошел до того, что поставил туда VB6, перетащил проект, по шагам проверяю - действительно. Процесс идёт так:
1) подключаю базу
Global Conn As ADODB.Connection
Global RST As New ADODB.Recordset

Set Conn = New ADODB.Connection
Conn.Provider = "Microsoft.Jet.OLEDB.4.0"
ConnectionString = "Data Source=" + Path & "base\" & " ;Extended Properties=DBASE IV"
Conn.Open (ConnectionString)
With RST
Set .ActiveConnection = Conn
.Properties("IRowsetIdentity") = True
.CursorLocation = adUseServer
.CursorType = adOpenKeyset
.LockType = adLockOptimistic
End With

2) запрос данных
ComText = "Select * from LS where ls_num=" & LIC
RST.Open ComText
в этом месте басик говорит:
"внешняя таблица не имеет предполагаемый формат".
Что за фигня? Как победить? На моей машине всё работает...

[alibek]

Странный у тебя ConnectionString. Смотри тут: www.connectionstrings.com

[VVitafresh]

2) запрос данных
ComText = "Select * from LS where ls_num=" & LIC
RST.Open ComText
в этом месте басик говорит:
"внешняя таблица не имеет предполагаемый формат".
Что за фигня? Как победить? На моей машине всё работает...

Попробуй в этом месте написать:

Код: Выделить всё

ComText = "SELECT * FROM LS WHERE LS_NUM=" & LIC

[Kundor]

строку здесь же на форуме где-то и подобрал,
сейчас попробовал - вписал так:
ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Path1 & ";Extended Properties=dBASE IV;User ID=Admin;Password="

ничего не изменилось. ошибка та же..

[Kundor]

VVitafresh - я правильно понял - просто в запросе всё написать большими буквами??? не понял, но попробовал - результат тот же...

[VVitafresh]

Да, ты правильно меня понял. Есть при работе с DBF такая фича, что запросы набранные НЕ заглавными буквами не всегда работают корректно.
Попробуй еще такую строку подключения:

Код: Выделить всё

cn.Open "Driver={Microsoft dBASE Driver (*.dbf)};DriverID=277;Dbq=" & DbfFolder & ";"

[Kundor]

на это подкулючение он ругается - "не возможно найти устанавливаемый ISAM". странно всё это. Посмотрел в ODBC - этот драйвер прописан.

[Kundor]

не, ну это пипец какой-то. многочисленными экспериментами дошел до такого:
один каталог, на который ссылается Connection. Один Recordset.
две (!) разные базы - cv.dbf и ls.dbf.
пишу
ComTextBankDB = "Select * from cv"
BankDBRST.Open ComTextBankDB
работает
пишу
ComTextBankDB = "Select * from ls"
BankDBRST.Open ComTextBankDB
не работает: "внешняя таблица не имеет предполагаемый формат".
мож я как-то туплю по чёрному - кто-нибудь с таким сталкивался???

[Алексей К.]

ставлю на виртуальной машине (VMWare с XP) у себя же, что б проверить

А ты попробуй на не виртуальной, а на другом компе - мало ли причина траблы в VMWare

[Kundor]

у меня ощещение, что на той машине, где писал прогу - стоит что-то что не переносится простым mdac. мож какие особые ISAM драйвера...
есть какой-нибудь способ определить - через какие библиотеки прогар обращается к базе?

[VVitafresh]

На Win98 надо еще JET 4.0 ставить.

[Kundor]

не, это не 98, я ж писал в начале: VMWare с XP
причём пропатченная XP на сегодняшний день по полной - с Windows Update.
кстати - закачал отдельно этот Jet 4.0 - думал - мож отдельно надо поставить - фиг. он говорит что не надо - "уже установлен".

[VVitafresh]

Если пишет:

внешняя таблица не имеет предполагаемый формат

может быть это так и есть? Может DBF запорчен/имеет неправильный формат?

[Konst_One]

а может это и не dbf вовсе
в этот формат могут многие базы писать и у каждого свой провайдер обычно для доступа к данным

[Алексей К.]

Может DBF запорчен/имеет неправильный формат?

так автор говорит что:

Всё у меня работает

Попробуй их (cv.dbf и ls.dbf) линкануть в Access`е и посмотреть их - получиться или нет?

[Kundor]

смешно, блин
я убъюсь щас веником...
не, это - dbf - и ведь самое худшее - что на моей машине он нормально читается! а сами dbf- - не мои, они как справочники предоставляются сторонней конторой...

[Kundor]

ну вот - эпупея закончилась. файлы - в секретные материалы, потому как понять почему делается всё именно через такую жопу - непонятно.
проблема решается просто и странно: на машину ставится BDE. И всё! - работает.

[Konst_One]

так все-таки это были не родные dbf