Upload binary data WinHTTP

[MATISZON 0]

Hello. I have a problem trying to send binary data (image) using WinHTTP.

My script:

$f = FileOpen("avek.gif")
$dataf = FileRead($f)
FileClose($f)


$data = 'Content-Disposition: form-data; name="userfile"; filename="avek.gif"' & @CRLF
$data &= 'Content-Type: image/gif' & @CRLF & @CRLF
$data &= $dataf


$http = ObjCreate("winhttp.winhttprequest.5.1")
$http.Open("POST", "http://zapodaj.net/upload.html")
$http.SetRequestHeader("Connection", "keep-alive")
$http.SetRequestHeader("Content-Type", "multipart/form-data")
$http.Send($data)
MsgBox(0,0,$data)
FileDelete("del.html")
FileWrite("del.html", $http.ResponseBody)

Screen from LiveHTTPHeader

Please, Help me :]

Edited February 2, 2011 by MATISZON

[trancexx 887]

You can use WinHttp.au3 for that:

#include "WinHttp.au3"

; Initialize and get session handle
Global $hOpen = _WinHttpOpen()
; Get connection handle
Global $hConnect = _WinHttpConnect($hOpen, "zapodaj.net")
Global $sHTM = _WinHttpSimpleFormFill($hConnect, Default, "index:0", "name:userfile", @ScriptDir & "\avek.gif")
; Close handles
_WinHttpCloseHandle($hConnect)
_WinHttpCloseHandle($hOpen)

ConsoleWrite(">Server response:" & @CRLF & $sHTM & @CRLF)

Edited February 2, 2011 by trancexx

[MATISZON 0]

Your code is working.

Can someone show me working code with com object?

[MATISZON 0]

@refresh

[autoking 0]

Your code is working.

Can someone show me working code with com object?

Would like that too