Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.71/14: Рейтинг темы: голосов - 14, средняя оценка - 4.71
1 / 1 / 1
Регистрация: 29.06.2009
Сообщений: 24

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

23.10.2009, 00:27. Показов 2681. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Разъясните толково, желательно на примере с сайтом http://image2you.ru как можно отправить картинку на хостинг картинок, если сложно с этим сайтом, то вот к примеру другой: [url] тут всё гораздо проще - никакой авторизации, как авторизироваться уже в принципе понял... а вот файл отправить да ещё и с доп. полями?

Большое спасибо!
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
23.10.2009, 00:27
Ответы с готовыми решениями:

HttpWebRequest - отправка файла POST запросом
Добрый день! Пытаюсь отправить содержимое файла (не сам файл, а именно содержимое), но до сервера оно не доходит.. public void...

Прогресс бар при скачивании файла используя HttpWebRequest/HttpWebResponse
есть код void DownloadFile(string sSourceURL, string sDestinationPath) { long iFileSize = 0; ...

Отправка потока данных на скрипт php
Есть такой код отправки файла. Работает отлично. formData := TIdMultiPartFormDataStream.Create; formData.AddFile('myfile',...

1
1 / 1 / 1
Регистрация: 29.06.2009
Сообщений: 24
23.10.2009, 02:48  [ТС]
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Кому интересно, я решил вопрос, возможно много лишнего, но всё работает, изображения уходят на сервер и я получаю его код, а дальше ссылку на картинку:
VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
    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
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
23.10.2009, 02:48
Помогаю со студенческими работами здесь

Отправка почты через PHP скрипт
Есть PHP скрипт, отправляющий почту. Как правильно передать ему из программы все нужные параметры? (Скрипт брал готовый из интернета). ...

Отправка сообщений через PHP скрипт.
Здраствуйте всем. Нигде не могу найти информации, как отправлять сообщения на какой-либо сайт через ПХП скрипт. То есть, к примеру, создан...

Отправка кода на почту через php скрипт
Вообщем есть скрипт &lt;?php ini_set( 'html_errors', false ); if ( empty( $_POST ) || empty( $_POST ) || empty( $_POST ) || empty(...

Отправка данных в базу sql через php скрипт
Добрый день уважаемые программисты, столкнулись с такой проблемой: Необходимо сменять статус через выпадающий список и отправлять в...

Отправка файла на скрипт
&lt;?php $uploaddir = '/www/upload/'; if (move_uploaded_file($_FILES, $uploaddir . $_FILES)) { print &quot;Файл успешно...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Доступность команды формы по условию
Maks 07.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .
Уведомление о неверно выбранном значении справочника
Maks 06.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt
8Observer8 05.04.2026
Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .
AkelPad-скрипты, структуры, и немного лирики..
testuser2 05.04.2026
Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
Отображение реквизитов в документе по условию и контроль их заполнения
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II
kumehtar 04.04.2026
Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .
Программный контроль заполнения реквизитов табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru