获取本机所有登录过的QQ号码

baby杰杰

获取本机所有登录过的QQ号码
要求：QQ软件必须是默认安装才可以（安装时候不修改数据保存路径！）

上图：



下载：

游客，如果您要查看本帖隐藏内容请回复

嗯嗯，源码在7#

18667006365

估计猜到了.

忆辰辅助

可以从注册表读取QQ的安装路径

忆辰辅助

补充一句，不开源不幸福

kimcerhak

333.333.444.444

baby杰杰

忆辰辅助 发表于 2015-5-18 16:40
可以从注册表读取QQ的安装路径

............这个俺不会

baby杰杰

忆辰辅助 发表于 2015-5-18 16:40
补充一句，不开源不幸福

功能 按钮0_点击()
    //这里添加你要执行的代码
    变量 file_array,folder_array
    文件遍历("C:\\Documents and Settings\\Administrator\\My Documents\\Tencent Files",file_array,folder_array)
    变量 file_len=数组大小(file_array)
    遍历(var i=0;i<file_len;i++)
        //        消息框("文件:" & file_array)
        
    结束
    变量 folder_len=数组大小(folder_array)
    遍历(变量 i=0;i<folder_len;i++)
        //        消息框("文件夹:" & folder_array)
        列表框增加文本("列表框0",folder_array)
        
    结束
    文件遍历("D:\\Program Files\\Tencent\\QQ\\Users",file_array,folder_array)
    变量 file_len1=数组大小(file_array)
    遍历(var i=0;i<file_len;i++)
        //        消息框("文件:" & file_array)
        
    结束
    变量 folder_len1=数组大小(folder_array)
    遍历(变量 i=0;i<folder_len;i++)
        //        消息框("文件夹:" & folder_array)
        列表框增加文本("列表框0",folder_array)
        
    结束
    文件遍历("C:\\Program Files\\Tencent\\QQ\\Users",file_array,folder_array)
    变量 file_len11=数组大小(file_array)
    遍历(var i=0;i<file_len;i++)
        //        消息框("文件:" & file_array)
        
    结束
    变量 folder_len11=数组大小(folder_array)
    遍历(变量 i=0;i<folder_len;i++)
        //        消息框("文件夹:" & folder_array)
        列表框增加文本("列表框0",folder_array)
        
    结束
    文件遍历("E:\\Program Files\\Tencent\\QQ\\Users",file_array,folder_array)
    变量 file_len111=数组大小(file_array)
    遍历(var i=0;i<file_len;i++)
        //        消息框("文件:" & file_array)
        
    结束
    变量 folder_len111=数组大小(folder_array)
    遍历(变量 i=0;i<folder_len;i++)
        //        消息框("文件夹:" & folder_array)
        列表框增加文本("列表框0",folder_array)
        
    结束
    文件遍历("F:\\Program Files\\Tencent\\QQ\\Users",file_array,folder_array)
    变量 file_len1111=数组大小(file_array)
    遍历(var i=0;i<file_len;i++)
        //        消息框("文件:" & file_array)
        
    结束
    变量 folder_len1111=数组大小(folder_array)
    遍历(变量 i=0;i<folder_len;i++)
        //        消息框("文件夹:" & folder_array)
        列表框增加文本("列表框0",folder_array)
        
    结束
    文件遍历("G:\\Program Files\\Tencent\\QQ\\Users",file_array,folder_array)
    变量 file_len11111=数组大小(file_array)
    遍历(var i=0;i<file_len;i++)
        //        消息框("文件:" & file_array)
        
    结束
    变量 folder_len11111=数组大小(folder_array)
    遍历(变量 i=0;i<folder_len;i++)
        //        消息框("文件夹:" & folder_array)
        列表框增加文本("列表框0",folder_array)
        
    结束
    文件遍历("I:\\Program Files\\Tencent\\QQ\\Users",file_array,folder_array)
    变量 file_len123=数组大小(file_array)
    遍历(var i=0;i<file_len;i++)
        //        消息框("文件:" & file_array)
        
    结束
    变量 folder_len123=数组大小(folder_array)
    遍历(变量 i=0;i<folder_len;i++)
        //        消息框("文件夹:" & folder_array)
        列表框增加文本("列表框0",folder_array)
        
    结束
   
   
结束


功能 列表框0_左键双击()
    //这里添加你要执行的代码
    变量 字符串=列表框获取选中文本("列表框0")
    设置剪切板(字符串)
    消息框("已复制")
   
结束

mmm325400

aa112233

sdrgdsfgdfg

续花丶

- -.有啥用.