パラメータを&でつなげて、
Dim xmlhttp As Object Set xmlhttp = CreateObject("msxml2.xmlhttp") xmlhttp.Open "POST", url, False xmlhttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" xmlhttp.send (paramStr)
で送信できる。
参考)
http://piyopiyocs.blog115.fc2.com/blog-entry-433.html
また、テキストエリア(textarea)にPOST送信する場合は
改行コード(vbNewLine)を付加して送れば良い。
例えば、URLをテキストエリアに数行書いて、POSTしたい場合は
paramStr = “&urls=http://test.co.jp/aaa.html” & vbNewLine & “http://test.co.jp/bbb.html”
のように送ることができる。