社区
网络编程
帖子详情
高分求pop3收邮件的程序源代码,要求能收附件
sor
2003-07-06 03:37:24
求pop3收邮件的程序源代码,要求能收附件
jgszz@163.com
...全文
52
1
打赏
收藏
高分求pop3收邮件的程序源代码,要求能收附件
求pop3收邮件的程序源代码,要求能收附件 jgszz@163.com
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
1 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
howtotell
2003-07-06
打赏
举报
回复
CSocket mailsock;
CString m_MailMsg;
HWND hwnd;
CString OnMailConnect(DWORD m_dwSize)
{
char* buf;
CString strbuf;
DWORD dwRead=0;
while(dwRead<m_dwSize)
{
buf=new char[2048];
memset(buf,0,2048);
UINT rec=mailsock.Receive(buf,2048,0);
dwRead+=rec;
strbuf+=buf;
delete buf;
}
return strbuf;
}
UINT mailThread(LPVOID pParam)
{
CString handMsg;
CString sendMsg;
mailsock.Create();
mailsock.Connect("pop.163.net",110);
m_MailMsg+=OnMailConnect(1);
::SetWindowText(hwnd,m_MailMsg);
sendMsg="user *****\r\n";//*****这里填入你的帐户
mailsock.Send(sendMsg,sendMsg.GetLength(),0);
m_MailMsg+=sendMsg;
m_MailMsg+=OnMailConnect(1);
::SetWindowText(hwnd,m_MailMsg);
sendMsg="pass *****\r\n";//****这里填入你的密码
mailsock.Send(sendMsg,sendMsg.GetLength(),0);
m_MailMsg+=sendMsg;
m_MailMsg+=OnMailConnect(1);
::SetWindowText(hwnd,m_MailMsg);
sendMsg="stat\r\n";
mailsock.Send(sendMsg,sendMsg.GetLength(),0);
CString statMsg=OnMailConnect(1);
m_MailMsg+=sendMsg;
m_MailMsg+=statMsg;
::SetWindowText(hwnd,m_MailMsg);
statMsg.Delete(0,4);
int dashpos=statMsg.Find(" ");
statMsg.Delete(dashpos,statMsg.GetLength()-dashpos);
statMsg.Replace("\r\n","");
int mailCount=atoi(statMsg);
for(int i=1;i<mailCount+1;i++)
{
sendMsg.Format("list %d\r\n",i);
mailsock.Send(sendMsg,sendMsg.GetLength(),0);
CString recMsg=OnMailConnect(1);
m_MailMsg+=sendMsg;
m_MailMsg+=recMsg;
::SetWindowText(hwnd,m_MailMsg);
recMsg.Delete(0,4);
int recCounter=recMsg.Find(" ");
recMsg.Delete(0,recCounter);
recMsg.Replace("\r\n","");
DWORD mailsize=atoi(recMsg);
sendMsg.Format("retr %d\r\n",i);
mailsock.Send(sendMsg,sendMsg.GetLength(),0);
CString mailContent=OnMailConnect(mailsize);
m_MailMsg+=sendMsg;
m_MailMsg+=recMsg;
::SetWindowText(hwnd,m_MailMsg);
CString sub=mailContent;
int subPos=sub.Find("Subject:");
sub.Delete(0,subPos);
subPos=sub.Find("\r\n");
CString strSubject=sub.Left(subPos);
strSubject.Replace("Subject:","");
strSubject.Replace("\\",".");
strSubject.Replace("/",".");
strSubject.Replace(":",".");
strSubject.Replace("*",".");
strSubject.Replace("?",".");
strSubject.Replace("\"",".");
strSubject.Replace("<",".");
strSubject.Replace(">",".");
strSubject.Replace("|",".");
CString fname;
fname.Format("c:\\%s(%d).eml",strSubject,i);
CFile fp;
fp.Open(fname,CFile::modeCreate|CFile::modeWrite);
fp.Write(mailContent,mailContent.GetLength());
fp.Close();
sendMsg.Format("dele %d\r\n",i);
mailsock.Send(sendMsg,sendMsg.GetLength(),0);
recMsg=OnMailConnect(1);
m_MailMsg+=sendMsg;
m_MailMsg+=recMsg;
::SetWindowText(hwnd,m_MailMsg);
}
sendMsg="quit\r\n";
mailsock.Send(sendMsg,sendMsg.GetLength(),0);
CString recMsg=OnMailConnect(1);
m_MailMsg+=sendMsg;
m_MailMsg+=recMsg;
::SetWindowText(hwnd,m_MailMsg);
mailsock.Close();
return 0;
}
void CMailDlg::OnRec()
{
hwnd=GetDlgItem(IDC_EDIT_MAIL)->GetSafeHwnd();
AfxBeginThread(mailThread,NULL,THREAD_PRIORITY_IDLE);
}
邮件
附件
发生器(自动分卷压缩)
7. **
源代码
可用**: 由于名为`MailTool`的文件可能是
源代码
,意味着用户或者开发者可以查看、学习甚至修改
源代码
以满足特定需
求
或优化性能。 总的来说,【
邮件
附件
发生器(自动分卷压缩)】是利用Java Mail API开发...
Linux 电子
邮件
教程(三)
以下简单的例子展示了如何匹配所有
邮件
项目,其中标题和/或正文包含短语,并将
邮件
放在相关文件夹中。:0 HB:然而,这个过滤器将无法匹配包含短语或的项目,例如。因此,正则表达式的真正威力在于能够以简化的格式...
100个Java项目解析,带
源代码
和学习文档!
你是否正在寻找带有
源代码
的Java项目的免费集合?你的搜索到这里结束,我为你提供了近100多个Java项目。 想要成为一个优秀的
程序
员写项目是绕不开的,毕竟工程学的最终目标都是要创造东西,所以,代码给我敲起来! ...
效率极高的分类算法
在设计软件下载这样的
程序
时,要涉及到软件的分类;如此等等。可以说,分类是一个很普遍的问题。 我常常面试一些
程序
员,而且我几乎毫无例外地要问他们一些关于分类算法的问题。下面的举几个我常常询问的问题。你...
泷羽sec——安全见闻学习笔记
搞二进制的,写代码都是基于操作系统去写的 ,没有操作系统你们什么都写不了,这就是事实,但是还有一种
程序
也就是裸板
程序
,直接在stm32上写一段代码,或者我们的单片机上写一个代码,这就是裸板
程序
,裸板
程序
是...
网络编程
18,363
社区成员
64,187
社区内容
发帖
与我相关
我的任务
网络编程
VC/MFC 网络编程
复制链接
扫一扫
分享
社区描述
VC/MFC 网络编程
c++
c语言
开发语言
技术论坛(原bbs)
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章