VBAでの LINE notify 送信

Question

前提・実現したいこと

VBA にて、LINE notify を使用してメッセージを送信したい

発生している問題・エラーメッセージ

実行すると、ステータスコード 400 (リクエストが不正)で、
以下のレスポンスとなります。

{"status":400,"message":"message: may not be empty"}

message パラメータの指定方法が間違っているようですが、
正しい指定方法がわかりません。

わかる方がおられましたら、お教えください。

該当のソースコード

Dim objHTTP As Object

Set objHTTP = CreateObject("MSXML2.XMLHTTP")
objHTTP.Open "POST", "https://notify-api.line.me/api/notify", False
objHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencorded"
objHTTP.setRequestHeader "Authorization", "Bearer アクセストークン"
objHTTP.send "message=test"


If objHTTP.Status = 200 Then
    ' レスポンスコード（正常）
    Debug.Print "正常送信"
Else
    Debug.Print objHTTP.responseText
End If

補足情報（FW/ツールのバージョンなど）

Microsoft Excel 2013
Microsoft Visual Basic for Applications 7.1

Answer 1

誤字です。「～urlencorded」ではなく「urlencoded」です。
×objHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencorded"
○objHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"

Comments

[issii]

解決しました。ありがとうございます。
誤字という単純ミスで、恥ずかしい限りです。

Answer 2

Authorization というヘッダの追加が無視されているということはないでしょうか。
ネットワークモニターソフトを使うなどして、
送信リクエストを解析しないとなんとも言えないですね。
（MSDN Libraryのドキュメントがダメダメで調べようがない。）

Comments

[issii]

今回の問題は、〇 urlencoded -> × urlencorded の誤字という単純ミスでした。

ネットワークをモニタリングするという事を今まで行ったことが無く、初めてやってみて、大変勉強になりました。

ご回答ありがとうございました。