id: hondallica ( http://sukuna.net/ )

TALK

Hachioji.pm #11

じこしょうかい

id：hondallica

職業：ヘヴィーメタルプログラマー某公共インフラ系の会社で、なぜか携帯サイトの企画～開発やってます。

北海道出身、八王子在住

テーマ：Win道

R

Windows+Access2010+Amon2

えらいひとがAccess2010で管理してる資産情報をみんなで見れるようにする獣道

みちのり

Access 2010のODBCドライバを入れる

接続はDBIでやるので、コントロールパネルのどっかにあるデータソース(ODBC)の設定は不要。

参考：

Microsoft Accessへ接続する / DBIx::Custom リファレンス

http://d.hatena.ne.jp/perlcodesample/20110513/1307874545

セットアップ

コマンドプロンプトで打つ >amon2-setup --flavor Basic,Teng Access2010>cd Access2010

DBの準備

・dbディレクトリにhoge.accdbをコピー・config/development.plを編集

hoge.accdb

"dbi:ODBC:Driver={Microsoft Access Driver (*.mdb, *.accdb)};DBQ=$dbpath",

このへんいらない

ためしにplackupしてみる

>plackup Error while loading app.psgi: sql/odbc.sql: No such file or directory at lib/Access2010.pm line 18.

怒られるので、sql/sqlite.sqlをコピーして

odbc.sqlを作ります。

改めて

>plackup DBD::ODBC::db do failed: [Microsoft][ODBC Microsoft Access Driver] CREATE TABLEステートメントの構文エラーです。 (SQL-42000) at C:

/strawberry/perl/site/lib/Amon

2/DBI.pm line 85, <$fh> line 1.

また怒られます。。。

SQLを確認

ここでハマったのですが、どうやらAccessはIF NOT EXISTSが使えないようです。

しかたないので

IF NOT EXISTS消してplackupすると動きますが、

再度plackupすると、こうなるのでodbc.sqlの中身を空にして逃げました。

AccessからSQLでデータ取得

lib/Access2010/Web/Dispatcher.pmを編集

9～12行を変えます今回カラム名が分からなかったので、あえてハッシュで取るのはやめました。

HTMLテンプレート編集

tmpl/index.ttを編集

できたと思ってplackup

これはひどい

思い当たるのはDispatcher.pm

Shift_JISじゃないとダメっぽい

めんどくさいのでlib/Access2010/Web/Dispatcher.pmの

use utf8；を消してShift_JISで保存します。

＞plackup やっと見れました。

おわり