找回密码
 加入
搜索
查看: 2170|回复: 3

[网络通信] 解析网站IP地址

[复制链接]
发表于 2017-5-2 17:51:31 | 显示全部楼层 |阅读模式
请问用哪个函数可以解析 某网站的IP地址,看了帮助也没查到,有知道的大神请赐教
发表于 2017-5-2 18:02:13 | 显示全部楼层
发表于 2017-5-7 04:45:39 | 显示全部楼层
回复 2# kk_lee69


    你这样不行哦  他是要返回网站的IP地址
发表于 2017-5-7 05:23:06 | 显示全部楼层
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Process.au3>
#NoTrayIcon
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("DOS回显", 557, 283)
$Label1 = GUICtrlCreateLabel("请输入网址:", 32, 28, 76, 17)
$Input1 = GUICtrlCreateInput("", 104, 24, 376, 21)
$Button1 = GUICtrlCreateButton("开始", 496, 24, 49, 25)
$Edit1 = GUICtrlCreateEdit("", 32, 56, 513, 201)
GUICtrlSetData(-1, "")
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFFFF)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
                        If  GUICtrlRead($Input1) = "" Then 
                                MsgBox(64,"温馨提示","网址不可为空")
                        Else
                                GUICtrlSetData($Edit1,"")
                                _RunDos("ping "&GUICtrlRead($Input1) &">%temp%\ip.txt")
                                GUICtrlSetData($Edit1,"正在努力加载,请稍后......")
                                Sleep(500)
                                GUICtrlSetData($Edit1,"")
                                $a=FileRead(@TempDir&"\ip.txt")
                                GUICtrlSetData($Edit1,$a)
                                EndIf
        EndSwitch
WEnd


        

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-3-28 23:33 , Processed in 0.082535 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表