Winsock2 + Proxy + POST

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Jenizix
Географ
Географ
Аватара пользователя
 
Сообщения: 545
Зарегистрирован: 20.04.2004 (Вт) 20:52
Откуда: Москва

Winsock2 + Proxy + POST

Сообщение Jenizix » 10.05.2005 (Вт) 14:39

Ну вощем такая проблема, есть скрипт: http://jenizix.net.ru/script.php он принимает переменную myvar переданую методом POST. А как передать этому скрипту переменную методом POST юзая прокси, какие заголовки посылать прокси-серверу?
Ушел в себя, вернусь не скоро...

Если вам нужно сделать прозрачной только форму, а контролы на ней нет, то вам сюда!!!

Jenizix
Географ
Географ
Аватара пользователя
 
Сообщения: 545
Зарегистрирован: 20.04.2004 (Вт) 20:52
Откуда: Москва

Сообщение Jenizix » 10.05.2005 (Вт) 15:18

Ну что никто не знает чтоль??? странно...
Ушел в себя, вернусь не скоро...

Если вам нужно сделать прозрачной только форму, а контролы на ней нет, то вам сюда!!!

Jenizix
Географ
Географ
Аватара пользователя
 
Сообщения: 545
Зарегистрирован: 20.04.2004 (Вт) 20:52
Откуда: Москва

Сообщение Jenizix » 10.05.2005 (Вт) 16:00

Все, сенкс нашел!

Код: Выделить всё

Private Sub wsk_Connect(Index As Integer)
' If eR <> vbNullString Then
            wsk(Index).SendData "GET http://" & Host.text & " HTTP/1.0" & vbCrLf
            'List1.AddItem "GET http://" & Host.text & " HTTP/1.0" & vbCrLf
'           eR = vbNullString
  '      Else
        wsk(Index).SendData "GET http://" & Host.text & " HTTP/1.0" & vbCrLf
           ' List1.AddItem "GET http://" & Host.text & " HTTP/1.0" & vbCrLf
   '   End If
        wsk(Index).SendData "User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)" & vbCrLf
          '  List1.AddItem "User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)" & vbCrLf
        wsk(Index).SendData "Host: " & Host.text & vbCrLf
            'List1.AddItem "Host: " & Host.text & vbCrLf
        wsk(Index).SendData "Accept: text" & vbCrLf
            'List1.AddItem "Accept: text" & vbCrLf
        wsk(Index).SendData "Accept-Language: ru;q=1.0,en;q=0.9" & vbCrLf
            'List1.AddItem "Accept-Language: ru;q=1.0,en;q=0.9" & vbCrLf
        wsk(Index).SendData "Proxy Connection: Keep-Alive" & vbCrLf & vbCrLf
            'List1.AddItem "Proxy Connection: Keep-Alive" & vbCrLf & vbCrLf

end sub
Ушел в себя, вернусь не скоро...

Если вам нужно сделать прозрачной только форму, а контролы на ней нет, то вам сюда!!!

BV
Thinker
Thinker
Аватара пользователя
 
Сообщения: 3987
Зарегистрирован: 12.09.2004 (Вс) 0:55
Откуда: Молдавия, г. Кишинёв

Сообщение BV » 10.05.2005 (Вт) 16:12

О! Привет!

Вот ты и появился, сам запостил, сам ответил... :)
Гуд!
const char *out = "|*0>78-,+<|"; size_t cc = char_traits<char>::length(out);
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 10.05.2005 (Вт) 16:54

Jenizix писал(а):Все, сенкс нашел!

Ну и где тут POST? :shock:
Изображение

Jenizix
Географ
Географ
Аватара пользователя
 
Сообщения: 545
Зарегистрирован: 20.04.2004 (Вт) 20:52
Откуда: Москва

Сообщение Jenizix » 10.05.2005 (Вт) 19:26

А тфу, ну там надо GET на POST поменять =))) меня больше интересовала сама система работы с проксиком... =)))
Ушел в себя, вернусь не скоро...

Если вам нужно сделать прозрачной только форму, а контролы на ней нет, то вам сюда!!!

Jenizix
Географ
Географ
Аватара пользователя
 
Сообщения: 545
Зарегистрирован: 20.04.2004 (Вт) 20:52
Откуда: Москва

Сообщение Jenizix » 10.05.2005 (Вт) 19:28

Я вообщето это на С++ переписывал... одному человеку помогал, вот: http://forum.sources.ru/index.php?showtopic=94458
Ушел в себя, вернусь не скоро...

Если вам нужно сделать прозрачной только форму, а контролы на ней нет, то вам сюда!!!


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex-бот и гости: 45

    TopList