Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 | 2 |

 

  Вопрос: Смена прокси Добавлено: 20.11.06 20:30  

Автор вопроса:  psinetron | ICQ: 218945948 
Люди, подскажите пожалуйста как можно сменить проксисервер программно. Допустим у меня есть List1 . Кликаю один раз кнопу - включается первый в списке прокси, еще раз - следующий... ЧТобы IE запускался с уже введенной проксей. В принципе для этого нужна перезагрузка IE, но подойдет любой пример. Помогите пожалуйста... Весь инет перерыл - нет ничего похожего

Ответить

  Ответы Всего ответов: 16  

Номер ответа: 1
Автор ответа:
 JMP



Вопросов: 6
Ответов: 171
 Профиль | | #1 Добавлено: 20.11.06 20:37
Скачайте http://avantbrowser.com/ (бесплатный и уважаемый. Даже Руссинович им пользуется ;) )
он работает на движке IE, во первых много удобных вкусностей(мультитаб, группы ... короче много чего)
во вторых есть поддержка занести в список прокси,
и переключаться по ним когда надо.

Ответить

Номер ответа: 2
Автор ответа:
 psinetron



ICQ: 218945948 

Вопросов: 34
Ответов: 28
 Профиль | | #2 Добавлено: 20.11.06 20:49
Да зачем он мне? МНе реально нужен исходник смены прокси... плззз

Ответить

Номер ответа: 3
Автор ответа:
 JMP



Вопросов: 6
Ответов: 171
 Профиль | | #3 Добавлено: 21.11.06 20:35
API не помню, но можно зашелить NETSH interface portproxy

Ответить

Номер ответа: 4
Автор ответа:
 JMP



Вопросов: 6
Ответов: 171
 Профиль | | #4 Добавлено: 21.11.06 20:59
Вспомнил чуток :WinHttpRequest.SetProxy

и здесь

http://proxy.oflameron.ru

Ответить

Номер ответа: 5
Автор ответа:
 HACKER


 

Разработчик Offline Client

Вопросов: 236
Ответов: 8362
 Профиль | | #5 Добавлено: 21.11.06 22:53
Private Type INTERNET_PROXY_INFO2
    dwAccessType    As Long
    lpszProxy       As String
    lpszProxyBypass As String
End Type
Private Declare Function InternetSetOption Lib "wininet.dll" Alias "InternetSetOptionA" (ByVal hInternet As Long, ByVal dwOption As Long, ByRef lpBuffer As Any, ByVal dwBufferLength As Long) As Long
Public Function ApplyProxy(Inject As Boolean) As Long
    Dim strServers          As String
    Dim strBuffer           As String
    Dim ProxyInfo           As INTERNET_PROXY_INFO2
strBuffer = "socks=127.0.0.1:44 https=127.0.0.1:44 http=127.0.0.1:44 " & _
            "gopher=127.0.0.1:44 ftp=127.0.0.1:44"
strServers = RTrim$(strBuffer)
 If Inject = True Then ProxyInfo.dwAccessType = 3 Else ProxyInfo.dwAccessType = 1
       ProxyInfo.lpszProxy = strServers
       ProxyInfo.lpszProxyBypass = ""
ApplyProxy = InternetSetOption(0&, 38, ProxyInfo, LenB(ProxyInfo))
End Function

Ответить

Номер ответа: 6
Автор ответа:
 HACKER


 

Разработчик Offline Client

Вопросов: 236
Ответов: 8362
 Профиль | | #6 Добавлено: 21.11.06 22:54
Это всмысле на себя, на чужую проксю strBuffer ессно подправить...

Ответить

Номер ответа: 7
Автор ответа:
 Sharp


Лидер форума

ICQ: 216865379 

Вопросов: 106
Ответов: 9979
 Web-сайт: sharpc.livejournal.com
 Профиль | | #7
Добавлено: 22.11.06 16:51
Скачайте http://avantbrowser.com/ (бесплатный и уважаемый. Даже Руссинович им пользуется ;) )
он работает на движке IE, во первых много удобных вкусностей(мультитаб, группы ... короче много чего)
во вторых есть поддержка занести в список прокси,
и переключаться по ним когда надо.

Присоединяюсь

Ответить

Номер ответа: 8
Автор ответа:
 Artyom



Разработчик

Вопросов: 130
Ответов: 6602
 Профиль | | #8 Добавлено: 22.11.06 17:28
Скачайте http://avantbrowser.com/ (бесплатный и уважаемый. Даже Руссинович им пользуется ;) )

Как он может быть уважаемым если я им не пользуюсь???????

Ответить

Номер ответа: 9
Автор ответа:
 Stas



Вопросов: 0
Ответов: 2
 Профиль | | #9 Добавлено: 23.11.06 01:51
А как привязать к обьекту WebBrowser?

Ответить

Номер ответа: 10
Автор ответа:
 Sharp


Лидер форума

ICQ: 216865379 

Вопросов: 106
Ответов: 9979
 Web-сайт: sharpc.livejournal.com
 Профиль | | #10
Добавлено: 23.11.06 02:33
Как он может быть уважаемым если я им не пользуюсь???????

Какая разница, пользуешься ли ты им или нет, если им пользуется Руссинович?

Ответить

Номер ответа: 11
Автор ответа:
 Artyom



Разработчик

Вопросов: 130
Ответов: 6602
 Профиль | | #11 Добавлено: 23.11.06 10:38
Если б им пользовался Билл Гейтс то его можно было признать популярным, а так, "Руссинович" - для меня обычный набор букв, не более осмысленный чем "Red Heat"

Ответить

Номер ответа: 12
Автор ответа:
 Sharp


Лидер форума

ICQ: 216865379 

Вопросов: 106
Ответов: 9979
 Web-сайт: sharpc.livejournal.com
 Профиль | | #12
Добавлено: 23.11.06 18:01
Руссинович, кстати, один из наиболее квалифицированных сотрудников Micro$oft. Небось, про Эндрю Хейлсберга или Джима Олчина ты слышал?

Ответить

Номер ответа: 13
Автор ответа:
 Artyom



Разработчик

Вопросов: 130
Ответов: 6602
 Профиль | | #13 Добавлено: 23.11.06 20:45
Хейлсберга слышал, Олчина слышал, Гейса слышал, Руссиновича не слышал

Ответить

Номер ответа: 14
Автор ответа:
 Wamark



Вопросов: 2
Ответов: 22
 Web-сайт: kiev.ua
 Профиль | | #14
Добавлено: 24.11.06 20:21
Вопрос к автору: А почему именно IE должен настраиваться под прокси??? В чём задача-то?... Это типа для любителей Эксплорера....?

Ответить

Номер ответа: 15
Автор ответа:
 Sharp


Лидер форума

ICQ: 216865379 

Вопросов: 106
Ответов: 9979
 Web-сайт: sharpc.livejournal.com
 Профиль | | #15
Добавлено: 25.11.06 02:05
http://www.microsoft.com/technet/sysinternals/default.mspx

Ответить

Страница: 1 | 2 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам