某音WED端取UID - 精易论坛

窗口程序集名	保留	保留	备注
程序集1

子程序名	返回值类型	公开	备注
_启动子程序	整数型		请在本子程序中放置动态链接库初始化代码

_临时子程序 () ' 在初始化代码执行完毕后调用测试代码
返回 (0) ' 返回值被忽略。

子程序名	返回值类型	公开	备注
_临时子程序

变量名	类型	静态	数组	备注
局_网址	文本型

' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
局_网址＝ “https://www.douyin.com/user/MS4wLjABAAAAXL71ObyDmA4_8XJFxQziipEZSCQV1e-l1yuiC5kLY5g?relation=0&vid=7169892236178623752”
抖音_获取UID (局_网址, , , )

子程序名	返回值类型	公开	备注
抖音_获取UID	逻辑型		本命令由【精易网页调试助手】生成，请配合精易模块使用。
参数名	类型	参考	可空	数组	备注
URL	文本型				主页地址 https://www.douyin.com/user/MS4wLjABAAAA_pVaKM_3wDhqDc4qNaHfbBx4WUPmLIZ4OZFOpWrJ81IKOBtyl8g7rNIJdWqxvpqD
uid	文本型				uid
secUid	文本型
uniqueId	文本型				抖音号
nickname	文本型				昵称
desc	文本型				简介

变量名	类型	静态	数组	备注
WinInet	WinInet
局_返回	文本型

' https://www.douyin.com/user/MS4wLjABAAAA_pVaKM_3wDhqDc4qNaHfbBx4WUPmLIZ4OZFOpWrJ81IKOBtyl8g7rNIJdWqxvpqD
WinInet.Open (“GET”, URL)
WinInet.SetCookie (“__ac_nonce=063872868005daf59fd11; __ac_signature=_02B4Z6wo00f01s9PiOAAAIDD5MXTJSLqwM7Pb4xAANBh37; __ac_referer=__ac_blank”)
WinInet.SetUserAgent (“Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36”)
WinInet.Send (, , )
局_返回＝ WinInet.GetResponseText ()
局_返回＝文本_取出中间文本 (局_返回, “%22uid%22%3A%22”, “%22%2C%22customVerify”, , )
' 3800385122993960","secUid":"MS4wLjABAAAA_pVaKM_3wDhqDc4qNaHfbBx4WUPmLIZ4OZFOpWrJ81IKOBtyl8g7rNIJdWqxvpqD","shortId":"0","nickname":"读书教育","desc":"","gender":0,"avatarUrl":"//p3-pc.douyinpic.com/aweme/100x100/aweme-avatar/tos-cn-avt-0015_89ebe075a448e91784436887933419ef.jpeg?from=2956013662
局_返回＝编码_utf8到gb2312 (编码_URL解码 (局_返回, ))
调试输出 (局_返回)
uid ＝文本_取左边 (局_返回, #引号＋ “,” ＋ #引号, 1, )
secUid ＝文本_取出中间文本 (局_返回, “secUid” ＋ #引号＋ “:” ＋ #引号, #引号＋ “,” ＋ #引号, 1, )
nickname ＝文本_取出中间文本 (局_返回, “nickname” ＋ #引号＋ “:” ＋ #引号, #引号＋ “,” ＋ #引号, , )
desc ＝文本_取出中间文本 (局_返回, “desc” ＋ #引号＋ “:” ＋ #引号, #引号＋ “,” ＋ #引号, 1, )
desc ＝子文本替换 (desc, “\n”, #换行符, , , 真)
uniqueId ＝文本_取右边 (局_返回, “uniqueId” ＋ #引号＋ “:” ＋ #引号, 1, )
调试输出 (uid, secUid, nickname, desc, uniqueId)

如果 (uid ＝ “” 或 secUid ＝ “”)

返回 (假)

返回 (真)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br />
.支持库 spec<br />
<br />
.程序集 程序集1<br />
<br />
.子程序 _启动子程序, 整数型, , 请在本子程序中放置动态链接库初始化代码<br />
<br />
<br />
_临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码<br />
返回 (0)  ' 返回值被忽略。<br />
<br />
.子程序 _临时子程序<br />
.局部变量 局_网址, 文本型<br />
<br />
' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。<br />
局_网址 ＝ “https://www.douyin.com/user/MS4wLjABAAAAXL71ObyDmA4_8XJFxQziipEZSCQV1e-l1yuiC5kLY5g?relation=0&vid=7169892236178623752”<br />
<br />
抖音_获取UID (局_网址, , , )<br />
<br />
.子程序 抖音_获取UID, 逻辑型, , 本命令由【精易网页调试助手】生成，请配合精易模块使用。<br />
.参数 URL, 文本型, , 主页地址 https://www.douyin.com/user/MS4wLjABAAAA_pVaKM_3wDhqDc4qNaHfbBx4WUPmLIZ4OZFOpWrJ81IKOBtyl8g7rNIJdWqxvpqD<br />
.参数 uid, 文本型, 可空, uid<br />
.参数 secUid, 文本型, 可空<br />
.参数 uniqueId, 文本型, 可空, 抖音号<br />
.参数 nickname, 文本型, 可空, 昵称<br />
.参数 desc, 文本型, 可空, 简介<br />
.局部变量 WinInet, WinInet<br />
.局部变量 局_返回, 文本型<br />
<br />
' https://www.douyin.com/user/MS4wLjABAAAA_pVaKM_3wDhqDc4qNaHfbBx4WUPmLIZ4OZFOpWrJ81IKOBtyl8g7rNIJdWqxvpqD<br />
WinInet.Open (“GET”, URL)<br />
WinInet.SetCookie (“__ac_nonce=063872868005daf59fd11; __ac_signature=_02B4Z6wo00f01s9PiOAAAIDD5MXTJSLqwM7Pb4xAANBh37; __ac_referer=__ac_blank”)<br />
WinInet.SetUserAgent (“Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36”)<br />
WinInet.Send (, , )<br />
局_返回 ＝ WinInet.GetResponseText ()<br />
局_返回 ＝ 文本_取出中间文本 (局_返回, “%22uid%22%3A%22”, “%22%2C%22customVerify”, , )<br />
' 3800385122993960","secUid":"MS4wLjABAAAA_pVaKM_3wDhqDc4qNaHfbBx4WUPmLIZ4OZFOpWrJ81IKOBtyl8g7rNIJdWqxvpqD","shortId":"0","nickname":"读书教育","desc":"","gender":0,"avatarUrl":"//p3-pc.douyinpic.com/aweme/100x100/aweme-avatar/tos-cn-avt-0015_89ebe075a448e91784436887933419ef.jpeg?from=2956013662<br />
局_返回 ＝ 编码_utf8到gb2312 (编码_URL解码 (局_返回, ))<br />
调试输出 (局_返回)<br />
uid ＝ 文本_取左边 (局_返回, #引号 ＋ “,” ＋ #引号, 1, )<br />
secUid ＝ 文本_取出中间文本 (局_返回, “secUid” ＋ #引号 ＋ “:” ＋ #引号, #引号 ＋ “,” ＋ #引号, 1, )<br />
nickname ＝ 文本_取出中间文本 (局_返回, “nickname” ＋ #引号 ＋ “:” ＋ #引号, #引号 ＋ “,” ＋ #引号, , )<br />
desc ＝ 文本_取出中间文本 (局_返回, “desc” ＋ #引号 ＋ “:” ＋ #引号, #引号 ＋ “,” ＋ #引号, 1, )<br />
desc ＝ 子文本替换 (desc, “\n”, #换行符, , , 真)<br />
uniqueId ＝ 文本_取右边 (局_返回, “uniqueId” ＋ #引号 ＋ “:” ＋ #引号, 1, )<br />
调试输出 (uid, secUid, nickname, desc, uniqueId)<br />
.如果 (uid ＝ “” 或 secUid ＝ “”)<br />
    返回 (假)<br />
.否则<br />
    返回 (真)<br />
.如果结束