Отправка файла в PHP скрипт используя HttpWebRequest

    Private Sub uploadImg(ByVal path As String)
        'Авторизация, получение кук
        Dim url As String = "http://image2you.ru/login/"
        Dim header As New System.Text.StringBuilder()
        Dim req As Net.HttpWebRequest = Net.HttpWebRequest.Create(url)
        req.ContentType = "application/x-www-form-urlencoded"
        req.Headers.Add(HttpRequestHeader.Pragma, "no-cache")
        req.Accept = "image/gif, image/jpeg, image/pjpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, application/x-ms-application, application/x-ms-xbap, application/vnd.ms-xpsdocument, application/xaml+xml, */*"
        req.Headers.Add(HttpRequestHeader.AcceptEncoding, "gzip, deflate")
        req.Headers.Add(HttpRequestHeader.AcceptLanguage, "ru")
        req.UserAgent = "Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; .NET CLR 2.0.50727; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729)"
        req.Referer = "http://image2you.ru/login/"
        req.Method = "POST"
        Dim s As IO.Stream = req.GetRequestStream
        Dim bytes() As Byte = System.Text.Encoding.UTF8.GetBytes(String.Format("email={0}&pass={1}&imageField.x=32&imageField.y=10", E-MAIL, PASS))
        s.Write(bytes, 0, bytes.Length)
        s.Close()
 
        Dim cookie As String = req.GetResponse().Headers("set-cookie")
        'Загрузка изображения
        url = "http://image2you.ru/cabinet/upload/"
        Dim boundary As String = IO.Path.GetRandomFileName
        header = New System.Text.StringBuilder()
        header.AppendLine("--" & boundary)
        header.AppendLine("Content-Disposition: form-data; name=""image_name""" & vbNewLine & vbNewLine & IO.Path.GetFileName(path))
        header.AppendLine("--" & boundary)
        header.AppendLine("Content-Disposition: form-data; name=""image""; filename=""" + IO.Path.GetFileName(path) + """")
        header.AppendLine("Content-Type: image/pjpeg")
        header.AppendLine()
        Dim headerbytes() As Byte = System.Text.Encoding.UTF8.GetBytes(header.ToString)
        Dim endboundarybytes() As Byte = System.Text.Encoding.ASCII.GetBytes(vbNewLine & "--" & boundary & "--" & vbNewLine)
        req = Net.HttpWebRequest.Create(url)
        req.Accept = "image/gif, image/jpeg, image/pjpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, application/x-ms-application, application/x-ms-xbap, application/vnd.ms-xpsdocument, application/xaml+xml, */*"
        req.Referer = "http://image2you.ru/cabinet/upload/"
        req.Headers.Add(HttpRequestHeader.AcceptLanguage, "ru")
        req.UserAgent = "Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; .NET CLR 2.0.50727; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729)"
        req.ContentType = "multipart/form-data; boundary=" & boundary
        req.Headers.Add(HttpRequestHeader.AcceptEncoding, "gzip, deflate")
        req.Headers.Add(HttpRequestHeader.Pragma, "no-cache")
        req.Headers.Add(HttpRequestHeader.Cookie, cookie)
        req.Method = "POST"
        s = req.GetRequestStream
        s.Write(headerbytes, 0, headerbytes.Length)
        Dim filebytes() As Byte = My.Computer.FileSystem.ReadAllBytes(path)
        s.Write(filebytes, 0, filebytes.Length)
        s.Write(endboundarybytes, 0, endboundarybytes.Length)
        s.Close()
        Dim DT As String = New StreamReader(req.GetResponse().GetResponseStream()).ReadToEnd()
        Dim code As String = System.Text.RegularExpressions.Regex.Match(DT, "(?<=gallery/)code.*?(?=/)").Value
    End Sub