Элемент Data и dbf

Работа VB и СУБД (Access, MSSQL, MySQL, Oracle и пр.)
Правила форума
При создании новой темы не забывайте указывать используемую СУБД.
ShcVl
Начинающий
Начинающий
 
Сообщения: 17
Зарегистрирован: 04.06.2003 (Ср) 1:54

Элемент Data и dbf

Сообщение ShcVl » 04.06.2003 (Ср) 2:33

Помогите плиз! :cry:
На форме находятся элементы - 2 txt, 1 MS FlexGrid, 1 Data и 1cmd,
код такой :

Private Sub Query()
Screen.MousePointer = vbHourglass
Data1.RecordSource = "SELECT IND, BKO, BNT, BSM, KGOR, DLIT, VREM, `MIN`, BNTV,`DATE` " & _
"FROM ZONA239" & _
"HAVING DATE BETWEEN #" & _
txtFrom.Text & "# AND #" & txtTo.Text & "#"
Data1.Refresh
Screen.MousePointer = vbNormal

End Sub

ZONA239 - база данных формата dbf

пишет: имя (весь запрос) не найден ядром базы данных и тд

error 3125
Данные базы при запуске отображаются в MS FlexGrid, а когда выполняешь запрос выдает ошибку

PS. Или подскажите как программно импортировать базу DBASE в формат mdb

заранее благодарен

Alex404
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 109
Зарегистрирован: 22.09.2002 (Вс) 10:58

Сообщение Alex404 » 04.06.2003 (Ср) 7:31

Слушай ка! А Query - не зарезервированное ли слово в vb ?
Попробуй Sub переименовать

ShcVl
Начинающий
Начинающий
 
Сообщения: 17
Зарегистрирован: 04.06.2003 (Ср) 1:54

Сообщение ShcVl » 04.06.2003 (Ср) 8:55

Alex404 писал(а):Слушай ка! А Query - не зарезервированное ли слово в vb ?
Попробуй Sub переименовать


не тут дело не в этом, но все равно спасибо

я тут попробовал подключить аксесовскую , а он мне выдает неизвестный формат базы данных

может дело в Data или во FlexGrid :(
в общем незнаю :(

Alex404
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 109
Зарегистрирован: 22.09.2002 (Вс) 10:58

Сообщение Alex404 » 04.06.2003 (Ср) 11:07

Если интерсно - посмотри как ACCESS - базу подключить с использованием ADO-контролов

SQLstr="SELECT ....... "

1.Меняй свой Data1 на ADODC1
2.Цепляй к нему базу

With Form1.Adodc1
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=База.mdb" & _
";Mode=ReadWrite;Persist Security Info=False;"
.CursorLocation = adUseClient
.CursorType = adOpenStatic
.CommandType = adCmdText
.RecordSource = SQLstr
.Refresh
End With
Выделенное жирным - для формата ACCESS 2000 (для dbf посмотришь в Help)

Связывай ADODC и FLexGrid (или DataGrid, или MSHFlexGrid....)

With Form1.MSFlexGrid1
Set .DataSource = ADODC1
.Refresh
End With

Все.

ShcVl
Начинающий
Начинающий
 
Сообщения: 17
Зарегистрирован: 04.06.2003 (Ср) 1:54

Сообщение ShcVl » 04.06.2003 (Ср) 11:23

Alex404 писал(а):Если интерсно - посмотри как ACCESS - базу подключить с использованием ADO-контролов

SQLstr="SELECT ....... "

1.Меняй свой Data1 на ADODC1
2.Цепляй к нему базу



Насчет ошибки формата разобрался(если можно так сказать) - нашел старый аксесовский файл 97 подключил - работает(выводит данные), а запрос падла невыполняет :(
и на ADODC1 я менял, тоже самое пишет :x
может код неправильно написал - ничего непонимаю :(

кстати в справке смотрел в 2000 ничего про dbf ненашел(видимо плохо смотрел :),сегодня дома посмотрю )


Вернуться в Базы данных

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 21

    TopList