2016-12-21 9 views
-1

webbrowserにプロキシ(IP:ポート)を設定できるコードがありますが、FirefoxやChromeでプロキシをVB.netでプログラムで設定する方法はありますか?プログラムでFirefoxを変更するVB.net

Firefoxの場合
<Runtime.InteropServices.DllImport("wininet.dll", SetLastError:=True)> _ 
Private Shared Function InternetSetOption(ByVal hInternet As IntPtr, ByVal dwOption As Integer, ByVal lpBuffer As IntPtr, ByVal lpdwBufferLength As Integer) As Boolean 
End Function 

Public Structure Struct_INTERNET_PROXY_INFO 
    Public dwAccessType As Integer 
    Public proxy As IntPtr 
    Public proxyBypass As IntPtr 
End Structure 

Private Sub RefreshIESettings(ByVal strProxy As String) 
    Const INTERNET_OPTION_PROXY As Integer = 38 
    Const INTERNET_OPEN_TYPE_PROXY As Integer = 3 

    Dim struct_IPI As Struct_INTERNET_PROXY_INFO 

    ' Filling in structure 
    struct_IPI.dwAccessType = INTERNET_OPEN_TYPE_PROXY 
    struct_IPI.proxy = Marshal.StringToHGlobalAnsi(strProxy) 
    struct_IPI.proxyBypass = Marshal.StringToHGlobalAnsi("local") 

    ' Allocating memory 
    Dim intptrStruct As IntPtr = Marshal.AllocCoTaskMem(Marshal.SizeOf(struct_IPI)) 

    ' Converting structure to IntPtr 
    Marshal.StructureToPtr(struct_IPI, intptrStruct, True) 

    Dim iReturn As Boolean = InternetSetOption(IntPtr.Zero, INTERNET_OPTION_PROXY, intptrStruct, System.Runtime.InteropServices.Marshal.SizeOf(struct_IPI)) 
End Sub 

答えて

0

C:あなたがで見つかったファイル "prefs.jsファイル" に設定を追加することができます\ユーザー\ユーザー名\のAppData \ローミング\ Mozilla \ Firefox \ Profiles \と???

は、単にファイルの末尾に以下の行を追加します.DEFAULT:

user_pref("network.proxy.ftp", "localhost"); 
user_pref("network.proxy.ftp_port", 10); 
user_pref("network.proxy.http", "localhost"); 
user_pref("network.proxy.http_port", 10); 
user_pref("network.proxy.socks", "localhost"); 
user_pref("network.proxy.socks_port", 10); 
user_pref("network.proxy.ssl", "localhost"); 
user_pref("network.proxy.ssl_port", 10); 
user_pref("network.proxy.type", localhost); 
+0

ええそれはそれです、ありがとうございました。しかし、どうすればvb.netでprefs.jsを見つけることができますか?パスの最初の部分については、 –

+0

Environment.GetEnvironmentVariable( "APPDATA")& "Mozilla \ Firefox \ Profiles"のように見えます。最後に " - "! – Simon

関連する問題