b2c信息网

您现在的位置是:首页 > 前天新闻 > 正文

前天新闻

socks5进程代理源码(socks5代理)

hacker2022-06-12 19:58:15前天新闻86
本文目录一览:1、易语言如何查询指定进程ip,有源码写源码,不会不说话。

本文目录一览:

易语言如何查询指定进程ip,有源码写源码,不会不说话。

你好,本身你的提问就有问题。ip地址是一个设备的唯一表示符,与程序没关系。另:提问语气还那么不友好,而且是匿名。

初步分析可能的意思:

1、查询进程pid。任务管理器里就有。易语言自带的支持库也可以轻松实现。

2、查询指定进程的某一连接的目的ip。用网截或抓包可实现。

求delphi 设置socks5代理访问网页的源码

增加一个TIdIOHandlerSocket组件和一个TIdSocksInfo组件

把原来的IdHTTP组件的IOHandler属性设置为新增加的TIdIOHandlerSocket组件

把新增加的TIdIOHandlerSocket组件的SocksInfo属性设置为新增加的TIdSocksInfo组件

然后在TIdSocksInfo组件中正确设置Socks5代理的参数

帮我写一个VB源码,自动使用socks5代理后打开一个网页。大神们帮帮忙

平凡的真的不能用,楼主的代理也可以用呀,只有第二个不能用,我发个能用的,代码如下: Private Const INTERNET_OPTION_PROXY = 38 Private Const INTERNET_OPEN_TYPE_PROXY = 3 Private Type INTERNET_PROXY_INFO 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 Function SetProxy() Dim options As INTERNET_PROXY_INFO options.dwAccessType = INTERNET_OPEN_TYPE_PROXY options.lpszProxy = "SOCKS=" Combo1.Text '127.0.0.1:9050 options.lpszProxyBypass = "" internetsetoption 0, INTERNET_OPTION_PROXY, options, LenB(options) End Function Private Sub Command1_Click() SetProxy WebBrowser1.Navigate Text1.Text End Sub

发表评论

评论列表

  • 孤鱼旧竹(2022-06-12 23:28:57)回复取消回复

    大神们帮帮忙平凡的真的不能用,楼主的代理也可以用呀,只有第二个不能用,我发个能用的,代码如下: Private Const INTERNET_OPTION_PROXY = 38 Private Const INTERNET_OPEN_TYPE_PRO

  • 礼忱徒掠(2022-06-13 06:33:25)回复取消回复

    ip。用网截或抓包可实现。求delphi 设置socks5代理访问网页的源码增加一个TIdIOHandlerSocket组件和一个TIdSocksInfo组件 把原来的IdHTTP组件的IOHandler属性设置为新增加的TIdIOHandler