VB6でBASIC認証つきPOST

タグの編集
投稿者 bubuo  (社会人) 投稿日時 2016/1/8 10:47:53
VB6でPOSTリクエストを送る時は以下の様にやると思うのですが

Set objXML = Server.CreateObject("MSXML2.ServerXMLHTTP") 
objXML.open "POST", "https://~~~", False 
objXML.setRequestHeader "Content-Type", " application/x-www-form-urlencoded" 
objXML.send "パラメータ名=値"

これのどこにBASIC認証のIDとパスワードを入れたら良いのでしょうか?
また、複数のパラメータを送りたい時は

パラメータ名1=値1&パラメータ名2=値2&・・・・・

と言う形で良いのでしょうか?
投稿者 bubuo  (社会人) 投稿日時 2016/1/8 11:57:52
Server.CreateObjectはCreateObjectの間違いなので気にしないでください。
投稿者 魔界の仮面弁士  (社会人) 投稿日時 2016/1/8 12:21:00
objXML.open "POST""https://example.com"False, user, password


だったはず。もしくは、

token = Base64変換( user & ":" & password)
objXML.setRequestHeader "Authorization""Basic " & token


でも行けるかも。
投稿者 bubuo  (社会人) 投稿日時 2016/1/8 13:55:35
上の方法でいけました、ありがとうございます。
後ろにつけられたんですね…