代理系统源码
1. 那里可以下载 “保险代理业务管理系统“或类似系统的源码
http://www.chinaz.com
2. 帮我写一个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
3. 用友公司代理商网站模板用友软件分公司网站源码
您好，我搜索到了一个网站代码应该符合您的要求哦！
有一套是ZBLOG的
ZBLOG的应该更便于搜索引擎收录，呵呵，不过他前台是静态的，后台只能填加文章和产品，毕竟是BLOG的嘛。
有一套是CMS的
美观大方。后台可更新。
CMS网站源码，与ZBLOG模板不同的是，此网站源码支持网站各分类页面全部在后台编辑。
cms系统用友企业网站源码，网站支持生成静态页面，便于网络和谷歌网站快速收录。
cms系统用友企业网站源码，支持自动生成GOOGLE地图，标签系统，RSS。
cms系统用友企业网站源码，自带在线QQ客服系统。
cms系统用友企业网站源码，最重要的是美观大方，LOGO采用TABLE+DIV+CSS布局，不同于其他网站的是标题采用文字+链接便于网络和谷歌搜索引擎抓取。
详细可以看一下我的QQ号哈，给你演示网站看看。嘿嘿
4. java 动态代理 生成的$Proxy0 用什么方式可以获取$Proxy0类的源码
byte[] proxyClass = ProxyGenerator.generateProxyClass(proxy.getClass().getSimpleName(),proxy.getClass().getInterfaces());
然后将byte数组的数据通过文件流写入文件即可。注意proxy是代理对象
5. 想用python写一个代理http的代理程序，有没有可以参考的源代码
https://..com/question/429840094070280492
下次问之前你可以考虑先网络下
6. 求一个代理IP提取网站源码 有后台的最好 希望能用某宝单号提取IP ！
php">代理IP自动提取网站源码是一款基于DEDECMS二次开发制作的自动提取代理IP系统。界面比较简单，喜欢的朋友可以下载测试！空间需要支持php+mysql将源码完整上传至服务器空间，将DATA里面的common.inc.php文件打开，把里面的数据库信息修改成你自己的。
然后把根目录下面的kexingma.sql这个数据库文件导入到你的数据库，一般可以通过phpmyadmin来导入进去
后台路径admin后台账号和密码都是admin
7. 如果我有易语言的ip代理源码，如何快速的添加到自己的某个源码，并起作用！比如，
IE代理不会立即生效，需重启IE
8. 如何编写一个简单的HTTP代理服务器，最好提供VB源码
VERSION 5.00
Object = "{248DD890-BB45-11CF-9ABC-0080C7E7B78D}#1.0#0"; "MSWINSCK.OCX"
Begin VB.Form Form1
ClientHeight = 3090
ClientLeft = 60
ClientTop = 450
ClientWidth = 4680
LinkTopic = "Form1"
ScaleHeight = 3090
ScaleWidth = 4680
StartUpPosition = 3 '窗口缺省
Begin VB.ListBox List1
Height = 1500
Left = 120
TabIndex = 0
Top = 720
Width = 3615
End
Begin MSWinsockLib.Winsock SckGET
Index = 0
Left = 2520
Top = 360
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock Winsock1
Left = 2040
Top = 360
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Dim PathName As String
Sub Begin()
'启动Winsock1,使用listen方法，听254端口
DoEvents
Winsock1.Close
Winsock1.Protocol = sckTCPProtocol
Winsock1.LocalPort = 254
Winsock1.Listen
End Sub
Private Sub Form_Load()
'开始进行十个监听
For i = 1 To 9
Load SckGET(i)
SckGET(i).Close
SckGET(i).Protocol = sckTCPProtocol
Next
PathName = "E:\http\" '初始化目录
Begin
End Sub
Private Sub SckGET_DataArrival(Index As Integer, ByVal bytesTotal As Long)
Dim DataReceived As String
Dim pos1 As Long, pos2 As Long
Dim QuestFile As String
Dim TData As Byte
pos1 = 0: pos2 = 0
SckGET(Index).GetData DataReceived, vbString
'处理报文
For i = 1 To Len(DataReceived)
If Mid(DataReceived, i, 1) = " " Then
If pos1 = 0 Then pos1 = i + 1 Else pos2 = i - 1: Exit For
End If
Next
'对请求的文件进行处理
On Error GoTo ExitThisSub
If pos1 <> 0 And pos2 <> 0 Then
QuestFile = Mid(DataReceived, pos1 + 1, pos2 - pos1) '得到主文件名
If QuestFile = "" Then QuestFile = "index.htm" '主页
QuestFile = PathName & QuestFile '得到路径
List1.AddItem SckGET(Index).LocalIP & " : GET " & QuestFile & " HTTP/1.1"
If Dir(QuestFile) = "" Then QuestFile = PathName & "404.htm" '未找到
End If
'开始发送文件信息
Open QuestFile For Binary As #1
SckGET(Index).SendData "HTTP/1.0 200 OK" + vbCrLf
SckGET(Index).SendData "MIME_version:1.0" + vbCrLf
SckGET(Index).SendData "Content_Length:" + CStr(LOF(1)) + vbCrLf
SckGET(Index).SendData "" + vbCrLf
Do While Not EOF(1)
Get #1, , TData
SckGET(Index).SendData TData
Loop
ExitThisSub:
Close #1
Begin
SckGET(Index).Close
SckGET(Index).LocalPort = 254
End Sub
Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
Con:
For i = 0 To 9
If SckGET(i).State <> 7 Then SckGET(i).Accept requestID: Exit For '查找未用的SCK
If i = 9 And SckGET(9).State <> 7 Then Delay (1): GoTo Con '如果没有则继续等待
Next
End Sub
Sub Delay(Seconds&)
t& = Timer
Delay: DoEvents
If Timer < t + Seconds Then GoTo Delay
End Sub
9. 求一份用代理IP刷空间点击率的易语言源码
你是想做网易等等的刷博客点击率软件吧..
当你不断刷新同一个网页,网易博客就会自动将你的IP置入黑名单,导致你不能再继续刷新
我也做过同类的软件,我告诉你一个交互刷新的方法:(不会封IP,所以不需要用代理的命令)
只要不是同一个页面就不被封,如 日志或主页配搭,或相册与主页配搭
注意:必须有两个编辑框,用来输入不同的配搭的博客或空间网址.
再做个时钟,然后再时钟周期事件里输入以下命令:
注意,图中的编辑框3是写延迟时间的数值.你可以不需要这个"如果真()"命令
****************************************************************************************
.版本 2
.支持库 HtmlView
.判断开始 (超文本浏览框1.地址 ＝ 编辑框1.内容)
超文本浏览框1.地址 ＝ 编辑框2.内容
.默认
超文本浏览框1.地址 ＝ 编辑框1.内容
一直这样循环.