「郵便番号ダウンロードサービス」記事へのコメント

メモ(for MS-ACCESS)

[fslasht (3370)]

　結局ACCESSを使ってうにょうにょ処理しました。
　てけとーにやっても全12万件のデータが１分もかからずに処理できてしまうと人間、堕落するよなあ。

● 郵便番号を加工 (1110000 → 111)
UPDATE zipcode SET zipcode.zip = Left([zipcode]![zip],3)
WHERE (((zipcode.zip) Like "???0000"));

● 住所作成 (adr1,2,3 を元に adrテーブルを作る。adr3の丁目の括弧以降は省く)
UPDATE zipcode SET zipcode.Adr = [adr1] & [adr2] & IIf(InStr([adr3],"（"),Left([adr3],InStr([adr3],"（")-1),[adr3]);

● 本番のテーブルにコピー
INSERT INTO AddressS ( Zip, AddressS ) IN 'ComYubin.mdb'
SELECT zipcode.zip, zipcode.Adr
FROM zipcode;

# 次の作業をするときこのメモは役に立つだろうか