VBA(Access)でWebServiceを利用する

とりあえず、MSXML2.XMLHTTPを利用すればWebServiceにリクエストを投げてレスポンスが取得できるらしい。
  
最初に参考にさせていただいたサイトはここ
  
今回はAuth処理とかいらないのでその辺は削って使いました。
(Function化してるので引数など使ってますが、そこは記載していません。最後の初期化処理なども省略してますのでオブジェクトはNothingをセットして最後処理してあげてください)

 'HTTP接続
    With httpReq
        'POST
        .Open "POST", pm_hogeUlr, False
        If pm_contentType <> "" Then
            .setRequestHeader ContentType, pm_contentType
        End If
        .send strParam
        
        '接続確認
        If .Status <> HTTP_STATUS_OK Then
           
            strRes = ""
        
        Else
            Debug.Print .responseText
            strRes = .responseText
           
        End If
    End With

  
ところがWebServiceとの接続は上手くいっているのですが、XML文章としてこのあとMSXML2.DOMDocumentで変換すると上手くいかない。
怪しいXMLが返ってきてるのかなあ・・・。
  

  

トヨタ86

ハチロクハチロクでも今度新発売になる新しい86です。
その86でのドリフト走行動画がありました。
  
新型ハチロクでのドリフト
  
動きを見る限りはほぼノーマル?で乗ってるみたいです。
機械式LSDバキバキな感じではないようです。
  
織戸や谷口がドライバーなんだから、もっと広いところでチューンドカーで走らせればど迫力なドリフトが見られただろうなーとちょっと残念。
  
何はともあれ、FRスポーツカーが復活するのは嬉しいことです。
S16シルビアとかでないかなあ・・・。

猫型のチョコを食べてみた

某チョコブランドが出してる立体型のチョコレート。
  
予定数よりあまったため食べてみました。
見た目は超かわいいのですが・・味が・・・( ゚Д゚)・∵. グフッ!!
  
あげた人ごめんなさい・・・。
  
来年は普通にゴディバとかヴィタメールにします・・・(´・ω・`)ショボーン

ムービーも取れるデジカメが欲しい

自宅で猫を撮影するには、スマフォのカメラじゃイマイチと思い始めました。
特にムービーとか全然ダメなので・・・。
  
ヨドバシに見に行ってみましたが、良く考えたら自分はデジカメとかビデオカメラとかまったく素人で意味がわからず・・・(;´Д`)
  
でネットで色々と検索してみたところ、自分の条件(欲しい性能・価格)に合致しそうなのが
パナソニック TZ30
でした。
  
Sonyとかもよさげなんですが、自分アンチSonyなんで却下・・・(;´∀`)ウフフ

まだ発売前なので、まだまだ調べようとは思っています。