powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (Perl) ODBC MS SQL
4 сообщений из 4, страница 1 из 1
(Perl) ODBC MS SQL
    #32045431
Tey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Tey
Гость
Привет всем. У меня проблема! Как прочитать данные из MS SQL при помощи Perl. Пока я смог только подключиться к базе данных при помощи ODBC:

#!/usr/bin/perl
$dsn = 'TMeter';
$login = 'statread';
$pwd = 'statread';
use Win32::ODBC;
$connectstring = "DSN=$dsn;UID=$login;PWD=$pwd;

А дальше как ?!! Как теперь данные считать???
...
Рейтинг: 0 / 0
(Perl) ODBC MS SQL
    #32046157
WildMan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Код: plaintext
1.
2.
3.
4.
5.
openDB($ref2db);
&SQLError('Îøèáêà SQL çàïðîñà [Main Search].') if ($ref2db->Sql($sql));
while ($db->FetchRow()) {
	  ($VAR{'MODEL'}, $VAR{'MPAGE'}, $VAR{'OPNAME'}, $VAR{'OPAGE'},$VAR{'PRICE'}, $VAR{'REM'},$date, $VAR{'IDS'}, $VAR{'SNAME'},$phone, $fax)=$ref2db->Data('MODEL', 'MDPG', 'OPNM', 'OPPG', 'PRICEMIN', 'REM', 'DATEUPDT', 'IDS', 'SLNM', 'PHONE', 'FAX' );
	  } 
&closeDB($ref2db);

Где Опен и Клозе ДБ мои функции дял устанволение конекта и открытия базы ... могешь напримую нужные операторы в писать не бзая функции
...
Рейтинг: 0 / 0
(Perl) ODBC MS SQL
    #32047094
WildMan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
да забыл сказать
что sql=сам запрос типа "Select v1, v2 и так далее, но чтобы имена полей в запросе совпадали с именами в
Код: plaintext
$db->Data(... 
А OpenDB это:
Код: plaintext
unless ($db) {$db = new Win32::ODBC( "dsn=$DSN;UID=$UID;PWD=$PWD" )};

]
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
(Perl) ODBC MS SQL
    #33255398
Orlic
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Все примеры коннекта к MS SQL - у явным указанием логина и пароля. Но ведь модуль WIN32::ODBC позволяет создавать такде соединение с использованием DSN в администраторе ODBC. Или не так???

Правда, у меня это не проходит, пишет:
Код: plaintext
1.
[Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified

как это можно исправить???
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (Perl) ODBC MS SQL
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]