作成日時:2011年02月20日 22時18分00秒
この記事は13年ほど前に投稿されました。内容が古くなっている可能性がありますので更新日時にご注意ください。
※エクセルマクロ含まず。
AmazonAPIを利用してAmazonからジャケット画像を持ってくるソフト作ってた。
あるにはあるんだけどこう。もっと簡単に固有番号入力したらズバリなやつだけ保存してくれるソフトがなかったので作ってみた。
あるにはあるんだけどこう。もっと簡単に固有番号入力したらズバリなやつだけ保存してくれるソフトがなかったので作ってみた。
こいつはバーコードかキーワードで目的のCDを検索できる。
(CDの製品番号で検索すると一発(例:PCCG-01074))
いやいや苦労したよ。AmazonAPIの資料と、XMLの使い方の資料がなさ過ぎる。
あとVB6と.NET各バージョン。さらにはVBAまで様々なやり方が錯綜してて訳のわからない状態。
結局こんな感じで取得できた。
Dim axml As New XmlDocument
Dim anml As New XmlNamespaceManager(axml.NameTable)
axml.Load(AmazonURL)
anml.AddNamespace(“aws”, “http://webservices.amazon.com/AWSECommerceService/2009-07-01”)
aimg = axml.DocumentElement.SelectSingleNode(“/aws:ItemLookupResponse/aws:Items/aws:Item/aws:LargeImage/aws:URL”, anml).InnerText
Dim anml As New XmlNamespaceManager(axml.NameTable)
axml.Load(AmazonURL)
anml.AddNamespace(“aws”, “http://webservices.amazon.com/AWSECommerceService/2009-07-01”)
aimg = axml.DocumentElement.SelectSingleNode(“/aws:ItemLookupResponse/aws:Items/aws:Item/aws:LargeImage/aws:URL”, anml).InnerText
何に躓いたのかというと、ネットのやり方ではxmlnsが指定されている場合の方法が書かれていなかったから。そこで3日は悩んでようやく今日見つけたよ。
最近のGoogleは情報が薄いサイトや関連度の低いサイトも上位に来るから。
まぁ、応用出来ればそれはそれでいいのだが、応用できないのが困る。
昔はもっと「これだ!」という検索結果しかなかった気がするんだが。
まぁいいや。
近日中にメインサイトにでもうpしますかねぇ。
そういえば個別ソフトのページつくらずにVectorのページに飛ばしてるままだな。
もう1年以上あのままだ。いい加減更新しないとなぁ…。
そういえばこのサイトPINGをGoogleにしか飛ばしてないや。
Gooとか他のところも飛ばすようにするかなぁ。