Помогите с проблемой

[ChelDm]

Я использую базу Access, таблицы выводятся в Grid, на компьютер где установлен Vb все работает нормально, но где нет VB данные в grid неотображаются. Скажите может не все DLL беру, но приложение работает, пути к базе прописаны верно. Проверить есть ли доступ к данным через Data пока не было.

[Rainbow]

маловато данных для того, чтобы понять, что происходит...

Какая система стоит на компе, который без VB?
Что ты использовал для подключения к базе? Data-контрол (то есть он сам подключается)? А библионтека тогда, значит DAO... Так?

Все-таки проверь, что коннекция прошла и данные вытащились из базы... (посчитай записи в рекордсете, повставляй мессаджбоксы )

Может, у тебя какой обработчик ошибки стоит, который ошибку подключения ловит и глотает, а форма спокойно с пустым гридом загружается...

[gaidar]

Посмею добавить. Вставь простой MsgBox сразу после соединения и выведи какие-нибудь параметры. Либо, что всегда полезно - выводи в файл ответы всех подобных команд со всеми параметрами и временем. Проще будет потом найти ошибку, спокойно почитав логи.

[ChelDm]

Вставил MsgBox, по видимому не происходит коннекция, база не открывается. В системе, где есть VB все в норме, а вот без VB не открывается база данных.
Открываю:

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

Data1.databaseName="e:\tema.mdb"

Пробывал и так:

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

            Set db = OpenDatabase("e:\Tema.mdb")
         Set rs1 = db.OpenRecordset("Select * from Тест")



[ChelDm]

Похоже дело в Data1, так как если

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

Set db = OpenDatabase("e:\tema.mdb")
          Set rs = db.OpenRecordset("Select * from Тест")
          Text1.Text = rs.Fields(1).Value


все работает и в XP и ME
То

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

data1.database="e:\tema.mdb"

В XP работает, так есть VB, в ME нет - там нет VB
И еще кто-нибудь знает сделать, чтобы Dbgrid отображал данные без использования Data. Dbgrid1.datasource=Data1.
Код
Set db = OpenDatabase("e:\tema.mdb")
Set rs = db.OpenRecordset("Select * from Тест")

Set dbgrid1.datasource=rs - не работает

[ASD]

Используй ADO меньше проблемм огребешь.
Dim db as new ADODB.Connection
Dim rs as new ADODB.Recordset

db.open "Microsoft Access Driver (*.mdb);DBQ=C:\data.mdb"
set rs=db.Execute("Select * from table")

Все. Остальное сам домыслишь.

[snov]

Я использую базу Access, таблицы выводятся в Grid, на компьютер где установлен Vb все работает нормально, но где нет VB данные в grid неотображаются. Скажите может не все DLL беру, но приложение работает, пути к базе прописаны верно. Проверить есть ли доступ к данным через Data пока не было.

Дык ты проверь может правда не все компоненты заюзал на др. компе.
И вообще как ты ставил на др. комп? Инсталятор? какой? Сканил ли он проект или ты сам все файлики копировал и регал? Есть такой инстралер Setup Factory - он сканит проект на наличие в нем компонентов (ocx&dll + suport VB5/VB6) попробуй его. У меня с ним проблем вообще не было