跳到主要内容

zm.GetIPNet 获取外网IP

🎯功能​

获取外网IP地址等信息, 根据参数决定返回内容

📜语法​

结果 = zm.GetIPNet([返回格式[, 接口[, 缓存 ] ] ])

📥参数​

参数数据类型解释
返回格式数值型可选, 填写0表示只返回ip地址字符串, 填写大于0的数字表示返回详细信息表, 包括省份等内容, 不同数字代表不同接口的返回值, -1表示测试所有接口并输出结果, 省略默认为0
接口数值型可选, 仅在返回格式为0时有效, 0时表示随机接口, 大于0时表示指定接口, 不同数值代表不同接口, 省略默认为0
缓存布尔型可选, 是否强制获取最新数据, true是刷新缓存获取最新数据, false是以接口自身设定为准, 省略默认为false

📤返回​

字符串 或 表 , 返回ip或详细信息表, 由参数返回格式决定返回内容, 失败返回null

💡示例​

Import "zm.luae" //导入插件,只需执行一次
zm.Init  //初始化插件,只需执行一次

//强烈建议使用默认参数直接获取ip, 内置数十个接口, 保证稳定性
Dim ip = zm.GetIPNet()
TracePrint "我的ip是:", ip

//不同接口的返回值格式与内容均有所不同, 由于部分接口可能不稳定, 故不推荐使用此方法
Dim ipt
For i = 1 to 7
  ipt = zm.GetIPNet(i)
  If ipt Then
    TracePrint "接口", i, zm.VarInfo(ipt)
  Else
    TracePrint "接口", i, "获取ip失败"
  End If
Next

📘备注​

  • V1.1818: 加入命令
  • V3.1833: 增加多个接口, 提高获取ip稳定性
  • V4.2015: 更新部分接口
  • V4.2025: 取消内置失败时循环获取功能, 加入接口参数
  • v4.2118: 加入是否强制刷新缓存参数
  • V4.2402: 返回格式填-1时, 将测试所有接口并输出结果供参考