博客
关于我
VC++实现QQ消息群发
阅读量:508 次
发布时间:2019-03-07

本文共 3254 字,大约阅读时间需要 10 分钟。

void QQSendMsg(CString strMsg,BOOL bCloseWindow)

{
AFX_MANAGE_STATE(AfxGetStaticModuleState( ));//切换回调用程序
CString str;
CWnd* pMainWnd = AfxGetMainWnd()->GetWindow(GW_HWNDFIRST);
while (pMainWnd)
{
   HWND hWnd,hNext;
   CWnd* pChildWnd = NULL;

   CWnd *pDlgWnd = NULL;

   hWnd = pMainWnd->m_hWnd;
   pMainWnd->GetWindowText(str);
   if(str.Find (L"交谈")>-1 || str.Find (L"群")>-1)//找到聊天主窗口Begin
   {
    hWnd=::FindWindowEx(pMainWnd->m_hWnd,NULL,L"#32770",NULL);
    pDlgWnd = CWnd::FromHandle(hWnd);
    hWnd=::FindWindowEx(pDlgWnd->m_hWnd,NULL,L"AfxWnd42",NULL);
    while(hWnd)//找消息填写控件
    {

     pChildWnd=CWnd::FromHandle(hWnd);

     hNext = ::FindWindowEx(pChildWnd->m_hWnd,NULL,L"RICHEDIT20A",NULL);
     if(hNext)
     {
      break;
     }
     else
     {
      hWnd=::FindWindowEx(pDlgWnd->m_hWnd,hWnd,L"AfxWnd42",NULL);
     }
    }
    if(hNext){//找到消息填写控件
     CRichEditCtrl* pRich=(CRichEditCtrl*)(CWnd::FromHandle(hNext));
    
     pRich->ReplaceSel (strMsg);//填上将要发送的内容
    }else return;
    //找消息发送按钮
    hWnd=::FindWindowEx(pDlgWnd->m_hWnd,NULL,NULL,NULL);
    while (hWnd)
    {
     pChildWnd=CWnd::FromHandle(hWnd);
     //CWnd *pChildWnd=CWnd::FromHandle(hWnd);
     pChildWnd->GetWindowText(str);
     if(str.Find (L"发送")>-1)
     {
      pChildWnd->SendMessage (BM_CLICK);//发送
      //return;//退出
      break;
     }
     hWnd=::FindWindowEx(pDlgWnd->m_hWnd,hWnd,NULL,NULL);
    }

    if(TRUE == bCloseWindow)

    {
     hWnd=::FindWindowEx(pDlgWnd->m_hWnd,NULL,NULL,NULL);
     while (hWnd)
     {
      pChildWnd=CWnd::FromHandle(hWnd);
      //CWnd *pChildWnd=CWnd::FromHandle(hWnd);
      pChildWnd->GetWindowText(str);
      if(str.Find (L"关闭")>-1)
      {
       pChildWnd->SendMessage (BM_CLICK);//关闭
       //return;//退出
       break;
      }
      hWnd=::FindWindowEx(pDlgWnd->m_hWnd,hWnd,NULL,NULL);
     }
    }
    //return;
   }//找到聊天主窗口End
   pMainWnd = pMainWnd->GetWindow(GW_HWNDNEXT); //继续找
}//While

}

void QQSendMessage(CWnd * pDlgMainWnd ,CString strMsg,BOOL bCloseWindow)
{
CString str;
CWnd* pMainWnd = pDlgMainWnd->GetWindow(GW_HWNDFIRST);
while (pMainWnd)
{
   HWND hWnd,hNext;
   CWnd* pChildWnd = NULL;

   CWnd *pDlgWnd = NULL;

   hWnd = pMainWnd->m_hWnd;
   pMainWnd->GetWindowText(str);
   if(str.Find (L"交谈")>-1 || str.Find (L"群")>-1)//找到聊天主窗口Begin
   {
    hWnd=::FindWindowEx(pMainWnd->m_hWnd,NULL,L"#32770",NULL);
    pDlgWnd = CWnd::FromHandle(hWnd);
    hWnd=::FindWindowEx(pDlgWnd->m_hWnd,NULL,L"AfxWnd42",NULL);
    while(hWnd)//找消息填写控件
    {

     pChildWnd=CWnd::FromHandle(hWnd);

     hNext = ::FindWindowEx(pChildWnd->m_hWnd,NULL,L"RICHEDIT20A",NULL);
     if(hNext)
     {
      break;
     }
     else
     {
      hWnd=::FindWindowEx(pDlgWnd->m_hWnd,hWnd,L"AfxWnd42",NULL);
     }
    }
    if(hNext){//找到消息填写控件
     CRichEditCtrl* pRich=(CRichEditCtrl*)(CWnd::FromHandle(hNext));
    
     pRich->ReplaceSel (strMsg);//填上将要发送的内容
    }else return;
    //找消息发送按钮
    hWnd=::FindWindowEx(pDlgWnd->m_hWnd,NULL,NULL,NULL);
    while (hWnd)
    {
     pChildWnd=CWnd::FromHandle(hWnd);
     //CWnd *pChildWnd=CWnd::FromHandle(hWnd);
     pChildWnd->GetWindowText(str);
     if(str.Find (L"发送")>-1)
     {
      pChildWnd->SendMessage (BM_CLICK);//发送
      //return;//退出
      break;
     }
     hWnd=::FindWindowEx(pDlgWnd->m_hWnd,hWnd,NULL,NULL);
    }

    if(TRUE == bCloseWindow)

    {
     hWnd=::FindWindowEx(pDlgWnd->m_hWnd,NULL,NULL,NULL);
     while (hWnd)
     {
      pChildWnd=CWnd::FromHandle(hWnd);
      //CWnd *pChildWnd=CWnd::FromHandle(hWnd);
      pChildWnd->GetWindowText(str);
      if(str.Find (L"关闭")>-1)
      {
       pChildWnd->SendMessage (BM_CLICK);//关闭
       //return;//退出
       break;
      }
      hWnd=::FindWindowEx(pDlgWnd->m_hWnd,hWnd,NULL,NULL);
     }
    }
    //return;
   }//找到聊天主窗口End
   pMainWnd = pMainWnd->GetWindow(GW_HWNDNEXT); //继续找
}//While

转载地址:http://ovsjz.baihongyu.com/

你可能感兴趣的文章
nagios安装文档
查看>>
nagios服务端安装
查看>>
Nagios自定义监控脚本
查看>>
name_save matlab
查看>>
Nami 项目使用教程
查看>>
Nancy之基于Nancy.Hosting.Aspnet的小Demo
查看>>
NAND NOR FLASH闪存产品概述
查看>>
nano 编辑
查看>>
nanoGPT 教程:从零开始训练语言模型
查看>>
NASA网站曝严重漏洞,或将沦为黑客钓鱼网站?
查看>>
Nash:轻量级、安全且可靠的脚本语言
查看>>
NAS、SAN和DAS的区别
查看>>
NAS个人云存储服务器搭建
查看>>
NAS服务器有哪些优势
查看>>
NAT PAT故障排除实战指南:从原理到技巧的深度探索
查看>>
nat 网卡间数据包转发_你是不是从来没有了解过光纤网卡,它跟普通网卡有什么区别?...
查看>>
NAT-DDNS内网穿透技术,快解析DDNS的优势
查看>>
NAT-DDNS内网穿透技术,快解析DDNS的优势
查看>>
NAT-DDNS内网穿透技术,解决动态域名解析难题
查看>>
natapp搭建外网服务器
查看>>