بسم الله الرحمن الرحيم
اخواني الكرام في منتدى الفريق العربي
السلام عليكم ورحمة الله وبركاته /
سؤالي حول استخدام بروكسي في متصفح webkit.net ، لقد قمت بمحاولات كثيرة لاجعل المتصفح يتصل عن طريق بروكسي لكني فشلت
وبحثت كثيرا في جوجل عن هذا الامر ولم اجد مايفيد .
لذا ارجو ممن يعرف كيفية جعل المتصفح webkit.net او حتى skybound.gecko يتصل عن طريق بروكسي ان لايبخل علي بالاجابة
وانا لن ابخل عليه بالشكر والدعاء .
الكود التالي هو الكود الذي استخدمه للاتصال ببروكسي ، هذا الكود يعمل جيدا مع المتصفح webbrowser المضمن مع فيجوال ستوديو لكنه لا يعمل مع webkit.net او skybound.gecko
#Region "Using Proxy"
<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 UseProxy(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
struct_IPI.dwAccessType = INTERNET_OPEN_TYPE_PROXY
struct_IPI.proxy = Marshal.StringToHGlobalAnsi(strProxy)
struct_IPI.proxyBypass = Marshal.StringToHGlobalAnsi("local")
Dim intptrStruct As IntPtr = Marshal.AllocCoTaskMem(Marshal.SizeOf(struct_IPI))
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
#End Region