[心得]Perl連結Access資料庫的範例程式
最近剛好有用到Perl連結Access北風資料庫
剛好在網路上看到一篇文章
www.skybamboo.com/cgi-bin/perl/bbs/showmsg.cgi?category=perl4&subjectid=13
這篇文章是寫CGI連結資料庫的
以下是小弟參考並修改為一般的console程式
ODBC名稱我設定為wind
小弟有測試中文表格名稱和欄位名稱 ok!
#!C:/Perl/bin/perl.exe
#!/usr/bin/perl
use Win32::ODBC;
$DSN = "DSN=wind;";
#$DSN = "DSN=odbctest;";
#這裡有改動，直接使DSN=odbctest即可
#連接數據庫
if (!($db = new Win32::ODBC($DSN))){
print "連接數據庫失敗.\n";
exit();
}
else{
print "連接數據庫完成( 連接號：", $db->Connection(), ")\n\n";
}
#數據庫中的表
print "數據庫中的表：";
@tables = $db->TableList;
print join("-",@tables);
print "\n";
#$sql="select * from address";
$sql="select * from 員工";
if($db->Sql($sql)){
print "error select data\n";
Win32::ODBC->DumpError();
$db->Close();
}
while($db->FetchRow()){
%row=$db->DataHash;
#print "$row{name}--$row{email}--$row{age}\n";
print "$row{'姓名'}--$row{'名'}--$row{'職稱'}\n";
}
#關閉鏈接
$db->Close();
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 123.193.133.97
※ 編輯: Turbine 來自: 123.193.133.97 (11/11 21:05)
推
11/11 21:47, , 1F
11/11 21:47, 1F
討論串 (同標題文章)
以下文章回應了本文：
完整討論串 (本文為第 1 之 2 篇)：
Perl 近期熱門文章
PTT數位生活區 即時熱門文章
