'Code by Netpatch
On Error Resume next
Url="http://www.ip138.com/ip2city.asp"
Set NP = Createobject("Microsoft.XMLHTTP") '/创建XMLTTP实例
NP.Open "GET", url, False
NP.Send
Data=NP.responsebody '/获取页面数据
Set NP = Nothing
Data = bytes2BSTR(Data) '/把数据进行转换(防止乱码),为IP地址的定位做铺垫
Here = InstrRev(Data, "您的IP地址是:", -1,0) '/IP位置的大概定位
Data = Mid(Data,Here+8,15) '/以特殊字符串位置为开始向后获取15位
Hers = InstrRev(data, "[",-1,0) '/取得的15位数据中[位置
Data=Mid(Data,Hers+1,15)
Hers = InstrRev(data, "]",-1,0) '/取得的15位数据中]位置
Data=Mid(Data,1,Hers-1)
Set ICEhack = CreateObject("InternetExplorer.Application") '/创建 Inernet Explorer 实例
ICEhack.Navigate("about:blank") '/打开一个空白页
If Hers <> 0 Then '/如果取得的15位数据中存在[
ICEhack.document.parentwindow.clipboardData.SetData "text", Data
Wscript.Echo "已经复制本机外网IP:"&Data&" 到您的剪切板!"
End If
ICEhack.Quit
'Code By N/P
Function bytes2BSTR(vIn)
strReturn = ""
For i = 1 To LenB(vIn)
ThisCharCode = AscB(MidB(vIn,i,1))
If ThisCharCode < &H80 Then
strReturn = strReturn & Chr(ThisCharCode)
Else
NextCharCode = AscB(MidB(vIn,i+1,1))
strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
i = i + 1
End If
Next
bytes2BSTR = strReturn
End Function
分享到:
相关推荐
腾讯云DDNS脚本,家里是公网IP的宽带可以自动更新公网IP,sh脚本可以在linux或者window运行
1)本工具自动获取本地局域网的公网IP。2)当公网IP变化时或定时时间到时自动发送邮件到指定邮箱。3)可以设置发送邮箱账号、接收邮箱账号及密码。SMTP服务器及端口号可设置。支持QQ、163等主流SMTP服务器。4)支持...
功能: 在私网内检测公网出口ip变化,并邮件通知私人邮件 使用技术: shell 脚本、linux系统知识 背景: 因为家里是nas服务器,使用的是联通网络...这样能随时知道公网ip变化,以便能实时通过公网ip访问家里的私有云。
非常适合家里有群晖NAS但是只有公网IPv6的家庭宽带。绝对是优秀的DDNS方案。 本脚本的工作流程是:对比云端解析记录-> 不存在则添加 -> 存在则更新。 脚本运行依赖:curl、openssl (注:群晖NAS环境默认自带这些...
这是一个用于linux的Python脚本,运行脚本,则将本机的IP地址、CPU信息发送到脚本中指定邮箱中。 可用于定位丢失的树莓派电脑(也可以用于其它linux系统)。
openwrt脚本:判断是否获取到公网IP,否则重新拨号 添加到开机脚本和计划脚本(每分钟执行一次): * * * * * nohup bash /mnt/sdb1/bin/pppoe-ip.sh &
IP数据库脚本,大概50多万条数据,包含50多万个公网IP和对应的城市,运营商
aliyun-ddns自动解析域名ip支持ipv6服务器nodejs脚本linux版本 使用说明: 一、获取阿里AccessKey ID和AccessKey Secret。 二、修改config.json配置,填写AccessKey ID、AccessKey Secret、域名地址、解析类型【默认...
禁止国外IP地址防火墙。(centos6/7使用) 包含2个文件。一个是国内(中国)地址集,一个是自动加载脚本。把国内地址和当前机器上连接的地址加入白名单。每次重启机器会自动加载白名单。vos软交换、asterisk、...
IP INFO,可以获取本地的IP地址,DNS地址,也可以查询公网的IP地址
文件夹折叠是由不同种类的语言组织的,目前我只提供了一些python脚本和三个api接口 , , 。 ├── LICENSE├── README.md└── python ├── db-ip.py ├── ip-api.py └── ip2location.py参考
脚本绑定到场景对象上,结合天气数据库 WeatherAdCode.txt(放到Resources文件下)
公网IP暴露后遭到大量的SSH爆破尝试,烦不胜烦,如果不注意,被攻破也是有可能的,所以写了这个脚本,可以拒绝恶意IP的ssh尝试。
PublicMonitors 0.1这个脚本的主要目标是以甲方安全人员的视角,对IP列表进行定时端口服务扫描,及时发现对外违规开放服务和存在风险的服务端口,并生成excel结果,进行邮件通知。Author咚咚呛如有其他建议,可联系...
主要为大家详细介绍了python实现自动获取IP并发到邮箱,具有一定的参考价值,感兴趣的小伙伴们可以参考一下
公网ip搭建服务器,ip动态总是变化不定 此脚本可以根据当前变化的ip同步至CloudFlare 动态设置当前变化后的ip
如名称所见,获取外网IP并发送到指定邮箱,这个脚本比较短小,但不如脚本之家提供的au3脚本功能强大,不过每次电脑开机记录一下还是不错的
python写的namesilo动态域名解析脚本,使用此脚本的前提条件是需要已经拥有一个namesilo域名。将脚本内的参数修改为自己的参数,在系统下设置定时运行任务。支持IPv4公网IP地址和IPv6公网地址
frp内网穿透工具,附frp服务端、客户端自动拉起脚本。 支持TCP,UDP,HTTP,HTTPS等协议类型。 适用情况:实现内网服务通过端口映射的方式暴露在公网环境里。要求:有一台有公网IP的服务器。
而使用ASDL拨号上网的宽带来说一般公网IP都不会固定的,会随时变更公网IP,所以此脚本正是解决此需求。 说明 脚本运行前需要先安装aliyun-python-sdk-core 和aliyun-python-sdk-slb 2个sdk,并且在阿里云账户里面...