博客
关于我
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/

你可能感兴趣的文章
Nacos简介、下载与配置持久化到Mysql
查看>>
Nacos简介和控制台服务安装
查看>>
Nacos管理界面详细介绍
查看>>
Nacos编译报错NacosException: endpoint is blank
查看>>
nacos自动刷新配置
查看>>
nacos运行报错问题之一
查看>>
Nacos部署中的一些常见问题汇总
查看>>
NACOS部署,微服务框架之NACOS-单机、集群方式部署
查看>>
Nacos配置Mysql数据库
查看>>
Nacos配置中心中配置文件的创建、微服务读取nacos配置中心
查看>>
Nacos配置中心集群原理及源码分析
查看>>
nacos配置在代码中如何引用
查看>>
nacos配置新增不成功
查看>>
nacos配置自动刷新源码解析
查看>>
nacos集成分布式事务插件Seata的序列化问题,实际上是Seata本身存在bug!!
查看>>
Nacos集群搭建
查看>>
nacos集群搭建
查看>>
nacos集群网络分区对的影响和运维方式
查看>>
nacos集群节点故障对应用的影响以及应急方法
查看>>
nacos集群配置详解
查看>>