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

你可能感兴趣的文章
MYSQL从入门到精通(一)
查看>>
MYSQL从入门到精通(二)
查看>>
mysql以下日期函数正确的_mysql 日期函数
查看>>
mysql以服务方式运行
查看>>
mysql优化--索引原理
查看>>
MySQL优化之BTree索引使用规则
查看>>
MySQL优化之推荐使用规范
查看>>
Webpack Critical CSS 提取与内联教程
查看>>
mysql优化概述(范式.索引.定位慢查询)
查看>>
MySQL优化的一些需要注意的地方
查看>>
mysql优化相关
查看>>
MySql优化系列-优化版造数据(存储过程+函数+修改存储引擎)-2
查看>>
MySql优化系列-进阶版造数据(load data statment)-3
查看>>
MySql优化系列-造数据(存储过程+函数)-1
查看>>
MySQL优化配置详解
查看>>
Mysql优化高级篇(全)
查看>>
mysql会员求积分_MySql-统计所有会员的最高前10次的积分和
查看>>
mysql会对联合索性排序优化_MySQL索引优化实战
查看>>
MySQL作为服务端的配置过程与实际案例
查看>>