易语言如何获取外部ip

在易语言中获取外部IP地址，可以通过调用系统API或者使用网络库来实现。以下是一个使用系统API获取外部IP地址的示例代码：

```e

.版本 2

.程序集 IP获取

.子程序 获取外部IP, 整数型, 无参数

.局部变量 网络连接, 网络连接型

.局部变量 外部IP, 文本型

.局部变量 网络请求, 网络请求型

.局部变量 网络响应, 网络响应型

.局部变量 网络数据, 文本型

.局部变量 状态码, 整数型

' 创建网络连接

网络连接 = 网络连接型.创建()

如果 网络连接.失败()

' 如果创建失败，则返回错误信息

返回 -1

否则

' 连接到IP地址获取服务

网络请求 = 网络请求型.创建()

网络请求.连接("http://ip.cn", 80)

网络请求.发送()

' 接收响应

网络响应 = 网络请求.接收()

状态码 = 网络响应.状态码()

如果 状态码 == 200

' 获取响应数据

网络数据 = 网络响应.读取全部数据()

' 提取IP地址

外部IP = 网络数据.从文本中提取子串(1, 网络数据.长度())

否则

' 如果状态码不是200，则返回错误信息

返回 -1

否则

' 如果网络请求失败，则返回错误信息

返回 -1

' 关闭网络连接

网络连接.关闭()

返回 外部IP

.程序集结束

```

这段代码首先创建了一个网络连接，然后通过HTTP请求访问了一个IP地址查询服务（这里使用了`http://ip.cn`，这是一个常用的IP查询网站）。之后，从响应中提取了IP地址信息。

请注意，这段代码只是一个示例，实际使用时可能需要根据具体的服务端点（URL）和响应格式进行调整。网络操作可能会受到防火墙或网络设置的限制，因此可能需要相应的权限或配置才能成功执行。