Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут
закрыты.
Читайте
требования к создаваемым темам.
-
Jenizix
-
- Географ

-

-
- Сообщения: 545
- Зарегистрирован: 20.04.2004 (Вт) 20:52
- Откуда: Москва
-
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

-

-
- Сообщения: 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

-

-
- Сообщения: 12822
- Зарегистрирован: 20.10.2002 (Вс) 17:02
- Откуда: חיפה
tyomitch » 10.05.2005 (Вт) 16:54
Jenizix писал(а):Все, сенкс нашел!
Ну и где тут POST?

-
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
Кто сейчас на конференции
Сейчас этот форум просматривают: AhrefsBot, PetalBot, Yandex-бот и гости: 19