; OppHTTP.Text = "HTTP服务已开启！服务软件类型：Apache 2.0.52"
End If
If InStr(StrHttp, "Apache/2.1.6") > 0 Then
OppHTTP.Text = "HTTP服务已开启！服务软件类型：Apache 2.1.6"
End If
If InStr(StrHttp, "Apache/1.3.2") > 0 Then
OppHTTP.Text = "HTTP服务已开启！服务软件类型：Apache 1.3.x"
End If
If InStr(StrHttp, "Apache/1.3.20") > 0 Then
OppHTTP.Text = "HTTP服务已开启！服务软件类型：Apache 1.3.20"
End If
If InStr(StrHttp, "Apache/1.3.23") > 0 Then
OppHTTP.Text = "HTTP服务已开启！服务软件类型：Apache 1.3.23"
End If
If InStr(StrHttp, "Apache/1.3.26") > 0 Then
OppHTTP.Text = "HTTP服务已开启！服务软件类型：Apache 1.3.26"
End If
If InStr(StrHttp, "Apache/1.3.27") > 0 Then
OppHTTP.Text = "HTTP服务已开启！服务软件类型：Apache 1.3.27"
End If
If InStr(StrHttp, "Apache/1.3.33") > 0 Then
OppHTTP.Text = "HTTP服务已开启！服务软件类型：Apache 1.3.33"
End If
If InStr(StrHttp, "Netscape-Enterprise/4.1") > 0 Then
OppHTTP.Text = "HTTP服务已开启！服务软件类型：Netscape-Enterprise 4.1"
End If
If InStr(StrHttp, "Unix") > 0 Then
SystemFW = "类Unix/Linux系统"
End If
Catch
End Try
因为是摘出来的，所以有的变量没有定义，大家自己去琢磨吧。
ZSIP：分析出的真实IP
上一页 [1] [2] |
