易语言生成短链接代码

.版本 2

.子程序 __启动窗口_创建完毕
'添加并使用《精易模块》
Send_API ()

.子程序 Send_API
.局部变量 REQU_Data, 文本型, , , 提交字符串
.局部变量 return, 文本型, , , 返回字符串
.局部变量 API_URL, 文本型, , , 接口地址
.局部变量 API_KEY, 文本型, , , 接口密钥

API_URL ＝ “https://www.maitanbang.com/api/duanurl/index”
API_KEY ＝ “UvmkF8vNdyTzCACN5XeMIEzxS2”
REQU_Data ＝ “&url=” + 编码_URL编码(“www.baidu.com”,真,真)
return ＝ 编码_Utf8到Ansi (网页_访问 (API_URL, 1, “key=” + API_KEY + REQU_Data, , , “User-Agent: Mozilla/5.0 (Windows NT 10.0; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/69.0.3497.100 Safari/537.36”))
输出调试文本 (return)