内存获取TIM和QQ的在线账号易语言源码下面就是所有代码，大家可以直接复制粘贴了。鬼谷源码站首发

1. .版本 2
   
2. 
   
3. .子程序 获取本机在线QQ, 整数型
   
4. .参数 返回QQ, 文本型, 参考 数组
   
5. .局部变量 返回TIM进程ID, 整数型, , "0"
   
6. .局部变量 i, 整数型
   
7. .局部变量 读取的数据, 文本型
   
8. .局部变量 类_内存, 类_内存
   
9. 
   
10. 清除数组 (返回QQ)
    
11. .如果真 (进程_是否存在 (“TIM.exe”, 真) 且 文件_取文件版本号 (进程_取路径 (进程_名取ID (“TIM.exe”))) ＝ “3.4.8.22092”)
    
12.     进程_取同名ID (“TIM.exe”, 返回TIM进程ID, 真)
    
13.     .计次循环首 (取数组成员数 (返回TIM进程ID), i)
    
14.         ' 调试输出 (文件_取文件版本号 (进程_取路径 (返回TIM进程ID <i>), ))
    
15.         读取的数据 ＝ 类_内存.读文本 (返回TIM进程ID <i>, 进程_取模块句柄1 (返回TIM进程ID <i>, “SSOHelpSdk.dll”) ＋ 进制_十六到十 (“482800”), 20)
    
16.         .如果真 (读取的数据 ≠ “0”)
    
17.             加入成员 (返回QQ, 读取的数据)
    
18.         .如果真结束
    
19. 
    
20.     .计次循环尾 ()
    
21. .如果真结束
    
22. .如果真 (进程_是否存在 (“QQ.exe”, 真) 且 文件_取文件版本号 (进程_取路径 (进程_名取ID (“QQ.exe”))) ＝ “9.7.17.29225”)
    
23.     进程_取同名ID (“QQ.exe”, 返回TIM进程ID, 真)
    
24.     .计次循环首 (取数组成员数 (返回TIM进程ID), i)
    
25.         读取的数据 ＝ 类_内存.读文本 (返回TIM进程ID <i>, 进程_取模块句柄1 (返回TIM进程ID <i>, “SSOHelpSdk.dll”) ＋ 进制_十六到十 (“48EF80”), 20)
    
26.         .如果真 (读取的数据 ≠ “0”)
    
27.             加入成员 (返回QQ, 读取的数据)
    
28.         .如果真结束
    
29. 
    
30.     .计次循环尾 ()
    
31. .如果真结束
    
32. 返回 (取数组成员数 (返回QQ))