- YaBB_1Gold_SP1.3.1_cgi YaBB (Yet another Bulletin Board) is the original FREE
- BD-P-Sistema_2.rar sistema en php de catastro de mp3s
- dashpc-0.2.5-1.i386 The DashPC car multimedia system is a UI for automobile multimedia implemented in Linux. Its provides a comprehensive interface for MP3
- TSDQQ_v2014.11.28 TSDQQ网址导航系统带后台 全功能 无限制 绿色实用 网址导航系统简介: 1
- 57464165 不用wmp控件播放音频文件(API)
- Ejercicio de estilos Ejercicio de Estilos en Css+Asp
文件名称:ip
-
所属分类:
- 标签属性:
- 上传时间:2012-11-16
-
文件大小:4.06kb
-
已下载:0次
-
提 供 者:
-
相关连接:无下载说明:别用迅雷下载,失败请重下,重下不扣分!
介绍说明--下载内容来自于网络,使用问题请自行百度
ip 探测
Private Sub Command1_Click()
Dim ECHO As ICMP_ECHO_REPLY
Dim pos As Integer
Call Ping(Text2.Text, ECHO)
Text1(0) = GetStatusCode(ECHO.status)
Text1(1) = ECHO.Address
Text1(2) = ECHO.RoundTripTime & " ms"
Text1(3) = ECHO.DataSize & " bytes"
If Left$(ECHO.Data, 1) <> Chr$(0) Then
pos = InStr(ECHO.Data, Chr$(0))
Text1(4) = Left$(ECHO.Data, pos - 1)
End If
Text1(5) = ECHO.DataPointer
End Sub-ip 探测
Private Sub Command1_Click()
Dim ECHO As ICMP_ECHO_REPLY
Dim pos As Integer
Call Ping(Text2.Text, ECHO)
Text1(0) = GetStatusCode(ECHO.status)
Text1(1) = ECHO.Address
Text1(2) = ECHO.RoundTripTime & " ms"
Text1(3) = ECHO.DataSize & " bytes"
If Left$(ECHO.Data, 1) <> Chr$(0) Then
pos = InStr(ECHO.Data, Chr$(0))
Text1(4) = Left$(ECHO.Data, pos- 1)
End If
Text1(5) = ECHO.DataPointer
End Sub
Private Sub Command1_Click()
Dim ECHO As ICMP_ECHO_REPLY
Dim pos As Integer
Call Ping(Text2.Text, ECHO)
Text1(0) = GetStatusCode(ECHO.status)
Text1(1) = ECHO.Address
Text1(2) = ECHO.RoundTripTime & " ms"
Text1(3) = ECHO.DataSize & " bytes"
If Left$(ECHO.Data, 1) <> Chr$(0) Then
pos = InStr(ECHO.Data, Chr$(0))
Text1(4) = Left$(ECHO.Data, pos - 1)
End If
Text1(5) = ECHO.DataPointer
End Sub-ip 探测
Private Sub Command1_Click()
Dim ECHO As ICMP_ECHO_REPLY
Dim pos As Integer
Call Ping(Text2.Text, ECHO)
Text1(0) = GetStatusCode(ECHO.status)
Text1(1) = ECHO.Address
Text1(2) = ECHO.RoundTripTime & " ms"
Text1(3) = ECHO.DataSize & " bytes"
If Left$(ECHO.Data, 1) <> Chr$(0) Then
pos = InStr(ECHO.Data, Chr$(0))
Text1(4) = Left$(ECHO.Data, pos- 1)
End If
Text1(5) = ECHO.DataPointer
End Sub
(系统自动生成,下载前可以参看下载内容)
下载文件列表
ip/Form1.frm
ip/Module1.bas
ip/工程1.vbp
ip/工程1.vbw
ip
ip/Module1.bas
ip/工程1.vbp
ip/工程1.vbw
ip
本网站为编程资源及源代码搜集、介绍的搜索网站,版权归原作者所有! 粤ICP备11031372号
1999-2046 搜珍网 All Rights Reserved.