け～しのなんとな～く

実はまだサンプルをアップしていません。

上でも書いてますが、通常のWEBサービスアクセスプログラムと同じなんですよね～

なぜか、自動的にW-SIMSへのダイアルアップを行ってくれます。

例えばこんな感じ(アマゾンWEBサービスにアクセス)

---サンプルソース---

          Dim req As New Com.Amazon.Webservices.ItemLookupRequest()

          req.ItemId = New String() {ISBMTextBox.Text}

          req.IdType = Com.Amazon.Webservices.ItemLookupRequestIdType.ASIN

          req.Condition = Com.Amazon.Webservices.Condition.All

          req.ResponseGroup = New String() {"Large", "Images", "ItemAttributes"}

          Dim look As New Com.Amazon.Webservices.ItemLookup()

          look.AWSAccessKeyId = "アマゾンアクセスキー"

          look.Request = New Com.Amazon.Webservices.ItemLookupRequest() {req}

          Dim res As Com.Amazon.Webservices.ItemLookupResponse = azn.ItemLookup(look)

          Dim r() As Com.Amazon.Webservices.Items = res.Items

          Dim bk As Com.Amazon.Webservices.Item

          If r(0).Item Is Nothing Then

              MessageBox.Show("本が存在しません")

              Exit Sub

          End If

          bk = r(0).Item(0)

'''以下はbk(本情報)からの情報の取得

------------------

Com.Amazon.Webservices名前空間はVisual Studio 2005で自動生成したWEBサービスのプロキシです。

本来ダイアルアップ制御はConnection Managerを使用する必要がありますが、それはまだ未調査です。

すみません。