代理系統源碼
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.內容
一直這樣循環.