1.5w+
社区成员
【咨询】关于程序实现向QQ好友或MSN好友群发消息的问题！
大家好啊！
我想请教个问题：就是如何实现向QQ好友或MSN好友群发消息的问题？
主要是在周末或一些特殊节日向好友群发祝福的消息，并不是用来发无聊的广告。
在网上看了一些这方面的资料：
大概都是通过句柄、窗体名、类名来遍历所有好友的聊天文本框，
好象功能不容易实现，可能主要是窗体名、类名找不到，
请做过这方面程序的朋友讨论一下，谢谢啦。。。
我想请教个问题：就是如何实现向QQ好友或MSN好友群发消息的问题？
主要是在周末或一些特殊节日向好友群发祝福的消息，并不是用来发无聊的广告。
在网上看了一些这方面的资料：
大概都是通过句柄、窗体名、类名来遍历所有好友的聊天文本框，
好象功能不容易实现，可能主要是窗体名、类名找不到，
请做过这方面程序的朋友讨论一下，谢谢啦。。。
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
zsdhust 2008-11-26
nra
zzz822163 2008-11-26
还是需要自己打开窗口呀?
我以为你想搞让他自动打开窗口发消息呢
我以为你想搞让他自动打开窗口发消息呢
jscn123789abc 2008-11-25
up up ...
jscn123789abc 2008-11-25
请高手帮忙分析以下下面的解决方案，谢谢．．．
其它功能就不详细说了，这里只给大家把主要的地方将一下。
1、查找当前的所有聊天窗口。
QQ两天窗口的特点都是以******交谈中，而群则是***-群，所以只要找到所有窗口然后判断窗口标题就行了。
::EnumWindows(EnumWindowsProc_1,0) ; //需要时调用就行了
//下边这个函数必须是全局的
BOOL CALLBACK EnumWindowsProc_1(HWND hwnd,LPARAM lparam)
{
char lpWinTitle[256];
CString m_strTitle;
::GetWindowText(hwnd,lpWinTitle,256-1);
m_strTitle.Format("%s",lpWinTitle);
if(m_strTitle.Find("交谈中")!=-1||m_strTitle.Find("群")!=-1)
{
strcat(chTitle[i],m_strTitle);
i++;
}
return TRUE ;
}
2找到聊天窗口中输入内容的RichEdit控件的HWND和发送按钮的HWND
//这个函数也必须是全局的
BOOL CALLBACK EnumChildWindowsProc_1(HWND hwnd,LPARAM lparam)
{
if(hwnd)
{
char m_strClass[256];
char m_pstr[256];
char lpWinTitle[256];
HWND phwnd;
::GetClassName(hwnd,m_strClass,255);
::GetWindowText(hwnd,lpWinTitle,256-1);
phwnd=::GetParent(hwnd);
::GetClassName(phwnd,m_pstr,255);
if (!strcmp(m_strClass,"RichEdit20A")&&!strcmp(m_pstr,"AfxWnd42"))
msgHWND[k++]=hwnd;
if(!strcmp(m_strClass,"Button")&&!strcmp(lpWinTitle,"发送(S)"))
btnHWND[k]=hwnd;
return TRUE;
}
else
return FALSE;
}
//下边这个函数使用时调用就行了
::EnumChildWindows(childHWND,EnumChildWindowsProc_1,0);
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
对于上边的代码，我想大家用spy++查看一下就知道了，QQRichEdit是嵌套了一层的，上边的传输消息的也叫RichEdit，只是父窗口不一样而已。
3像这些HWND发送消息
::SendMessage(msgHWND[j],EM_REPLACESEL,0,(LPARAM)m_text.GetBuffer(m_text.GetLength()));
::SendMessage(btnHWND[j],BM_CLICK,0,0);
至于问什么不用WM_PASTE大家试试就知道了，QQ把这个消息给屏蔽了，所以要用EM_REPLACESEL。
对于PostMessage，经测试没发送成功，大家可以试试，说不定是我哪搞错了。
QQ自动发消息打注意内容也就这些了，大家可以自己完善一下。
其它功能就不详细说了，这里只给大家把主要的地方将一下。
1、查找当前的所有聊天窗口。
QQ两天窗口的特点都是以******交谈中，而群则是***-群，所以只要找到所有窗口然后判断窗口标题就行了。
::EnumWindows(EnumWindowsProc_1,0) ; //需要时调用就行了
//下边这个函数必须是全局的
BOOL CALLBACK EnumWindowsProc_1(HWND hwnd,LPARAM lparam)
{
char lpWinTitle[256];
CString m_strTitle;
::GetWindowText(hwnd,lpWinTitle,256-1);
m_strTitle.Format("%s",lpWinTitle);
if(m_strTitle.Find("交谈中")!=-1||m_strTitle.Find("群")!=-1)
{
strcat(chTitle[i],m_strTitle);
i++;
}
return TRUE ;
}
2找到聊天窗口中输入内容的RichEdit控件的HWND和发送按钮的HWND
//这个函数也必须是全局的
BOOL CALLBACK EnumChildWindowsProc_1(HWND hwnd,LPARAM lparam)
{
if(hwnd)
{
char m_strClass[256];
char m_pstr[256];
char lpWinTitle[256];
HWND phwnd;
::GetClassName(hwnd,m_strClass,255);
::GetWindowText(hwnd,lpWinTitle,256-1);
phwnd=::GetParent(hwnd);
::GetClassName(phwnd,m_pstr,255);
if (!strcmp(m_strClass,"RichEdit20A")&&!strcmp(m_pstr,"AfxWnd42"))
msgHWND[k++]=hwnd;
if(!strcmp(m_strClass,"Button")&&!strcmp(lpWinTitle,"发送(S)"))
btnHWND[k]=hwnd;
return TRUE;
}
else
return FALSE;
}
//下边这个函数使用时调用就行了
::EnumChildWindows(childHWND,EnumChildWindowsProc_1,0);
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
对于上边的代码，我想大家用spy++查看一下就知道了，QQRichEdit是嵌套了一层的，上边的传输消息的也叫RichEdit，只是父窗口不一样而已。
3像这些HWND发送消息
::SendMessage(msgHWND[j],EM_REPLACESEL,0,(LPARAM)m_text.GetBuffer(m_text.GetLength()));
::SendMessage(btnHWND[j],BM_CLICK,0,0);
至于问什么不用WM_PASTE大家试试就知道了，QQ把这个消息给屏蔽了，所以要用EM_REPLACESEL。
对于PostMessage，经测试没发送成功，大家可以试试，说不定是我哪搞错了。
QQ自动发消息打注意内容也就这些了，大家可以自己完善一下。
jscn123789abc 2008-11-23
//#include <afxtempl.h>
void CQQqunfaDlg::OnButton1()
{
CTypedPtrArray<CObArray, CWnd*> myArray;
// 这个m_edit是Edit Box窗口的一个变量，它存放您想发送的那句话
// 如果m_edit为空，说明您还没写您想发送的话，它提示您先写上您想发送的话
UpdateData(true);
if(m_edit.IsEmpty())
{
MessageBox("please enter what do you want to say!!!","Attention",MB_OK | MB_ICONWARNING);
return;
}
HWND hwnd=FindWindowEx(NULL,NULL,"#32770",NULL);
while(hwnd)
{
CString string;
char a[100];
HWND send,pro,pro1,message;
// 得到窗口名称
::GetWindowText(hwnd,a,100);
string.Format("%s",a);
// 如果含有"与"(因为QQ聊天窗口的名字都是"与XX聊天中");说明是QQ窗口
if(string.Find("与")>-1)
{
pro=FindWindowEx(hwnd,NULL,"#32770",NULL); //pro值为0x00000000
CWnd *pWnd=CWnd::FromHandle(pro);
pro1=FindWindowEx(pWnd->m_hWnd,NULL,"AfxWnd42",NULL); //pro1值为0xcccccccc CWnd *child=CWnd::FromHandle(pro1);
// 找到QQ窗口的哪个写消息的文本框
message=FindWindowEx(child->m_hWnd,NULL,"RICHEDIT",NULL);
//
if(message)
{
CRichEditCtrl* rich
= (CRichEditCtrl*)(CWnd::FromHandle(message));
rich->ReplaceSel(m_edit);
}
else
{
return;
}
send=FindWindowEx(pWnd->m_hWnd,NULL,NULL,NULL);
string="";
while(send)
{
child=CWnd::FromHandle(send);
child->GetWindowText(string);
if(string.Find("发送")>-1)
{
//加入指针数组
myArray.Add(child);
send=NULL;
}
else
{
send=FindWindowEx(pWnd->m_hWnd,send,NULL,NULL);
}
}
hwnd=::GetWindow(hwnd,GW_HWNDNEXT);
}
else
{
hwnd=::GetWindow(hwnd,GW_HWNDNEXT);
}
}
// 按照窗口数组里的窗口进行逐个发送信息
for(int count=0;count<myArray.GetSize();count++)
{
CWnd* p=myArray.GetAt(count);
p->SendMessage(BM_CLICK);
}
// // 清空数组
myArray.RemoveAll();
// 将m_edit清空，因为下一次您要写上您想发送的话
SetDlgItemText(IDC_EDIT1,"");
m_edit="";
MessageBox("Over OK!!!","Attention",MB_OK | MB_ICONWARNING);
}
********************************************开启一个好友的聊天窗口，
设置断点行，pro=FindWindowEx(hwnd,NULL,"#32770",NULL);
运行到代码行pro1=FindWindowEx(pWnd->m_hWnd,NULL,"AfxWnd42",NULL);
时提示无法预知的错误，然后继续调试就又出现下面的错误信息：
"0x00401efa"指令引用的内存。该内存不能为"read"。
要终止程序，请单击"确定"。
要调试程序，请单击"取消"。
请朋友帮忙看一下，谢谢啦。。。
void CQQqunfaDlg::OnButton1()
{
CTypedPtrArray<CObArray, CWnd*> myArray;
// 这个m_edit是Edit Box窗口的一个变量，它存放您想发送的那句话
// 如果m_edit为空，说明您还没写您想发送的话，它提示您先写上您想发送的话
UpdateData(true);
if(m_edit.IsEmpty())
{
MessageBox("please enter what do you want to say!!!","Attention",MB_OK | MB_ICONWARNING);
return;
}
HWND hwnd=FindWindowEx(NULL,NULL,"#32770",NULL);
while(hwnd)
{
CString string;
char a[100];
HWND send,pro,pro1,message;
// 得到窗口名称
::GetWindowText(hwnd,a,100);
string.Format("%s",a);
// 如果含有"与"(因为QQ聊天窗口的名字都是"与XX聊天中");说明是QQ窗口
if(string.Find("与")>-1)
{
pro=FindWindowEx(hwnd,NULL,"#32770",NULL); //pro值为0x00000000
CWnd *pWnd=CWnd::FromHandle(pro);
pro1=FindWindowEx(pWnd->m_hWnd,NULL,"AfxWnd42",NULL); //pro1值为0xcccccccc CWnd *child=CWnd::FromHandle(pro1);
// 找到QQ窗口的哪个写消息的文本框
message=FindWindowEx(child->m_hWnd,NULL,"RICHEDIT",NULL);
//
if(message)
{
CRichEditCtrl* rich
= (CRichEditCtrl*)(CWnd::FromHandle(message));
rich->ReplaceSel(m_edit);
}
else
{
return;
}
send=FindWindowEx(pWnd->m_hWnd,NULL,NULL,NULL);
string="";
while(send)
{
child=CWnd::FromHandle(send);
child->GetWindowText(string);
if(string.Find("发送")>-1)
{
//加入指针数组
myArray.Add(child);
send=NULL;
}
else
{
send=FindWindowEx(pWnd->m_hWnd,send,NULL,NULL);
}
}
hwnd=::GetWindow(hwnd,GW_HWNDNEXT);
}
else
{
hwnd=::GetWindow(hwnd,GW_HWNDNEXT);
}
}
// 按照窗口数组里的窗口进行逐个发送信息
for(int count=0;count<myArray.GetSize();count++)
{
CWnd* p=myArray.GetAt(count);
p->SendMessage(BM_CLICK);
}
// // 清空数组
myArray.RemoveAll();
// 将m_edit清空，因为下一次您要写上您想发送的话
SetDlgItemText(IDC_EDIT1,"");
m_edit="";
MessageBox("Over OK!!!","Attention",MB_OK | MB_ICONWARNING);
}
********************************************开启一个好友的聊天窗口，
设置断点行，pro=FindWindowEx(hwnd,NULL,"#32770",NULL);
运行到代码行pro1=FindWindowEx(pWnd->m_hWnd,NULL,"AfxWnd42",NULL);
时提示无法预知的错误，然后继续调试就又出现下面的错误信息：
"0x00401efa"指令引用的内存。该内存不能为"read"。
要终止程序，请单击"确定"。
要调试程序，请单击"取消"。
请朋友帮忙看一下，谢谢啦。。。
xyzyaoshunyu 2008-11-23
当焦点在QQ聊天框或者MSN聊天框上的时候，可以直接利用复制，粘贴发送信息的。
所以可以在程序中，把你要发送的内容写到剪贴板里，然后copy到qq或msn的窗体中，实现跨进程通信。
所以可以在程序中，把你要发送的内容写到剪贴板里，然后copy到qq或msn的窗体中，实现跨进程通信。
jjaikaikai 2008-11-22
是通过服务器中转的，与一般C/S结构有所不同，请看拓扑图
zzz822163 2008-11-22
关注一下,不知道你的难点在哪里?
司科仿美团O2O程序源码最新版+wap+微信版亲测完整版 用户通过MSN 人人 网易 开心 豆瓣 百度 腾讯 飞信 新浪微博 QQ空间、等，快速分享给好朋友心怡的商品 网项目。 管理员等级及授权 总管理分配下属管理员，各自管理各自的项目 后台控制分类 自可以后台控制推荐产品...
Java读取MSN的好友列表 今天遇到这么个需求：邮件群发的功能，需要把邮件发给MSN上的所有好友，这就要求必须能通过程序取得当前MSN用户的所有好友列表。一开始只是在别的网站上看到类似的功能，google了一通发现一个韩国的开源包JMSN提供...
5G消息能取代IM？一文读懂5G消息的前世今生！ 本文引用了公众号“鲜枣课堂”的《5G消息（RCS），到底是什么？》和公众号“InfoQ”的《5G消息来了，它会干掉微信还是变成另一个飞信？》两篇文章的部分内容，感谢原作者的分享。 1、引言 上个月3大运营商（移动、...
【计算机网络 22】5G消息能取代IM？一文读懂5G消息的前世今生！ 上个月3大运营商（移动、电信、联通）发布了《5G消息白皮书》（此白皮书PDF版可在文末处下载），宣布将共同启动5G消息业务。 简单理解，5G消息相当于是原先短消息服务的全新升级。与以前的短消息相比，5G消息具有...
一个珊瑚虫倒下了，千万个珊瑚虫站起来！欢呼吧QQ****下载，不断更新 说在前面的话： 大家仔细看看这些一个接一个出现的qq版本，是不是感觉很爽？这意味着什么？意味着：一个珊瑚虫倒下了，千万个珊瑚虫站起来了！终于成为了现实！tx终于偿到了自己酿下的苦果！群众****了！ 腾讯！现在...
5G消息（RCS），到底是什么？ 尤其是ICQ、MSN、OICQ（即QQ）等即时通讯工具的出现，让人们见识到多媒体通讯的无限乐趣。 于是，人们想到，这么有趣的通讯方式，是不是可以移植到手机上？ 互联网即时通讯工具的鼻祖——icq 3G移动通信标准，就是...
懒QQ(LanQQ) 懒QQ(LanQQ)[以下简称懒QQ]是在网上广为流传的飞鸽传书的基础上经过懒QQ社区几个月重新改写而成.
懒QQ的整个界面与当前流行的聊天工具一样,有着友好的界面(类似QQ,MSN的界面),并且继承了飞鸽传书的所有特点,
...
关于Jabber客户端 现在网络中最流行的程序，莫过于即时通讯软件了，从ICQ到QQ，全世界约有7000万人每天在使用它们。人们利用它来沟通、交流，它是继电子邮件之后另一个最成功的通讯工具。如此成功的软件模式引出了一系列出色产品的...
【原创作品】爱博QQ邮件搜索机 增强补丁V2.1 (包括试用版邮箱导出补丁) 支持最新版本的 Ver 2.4.0 Build 029 本地下载地址: 【原创作品】爱博QQ邮件搜索机 增强补丁V2.1 (包括试用版邮箱导出补丁) 支持... 开启 爱博QQ邮件搜索机补丁工具.exe 程序 点击界面上的按钮即可将原有软件上的搜索条件选择项全部开启支持最新的 Ver 2.4.
【原创作品】爱博QQ邮件搜索机 注册机 增强补丁V2.2 (包括试用版邮箱导出补丁) 支持最新版本的 Ver 2.5.2 Build 036 爱博QQ邮件搜索机补丁工具 V2.2 20110825 Build 115网盘下载地址:http://u.115.com/file/bhd70l2b 使用说明： 1. 请运行 爱博QQ邮件搜索机注册机.exe 进行注册(不用我啰嗦了吧, 大家都懂
QQ小技巧 好多朋友经常问QQ空间打不开的问题，本人总结了以下解决方法： 1、先装Macromedia Flash Player 9 先在百度中收寻软件的下载网站，然后下载一个即可。 2、再打开IE--工具--INTERNET选项--安全--自定义级别 ...
DISCUZ! X3 数据字典 pre_common_admincp_cmenu 后台菜单收藏表 字段名 数据类型 默认值 允许非空 自动递增 备注 id smallint(6) unsigned NO 是 title ...
Discuz! X2.5数据库字典【转载】 message text NOT NULL COMMENT '消息', PRIMARY KEY (id) ) ENGINE=MyISAM COMMENT='后台留言表'; DROP TABLE IF EXISTS pre_common_advertisement; CREATE TABLE pre_common_advertisement ( advid mediumint...
网站推广优化教程100条(SEO，网站关键字优化，怎么优化网站，如何优化网站关键字) 48、在各种媒体上发表文章你要是文采好就行，能认识个记者更好，主动向一些IT报刊杂志投些稿。如：电脑爱好者等。 49、多结实朋友譬如你和某商业站的管理员私交不错，那完全可用他的关系帮你在其职权允许的范围内...
《网上赚钱葵花宝典1.0完整版》 群发里面，还有种群发方法是不需要加为好友的，例如当时的 qq 消息直接发等软件。就像现在，你在 QQ 群里面测试一下，也是可以不加好友就能群发的。 QQ 过滤网站，就换个域名， QQ 封锁太快，就设置好时间间隔， QQ...
网站推广优化教程100条(完整版) 你要是文采好就行，能认识个记者更好，主动向一些IT报刊杂志投些稿。如：电脑爱好者等。 49、多结实朋友 譬如你和某商业站的管理员私交不错，那完全可用他的关系帮你在其职权允许的范围内进行推广网站，如果你...
苹果系统即时通讯与AnyChat SDK 苹果在美国总部库比提诺召开主题为back to the Mac的媒体发布会，发布会上推出了全新的MacBook Air、Mac OS X以及iLife 11，苹果CEO史蒂夫乔布斯宣布，将在三个月后推出适用于Mac平台的应用程序商店，将iOS中大获...
