打印本文 打印本文 关闭窗口 关闭窗口
VB6 中 使用Winsock穿越各种代理的实现(TCP协议)
作者:武汉SEO闵涛  文章来源:敏韬网  点击数4858  更新时间:2009/4/23 15:03:55  文章录入:mintao  责任编辑:mintao
>

If LCase(Left(RevBuffer, 4)) = "http" And Mid(" 200 ", 1) <> 0 Then ''''状态代码为 200 为成功

Form1.Label8.Caption = "连接目标服务器成功!"

Form2.Show
ConnStep = -1

Else

MsgBox "HTTP1.1代理连接目标服务器失败!", 48, "错误"
ConnStep = 0
Form1.Winsock1.Close
Exit Function

End If

End If
End If

End Function

上一页  [1] [2] [3] [4] [5] 

打印本文 打印本文 关闭窗口 关闭窗口