设置IE与Firefox浏览器的远程DNS解析功能

firefox:
URL地址栏输入 about:config
在 过滤器 一栏,输入 network.proxy.socks_remote_dns
然后双击 network.proxy.socks_remote_dns ,使“值”为True

IE:
修改注册表,路径为 HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Linkage
双击右侧的Bind,将第二行的\Device\NdisWanIp,剪切并粘贴到第一行。
嫌麻烦可以把下列代码保存为IE_DNS.vbs,然后双击,重启IE浏览器,
也可借助SocksCap或FreeCap等工具。

  1. Const HKLM = &H80000002
  2. sComputer = "."   ' use "." for local computer
  3. Set oReg = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" _
  4.          & sComputer & "\root\default:StdRegProv")
  5. sKeyPath = "SYSTEM\CurrentControlSet\Services\Tcpip\Linkage"
  6. sValueName = "Bind"
  7. oReg.GetMultiStringValue HKLM, sKeyPath, sValueName, arValues
  8. arValuesNew = Array()
  9. For i = 0 To UBound(arValues)
  10.    If i = 0 Then
  11.       If LCase(arValues(i)) = "\device\ndiswanip" Then
  12.          Exit For
  13.       Else
  14.          ReDim Preserve arValuesNew(0)
  15.          arValuesNew(0) = "\Device\NdisWanIp"
  16.       End If
  17.    End If
  18.    If LCase(arValues(i)) <> "\device\ndiswanip" Then
  19.       iCountNew = UBound(arValuesNew) + 1
  20.       ReDim Preserve arValuesNew(iCountNew)
  21.       arValuesNew(iCountNew) = arValues(i)
  22.    End If
  23. Next
  24. If UBound(arValuesNew) > -1 Then
  25.    oReg.SetMultiStringValue HKLM, sKeyPath, sValueName, arValuesNew
  26. End If

强帖留名: