举报
Local $Url="192.168.0.1:8888" Local $IP,$Port Local $i,$c $i=1 While 1 $c=StringMid($Url,$i,1) If $c<>":" Then $i=$i+1 Else ExitLoop EndIf WEnd $IP=StringMid($Url,1,$i-1) $Port=StringMid($Url,$i+1) MsgBox(0,"","IP="&$IP&@CRLF&"Port="&$Port)
原帖由 skyfree 于 2008-8-23 11:49 发表 [au3]Local $Url="192.168.0.1:8888" Local $IP,$Port Local $i,$c $i=1 While 1 $c=StringMid($Url,$i,1) If $c":" Then $i=$i+1 Else ExitLoop EndIf WEnd $IP=StringMid($Url,1,$i-1) $Po ...
本版积分规则 发表回复 回帖后跳转到最后一页
|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度
GMT+8, 2025-2-23 20:49 , Processed in 0.079307 second(s), 19 queries .
Powered by Discuz! X3.5 Licensed
© 2001-2024 Discuz! Team.