易语言内存读取获得当前PC已经登陆微信号的代码

取当前PC登陆微信号的代码

此功能需要加载精易模块5.6

.版本 2

.程序集窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕

.局部变量局部_登陆个数, 整数型

.局部变量局部_微信号, 文本型, , "0"

.局部变量 i, 整数型

局部_登陆个数＝取当前登陆微信号 (局部_微信号)

.计次循环首 (局部_登陆个数, i)

微信号编辑框.内容＝ “当前PC登陆微信号:” ＋局部_微信号 [i]

.计次循环尾 ()

.子程序取当前登陆微信号, 整数型, , 成功返回登陆个数，失败返回0

.参数微信号数组, 文本型, 数组, 数组

.局部变量局部_特征码, 字节集

.局部变量局部_进程ID数组, 整数型, , "0"

.局部变量局部_登陆个数, 整数型

.局部变量局部_计次, 整数型

.局部变量局部_计次1, 整数型

.局部变量局部_搜索结果, 整数型, , "0"

.局部变量局部_地址, 整数型

.局部变量局部_搜索结果个数, 整数型

.局部变量局部_微信号, 文本型

局部_特征码＝编码_Ansi到Unicode (“\Msg\”)

局部_登陆个数＝进程_取同名ID (“WeChat.exe”, 局部_进程ID数组)

.计次循环首 (局部_登陆个数, 局部_计次)

局部_搜索结果个数＝内存.搜索 (局部_进程ID数组 [局部_计次], 局部_特征码, 局部_搜索结果)

.计次循环首 (局部_搜索结果个数, 局部_计次1)

局部_地址＝局部_搜索结果 [局部_计次1] － 50

局部_微信号＝文本_取出中间文本 (编码_Unicode到Ansi (内存.读字节集 (局部_进程ID数组 [局部_计次], 局部_地址, 200)), “Files\”, “\Msg\”)

.如果真 (局部_微信号 ≠ “”)

加入成员 (微信号数组, 局部_微信号)

跳出循环 ()

.如果真结束

.计次循环尾 ()

返回 (取数组成员数 (微信号数组))

运行结果：

总结