Модераторы: mihanik
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> вопрос по ADO, как подключить базу DBF 
V
    Опции темы
dondoctor
Дата 27.4.2007, 12:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 27.4.2007

Репутация: нет
Всего: нет



Справочники приводят класс ADODB.Connection. Чтобы подключиться к базе надо заполнить свойство Provider. Для mdb (Access) всё ясно, все работает. А как подключить (датабэйсовские) фокспрошные DBF? Помогите, люди добрые)))

Это сообщение отредактировал(а) dondoctor - 27.4.2007, 14:40
PM MAIL   Вверх
ТоляМБА
Дата 27.4.2007, 12:57 (ссылка) |    (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Котэ
***


Профиль
Группа: Завсегдатай
Сообщений: 1607
Регистрация: 15.12.2004

Репутация: нет
Всего: 252



Код

Private Sub TestDBF()
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim cs As String
Dim qs As String
cs = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\asu;Extended Properties=dBASE IV;User ID=Admin;Password=;"
cn.ConnectionString = cs
cn.Open
qs = "Select Field1 from Table1"
Set rs = cn.Execute(qs)
'rs.Fields.Item(0) - Первое поле с данными
rs.Close
Set rs = Nothing
cn.Close
Set cn = Nothing
End sub

PM   Вверх
dondoctor
Дата 27.4.2007, 13:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 27.4.2007

Репутация: нет
Всего: нет



попробовал. не получилось. вопрос - где указать имя файла? может я не там его создал, не там указал? напиши плиз строку с конкретным путём м именем файла
PM MAIL   Вверх
ТоляМБА
Дата 27.4.2007, 13:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Котэ
***


Профиль
Группа: Завсегдатай
Сообщений: 1607
Регистрация: 15.12.2004

Репутация: нет
Всего: 252



В 6-й строке в моём посте ты указываешь каталог (только каталог!) с дэбээфками:
Цитата(ТоляМБА @  27.4.2007,  12:57 Найти цитируемый пост)
... Data Source=c:\asu;...


А имя dbf файла ты указываешь в запросе в 9-й строке
Цитата(ТоляМБА @  27.4.2007,  12:57 Найти цитируемый пост)
qs = "Select Field1 from Table1"


То есть в конкретном моём примере данные для запроса берутся из файла C:\ASU\TABLE1.DBF

Это сообщение отредактировал(а) ТоляМБА - 27.4.2007, 13:27
PM   Вверх
dondoctor
Дата 27.4.2007, 14:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 27.4.2007

Репутация: нет
Всего: нет



СПАСИБО!!! всё получилось!
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Программирование, связанное с MS Office"
mihanik staruha

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами



  • Несанкционированная реклама на форуме запрещена
  • Пожалуйста, давайте своим темам осмысленный, информативный заголовок. Вопль "Помогите!" таковым не является.
  • Чем полнее и яснее Вы изложите проблему, тем быстрее мы её решим.
  • Оставляйте свои записи в "Книге отзывов о работе администрации"
  • А вот тут лежит FAQ нашего подраздела


Если Вам понравилась атмосфера форума, заходите к нам чаще!
С уважением mihanik и staruha.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Программирование, связанное с MS Office | Следующая тема »


 




[ Время генерации скрипта: 0.0439 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.