Dim j As HttpJob
j.Initialize("", Me)
Dim fd As MultipartFileData
fd.Initialize
fd.KeyName = "file"
fd.Dir = File.DirInternal
fd.FileName = "file.jpg"
fd.ContentType = "image/jpg"
j.PostMultipart(posturl, null, Array(fd))
j.GetRequest.SetHeader("user", "baño")
Wait For (j) JobDone(j As HttpJob)
If j.Success Then
Log(j.GetString)
End If
j.Release