perl連線access資料庫
前題是必須安裝好activeperl （505以上），以及ms access 97
一. 安裝win32-odbc模組
步驟1：
readme
win32-odbc.ppd
win32-odbc.tar.gz
步驟2：
在dos視窗下，temp目錄中執行下面的dos命令：
ppm install win32-odbc.ppd
二. 準備測試用資料庫（access）
步驟1：
啟動ms access,建立乙個新空資料庫，命名為odbctest.mdb,儲存在某一目錄中（記住路徑）。
步驟2：
然後新建乙個表，建立三個字段：
欄位名稱 資料型別
name 字元，長度50
email 字元，長度50
age 數字，長整型
將這個表儲存為address（注意這個例子中，沒有用自動增加的id）.輸入若干記錄：
nighthawk nighthawk@163.*** 20 1234567
john jt@163.*** 24 0284393293
kit kit@21**.*** 18 3948932
儲存後，關閉資料庫檔案。
步驟3：
開啟控制面板中的 odbc資料來源（32位），在使用者dsn欄中，找到使用者資料來源列表,選中名稱為「ms access 97 database」的一行，然後按「配置」鍵。
在database框中按"select.."，選擇步驟1.2中建立的資料庫檔案odbctest.mdb,按ok即可。odbc設定中的其它專案全部採用預設設定，然後就是ok,確定，關閉對話視窗。
三. 這時候，資料庫已經可以用了，我們來測試一下：
#!/usr/bin/perl
use win32::odbc;
$dsn = "ms access 97 database";
$dbase = "access.mdb";
#連線資料庫
if (!($db = new win32::odbc($dsn)))
else
#資料庫中的表
print "資料庫中的表：";
@tables = $db->tablelist;
print @tables;
print "/n";
#選擇資料表
if (! $db->sql("select * from [address] where age>=20") )
print "/n";
#列出年齡大於20的記錄
while($db->fetchrow())
} ##### sql #########
#新增記錄
$sqlinsert = "insert into address values ('euler', 'euler/@21**.***', 28, '021-345689')";
#更新記錄
$sqlupdate = "update address set age = age+10 ";
#刪除記錄
$sqldelete = "delete from address where name='jimtyan'";
$rc = $db->sql($sqlinsert);
die **(sql 失敗 "$sqlinsert": ), $db->error(), **(/n) if $rc;
$rc = $db->sql($sqlupdate);
die **(sql 失敗 "$sqlupdate": ), $db->error(), **(/n) if $rc;
$rc = $db->sql($sqldelete);
die **(sql 失敗 "$sqldelete": ), $db->error(), **(/n) if $rc;
#關閉鏈結
$db->close();
PERL連線ACCESS資料庫
2001年02月14日 08 20 00 perl連線access資料庫 前題是必須安裝好activeperl 505以上 以及ms access 97 一.安裝win32 odbc模組 步驟1 readme win32 odbc.ppd win32 odbc.tar.gz 步驟2 在dos視窗下，...
連線ACCESS資料庫
1 匯入命名空間空間 system.data.oledb 2 建立指向資料庫的連線 建立連線要用到system.data.oledb命名空間中的類 oledbconnection。通過以下語句可以完成對本地資料庫的連線工作 string strconnect provider microsoft.j...
access資料庫連線
string strconnection provider microsoft.jet.oledb.4.0 strconnection data source e accesstest data.mdb 裡用的是?路徑 oledbconnection objconnection new oledbc...