您现在的位置: 天下网吧 >> 网吧天地 >> 天下码农 >> 微信小程序 >> 正文

用Visual C++设计QQ群管理工具

2010-12-28vczx佚名

一、问题的提出

  偶是两个QQ群的管理员,平常都是在群里跟其它人交流.当然啦,因为偶是管理员,就要承担起管理员的责任.在实际中,会碰到两个问题:

  1、我的两个群都很热,有很多人加入,这样,不用很快,群里的人就达到了上限200人了,就不能再让新的人加入.

  2、平常有些人加入只是为了发广告,整天在这里发一些与群的主题不相关的内容.或者是有的人的QQ中毒了,老是不时发一些有病毒的链接.

  对于这两个问题,我是这么的解决的.

  1、当人数达到上限时,我就让群里的人都在群的名字前面加上一些特别的符号,比如:@%#%&^*,总之就是一些一般人不会用在自己群的名字的符号吧,以这些符号作为标志,识别哪些人是长期没有在群里发言的人.把这个改名的要求发在群的公告里,对于那些长期没有上线的人,当然看不到群的公告,也就不会改群的名片了.我以这些符号作为标志,清除那些长期不上线的人,留些空间,让新人能加进来.

  2、对于那些乱发信息的人,当然就是立即T出群里啦.

  这两种的做法都是把人给T出群里,但是在实际操作中却很麻烦了. 对于第一种情况,有些人把那个特别的符号放在群名字中的某个地方,比如,要求把@加在名字前面,有个名字叫天使,本来按照要求,改名后就变为@天使,但这个人却很有个性,他把名字改为天@使,对于这些人,当然可以不管三七二十一,一律当成是没有改名,把他T出群外啦.但是考虑到这个人还是有看到公告的,还是让他留下来吧,但这样就苦了我这个当管理员的啦,在200个人里面,一个个的看哪个人的名字不符合公告的要求.人这么多,把我都看到眼花聊乱的了.既要把人T走,又不好T错了.做这样的事,也真是费功夫的. 对于第二种情况,也是一样的,因为聊天信息的那个窗口里,只能看到这个人的名字和QQ号,为了把这个人T了,还得在群设置里,一个个人的去对,找那个QQ 号,实在是痛苦,都是数字,要很细心一个个的核对,一不小心就把这个号给漏了过去,又得重新找一遍了,有好几次,我都是找了三次以上才把那个QQ号才找出来.为此,我想做一个工具,只要输入QQ号,就可以把人T走了.最初,我是想抓取QQ把群里的人T走时的数据包来分析一下.知道了这个数据包消息的格式后,我就可以仿造一个消息,直接的向QQ服务器发过去,就可以把人给T了.我用工具把T人时的数据包抓取一下,全部都是乱码的.因为QQ的消息格式并没有公开,把以分析起来真的是头痛了,都无从下手了,只好把这个想法放弃了.我又想了一下,既然我不能发这样的数据包,那就直接让QQ自己发这个包吧.为了要让QQ把T人的包给发出去,就得从QQ自己的界面入手,输入QQ号后,能在群设置里直接的定位到要T的QQ号,这样就不用人工的去找这个QQ号,省却了去找这个QQ号的痛苦了.

  二、问题的分析

  我在实现时使用的是TM2006新春版,在群聊天的窗口里点工具务栏上的"群设置",弹出了"群设置"窗口,在这个窗口里,选择"成员列表"这一项,右边有一个list,这个list就包含有所有的成员了,当选中了某个人后,就可把它T了.

  

  图一 群设置窗口

  现在的问题是要先把想T的人找出来.怎么样在list中把想T的人给找出来呢,我的想法是枚举这个list里所有人的QQ号,然后跟想要T的QQ号作比较,如果有相同的,就把list里的这一项选中,然后我们就可以进一步的操作了.那现在就可以把问题转化为,枚举list,获得list里的项的信息.我用spy++查看了一下那个"群设置"窗口,如图所示:

  

  图二 用spy++查看的窗口关系

  最顶层的就是那个"群设置"窗口了,那个显示成员的list原来是一个syslistview32类型的控件,包含在一个类型为"#32770"的 dialog中,我们只要顺着最顶层的窗口中,一层层的窗口找下去就可以得到我个想要的那个list窗口的名柄了,呵呵,之后,就可以向这个list发出消息,让它干活了.想到这,偶心时狂喜了一阵子.但是在实现过程中却是不是那么的顺利的.在顶层窗口中找那个list的句柄,并不是什么困难的事.把桌面上的把有窗口都枚举一遍,就要以找到窗口名为”群设置”的窗口了.

EnumWindows(EnumWindowsProc,0);//枚举所有的窗口

BOOL CALLBACK EnumWindowsProc(HWND hwnd, LPARAM lParam)
{
 TCHAR buff[1000];
 int buffsize(100),nPosition(-1);
 HWND hQQWnd=NULL;
 ::GetWindowText(hwnd,buff,buffsize);
 if (strlen(buff)<1)
  return TRUE;
 CString str(buff);
 nPosition=str.Find(_T("群设置")); //这里设置要找的窗口名
 if(nPosition!=-1)
  EnumChildWindows(hwnd,ChildWndProc,0);//继续找子窗口
  return TRUE;
}

//枚举包含有syslistview32的类型为#32770的窗口的句柄

BOOL CALLBACK ChildWndProc(HWND hwnd, LPARAM lParam)
{
 LPTSTR lptstr;
 HGLOBAL hglb=NULL;
 char className[CLASS_SIZE];
 if (GetClassName(hwnd,className,CLASS_SIZE)==0)
  return TRUE;
 CString str(className);
 HWND hChild = GetWindow(hwnd, GW_CHILD);
 if (GetClassName(hChild,className,CLASS_SIZE)==0)
  return TRUE;
 CString strChildName(className);
 //顶层窗口下有四个类型都为”#32770”的dialog,其中只有其中一个
 //才是包括有成员列表的
 while (str != _T("#32770") || strChildName != _T("SysListView32"))
 {
  HWND h1= GetNextWindow(hwnd, GW_HWNDNEXT);
  GetClassName(h1,className,CLASS_SIZE);
  str = className;
  hwnd = h1;
  hChild = GetWindow(hwnd, GW_CHILD);
  if (GetClassName(hChild,className,CLASS_SIZE)==0)
   return TRUE;
  strChildName =className;
 }
 EnumChildWindows(hwnd,DeleWndProc,0);//在包含syslistview的dialog中继续找
}

  找到了包含有syslistview的窗口后,就继续找syslistview了,然后可以向它发送命令消息了.这是整个程序的关键部分,先把代码给出来,我再进行解释.

#define CLASS_SIZE 4096
BOOL CALLBACK DeleWndProc(HWND hwnd, LPARAM lParam)
{
 LPTSTR lptstr;
 HGLOBAL hglb=NULL;
 char className[CLASS_SIZE];
 if (GetClassName(hwnd,className,CLASS_SIZE)==0)
  return TRUE;
 CString str(className);
 char sz[254] ="\0";
 if (_T("SysListView32") == str)
 {
  int iItem=0;
  int iFoundFlag = 0;//if find the qq number, iFoundFlag = 1;else 0;
  LVITEM lvitem,lvitem1, *plvitem,*plvitem1;
  DWORD PID;
  HANDLE hProcess;
  char ItemBuf[512],*pItem;
  GetWindowThreadProcessId(hwnd, &PID);
  hProcess=OpenProcess(PROCESS_ALL_ACCESS,false,PID);
 if (!hProcess)
 {
  MessageBox(NULL,"获取进程句柄操作失败!","错误!",NULL);
 }
 else
 {
  plvitem=(LVITEM*)VirtualAllocEx(hProcess, NULL, sizeof(LVITEM), MEM_COMMIT, PAGE_READWRITE);
  plvitem1=(LVITEM*)VirtualAllocEx(hProcess, NULL, sizeof(LVITEM), MEM_COMMIT, PAGE_READWRITE);
  pItem=(char*)VirtualAllocEx(hProcess, NULL, 5120, MEM_COMMIT, PAGE_READWRITE);
  if (!plvitem)
  {
   MessageBox(NULL,"无法分配内存!","错误!",NULL);
  }
  else
  {
   int nItemCount = ::SendMessage(hwnd, LVM_GETITEMCOUNT, 0 ,0);
   lvitem.mask=LVIF_TEXT;
   lvitem.cchTextMax=512;
   lvitem.iSubItem=1; //ProcessName
   lvitem.pszText=pItem;
   WriteProcessMemory(hProcess, plvitem, &lvitem, sizeof(LVITEM), NULL);
   lvitem1.state=LVIS_SELECTED;
   lvitem1.stateMask=LVIS_SELECTED;
   WriteProcessMemory(hProcess, plvitem1, &lvitem1, sizeof(LVITEM), NULL);
   for(; iItem<NITEMCOUNT; p iItem++)
   {
    SendMessage(hwnd, LVM_GETITEMTEXT, (WPARAM)iItem, (LPARAM)plvitem);
    ReadProcessMemory(hProcess, pItem, ItemBuf, 512, NULL);
    CString strItem(ItemBuf);
    //strQQNum就是要找的QQ号码了
    if(strQQNum == strItem)
    {
     SendMessage(hwnd, LVM_SETITEMSTATE, (WPARAM)iItem, (LPARAM)plvitem1);
     iFoundFlag = 1;
     break;
    }
   }
   if(0 == iFoundFlag)
   {
    CString str;
    str = "没有找到QQ号:\n";
    str += strQQNum;
    MessageBox(NULL, str, "提醒", NULL);
   }
  }
 }
 CloseHandle(hProcess);
 VirtualFreeEx(hProcess, pItem, 0, MEM_RELEASE);
 VirtualFreeEx(hProcess, plvitem1,0, MEM_RELEASE);
 VirtualFreeEx(hProcess, plvitem, 0, MEM_RELEASE);
}
return TRUE;
}

  DeleWndProc函数主要是把枚举syslistview32的项,查找出我们想要找的QQ号,并选中. 最初时我是尝试用以下的代码去得到list的item的内容的.

TCHAR szText[100];
LV_ITEM lvi;
lvi.mask = LVIF_TEXT;
lvi.iItem = nIndex;
lvi.iSubItem = 0;
lvi.pszText = szText;
lvi.cchTextMax = 100;
ListView_GetItem(hwndLV, &lvi);

  但却会报错误,存取错误,也就是说内存方面的问题了.问题定位到了ListView_GetItem(hwndLV, &lvi);这一句了.后来我查找了很多资料才知道为什么会有错误.因为我的程序与TM的程序是分别属于不同的Progress,我在自己的程序的进程中申请了lvi的内存空间,却希望把TM进程往这个内存空间去写入数据,当然是会有错误啦. Windows用到了虚存这个概念,它让每个程序都觉得自己占有2G的内存,每个程序都把自己用到的数据放在这2G的内存中去运行.每个程序间的内存空间是互不相干的,这样,如果某个程序出现了问题,也不会影响到其它程序的运行了.ListView_GetItem要往TM的程序里写数据,当然这样的数据只能保存在TM这个程序的内存空间里了.我们可以用VirtualAllocEx这个函数在TM这个程序运行的内存片中申请内存空间,这样 ListView_GetItem就可以向这个新申请的空间中写入数据了.然后,我们再用ReadProcessMemory函数把新申请的空间中的数据读到自己程序进程里的缓冲区中去,采用了一个曲折的办法,实现了不同进程的数据交换.最后当然要把申请的空间用VirtualFreeEx释放,要不就会有内存泄漏了.

  三、问题的解决

  至此,再回头看看文中开头提到的两个问题. 1查找到有特殊标志的QQ号的名字,只要修改DeleWndProc中的匹配QQ号的语句就行了.这个纯粹是一个字符串的匹配了. 2查找指写的的QQ号. DeleWndProc已经是查找指定的QQ号了.示例程序给出的就是这种情况. 当已经找到指定的项时,就可以向那个删除成员Button发出一个BM_Click的消息了,呵呵,人就给T了.这个也不难实现,也照样的找到这个按钮的 HWND,用SendMessage就可以把消息发送过去了.至此就解决了开头提出的两个问题了. 在查找群设置的窗口时,也可以用FindWindow和FindWindowEx来得到syslistview32的句柄.

  四、后续工作

  我在把程序也给另一个管理员用的时候,他给我提出要实现以下的功能: 输入被T的QQ号,软件自动搜索自己是管理员的群,软件能在自己是管理员的群中搜索到此QQ号,把这个人在每个群里都T走. 呵呵,我的想法模拟人的操作过程,把TM的联系人面板打开,

  

  图三 TM的联系人面板

  逐个项展开,如果这个项是群就向这个项发出双击消息,让它出现群聊天窗口,再向群聊天窗口中的群设置发双击消息,

  

  图四 聊天窗口工具栏上的群设置

  这样就会出现群设置窗口了,就把问题归结到原来已经解决了的问题了.但我发现那个面板的类是Tencent_UserBar_Class_Ver1.0,如图三所示.不知是从什么派生出的,从而就不知道要发出些什么消息了.还请高人指教.

  五、结束语

  从vckbase学到了很多东西,很感谢大家的共同分享.自己的水平还很菜,但还是把自己碰到的问题写出来了,一方面可以给像我同样的菜鸟吸取经验教训,再碰到同样的问题时,能有一些参考资料.另一方面,是让各位高人指点一下我的不足. 欢迎用下面的联系方式与我继续讨论。

欢迎访问最专业的网吧论坛,无盘论坛,网吧经营,网咖管理,网吧专业论坛 https://bbs.txwb.com

关注天下网吧微信/下载天下网吧APP/天下网吧小程序,一起来超精彩

本文来源:vczx 作者:佚名

声明
声明:本站所发表的文章、评论及图片仅代表作者本人观点,与本站立场无关。若文章侵犯了您的相关权益,请及时与我们联系,我们会及时处理,感谢您对本站的支持!联系邮箱:support@txwb.com,系统开号,技术支持,服务联系QQ:1175525021本站所有有注明来源为天下网吧或天下网吧论坛的原创作品,各位转载时请注明来源链接!
天下网吧 网吧天下