博客
关于我
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主从复制的原理和实践操作
查看>>
webpack loader配置全流程详解
查看>>
mysql主从复制,读写分离,半同步复制实现
查看>>
MySQL主从失败 错误Got fatal error 1236解决方法
查看>>
MySQL主从架构与读写分离实战
查看>>
MySQL主从篇:死磕主从复制中数据同步原理与优化
查看>>
mysql主从配置
查看>>
MySQL之2003-Can‘t connect to MySQL server on ‘localhost‘(10038)的解决办法
查看>>
MySQL之CRUD
查看>>
MySQL之DML
查看>>
Mysql之IN 和 Exists 用法
查看>>
MYSQL之REPLACE INTO和INSERT … ON DUPLICATE KEY UPDATE用法
查看>>
MySQL之SQL语句优化步骤
查看>>
MYSQL之union和order by分析([Err] 1221 - Incorrect usage of UNION and ORDER BY)
查看>>
Mysql之主从复制
查看>>