Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> отобразить даные из dbf, использую xbase  
V
    Опции темы
izver84
Дата 30.10.2009, 18:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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



такой вопрос 
есть dbf  файл находящиеся на сетевом диске (s:/molds/copy/dats.dbf).
мне надо отобразить данные файла
прога
Код

use DBD::Xbase;
my $xbase_dbh = DBI->connect("DBI:XBase:.", undef, undef, {RaiseError =>1});
my $sel = "select dats from s:/molds/copy/dats.dbf";
my $sel_csr = $xbase_dbh->prepare($sel);
$sel_csr->execute();
while (my ($dt) = $sel_csr->fetchrow_array()) {
    print " $dt\n";
}



выдает ошибку
Код

DBD::XBase::st execute failed: Table s:/molds/copy/dats.dbf not found: Error opening file ./s:/molds/copy/dats.dbf: Invalid argument
DBD::XBase::st execute failed: Table s:/molds/copy/dats.dbf not found: Error opening file ./s:/molds/copy/dats.dbf: Invalid argument


копирую файл в папку с прогой
меняю
Код

my $sel = "select dats from s:/molds/copy/dats.dbf";

на
Код

#my $sel = "select dats from dats.dbf";

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

использую xbase т.к. прога будет работать как по виндой так и под линуксом.
плюс в дальнейшем буду использовать  файлы больше 1 мб.



--------------------
Если новая программа с первого раза компилируется без ошибок, значит, она написана принципиально неправильно. 
PM MAIL   Вверх
shamber
Дата 1.11.2009, 19:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


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

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



izver84, а при подключении каталог базы указывать?
Код

use DBD::Xbase;
my $dir = "s://molds//copy";
my $xbase_dbh = DBI->connect("DBI:XBase:$dir", undef, undef, {RaiseError =>1});
my $sel = "select dats from dats.dbf";
my $sel_csr = $xbase_dbh->prepare($sel);




Это сообщение отредактировал(а) shamber - 1.11.2009, 19:29
PM MAIL Jabber   Вверх
izver84
Дата 2.11.2009, 14:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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



shamber,  select получился, спасибо.



--------------------
Если новая программа с первого раза компилируется без ошибок, значит, она написана принципиально неправильно. 
PM MAIL   Вверх
shamber
Дата 2.11.2009, 14:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


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

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



izver84, всегда пожалуйста.
PM MAIL Jabber   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь


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

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »


 




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


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

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