DBI と DBD::ODBC を使うことは分かっているのですが、
使い方が分かりません。
お願いいたします。

A 回答 (1件)

環境が分からないので大丈夫かどうか分かりませんが、


AS-Perlであれば
----------------------------------------------------------

use DBI;
$database = DBI->connect('dbi:ODBC:DATA'); #DATA<=ODBCの登録名
if(!$database){
die "Cannot connect to database;
$DBI::errors\n";
}
#データベースDATAよ検索条件KOMOKU2=10に該当するデータのKOUMOKU1を出力
$cursor = $database->prepare("SELECT KOMOKU1 from DATA where KOUMOKU2 = 10");
$cursor->execute();

#吐き出し
while(@values = $cursor->fetchrow()){
$list = join(',',@values);
print "$list\n";

}
$database->disconnect();
--------------------------------------------------------------
て感じで出来ます。
以下のサイトを見てもらえば、より詳しく解説があります。

参考URL:http://member.nifty.ne.jp/hippo2000/
    • good
    • 0
この回答へのお礼

回答ありがとうございます。
がんばってみたいと思います。

お礼日時:2001/05/08 13:27

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!


このカテゴリの人気Q&Aランキング

おすすめ情報

カテゴリ