私は次のようにVB6ActiveXコントロールでPOSTを行うためにWinHttpを使用しています
Set WinHttpReq = New WinHttpRequest
WinHttpReq.Open "POST", strUrl, False
WinHttpReq.SetAutoLogonPolicy AutoLogonPolicy_Always
aPostBody = 'Sometext'
WinHttpReq.Send aPostBody
UploadFile = WinHttpReq.ResponseText
これはWindowsXP(IEのすべてのバージョン)でうまく機能しますが、Windows 7では401が返され、自動ログオンポリシーはここでは機能しません(http://msdn.microsoft.com/en-us/library/aa383144( VS.85).aspx)