Visual Basic, .NET, ASP, VBScript
 

   
   
     

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

Страница: 1 |

 

  Вопрос: WebBrowser и прокси Добавлено: 07.01.11 22:13  

Автор вопроса:  Abiron
Как из программы заставить работать этот компонент через прокси, не меняя настройки всего IE?
И как отключить воспроизведение звука(на клик похожего) при переходе по страницам?

Ответить

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

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



Вопросов: 30
Ответов: 62
 Профиль | | #1 Добавлено: 09.01.11 02:20
Ответ на первый вопрос сам нашел.Кому надо:
  1. Public Declare Sub UrlMkSetSessionOption Lib "urlmon.dll" _
  2. (ByVal dwOption As Long, ByRef pBuffer As Any, _
  3. ByVal dwBufferLength As Long, ByVal dwReserved As Long)
  4.  
  5. Public Type INTERNET_PROXY_INFO
  6. dwAccessType As Long
  7. lpszProxy As String
  8. lpszProxyBypass As String
  9. End Type
  10. Public Const INTERNET_OPEN_TYPE_PROXY = 3
  11. Public Const INTERNET_OPTION_PROXY = 38
  12.  
  13. Форма:
  14. Private Sub Command1_Click()
  15. Dim ipi As INTERNET_PROXY_INFO
  16. ipi.dwAccessType = INTERNET_OPEN_TYPE_PROXY
  17. ipi.lpszProxy = "proxy1:port1"
  18. ipi.lpszProxyBypass = ""
  19. Call UrlMkSetSessionOption(INTERNET_OPTION_PROXY, ipi, Len(ipi), 0)
  20. WB.Navigate2 "URL1"
  21. End Sub
  22.  
  23. Private Sub Command2_Click()
  24. Dim ipi As INTERNET_PROXY_INFO
  25. ipi.dwAccessType = INTERNET_OPEN_TYPE_PROXY
  26. ipi.lpszProxy = "proxy2:port2"
  27. ipi.lpszProxyBypass = ""
  28. Call UrlMkSetSessionOption(INTERNET_OPTION_PROXY, ipi, Len(ipi), 0)
  29. WB.Navigate2 "URL2"
  30. End Sub


А Кто что знает по второму?
Как выключить ввообще все звуки у программы? Может это проще?

Ответить

Страница: 1 |

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



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