相关推荐
-
IdPOP3做的-QQ邮箱附件接收器
批量下载QQ邮箱中的所有附件 procedure TFrm_QQMailRev.bt_revClick(Sender: TObject); var i,j,fNum,fCount : integer; tmp, fName : string; begin bt_rev.Enabled := false; IdMessage1.CharSet := 'gb2312'; //保证附件正文汉字的正常显示 ProgressBar1.Max := mailcount; ProgressBar1.Min := 1; fCount := 0; for i:=1 to mailcount do //遍历每一封邮件 mailcount begin IdMessage1.Clear; IdPOP31.retrieveHeader(i,IdMessage1); //得到邮件的头信息 IdPOP31.Retrieve(i,IdMessage1); //接收到邮件所有内容 tmp := IdMessage1.Body.Text; //邮件正文 Label2.Caption := {'接收邮件:'+tmp+}' 已接收:['+intToStr(i)+'] '; fNum := Pred(IdMessage1.MessageParts.Count); if not fNum<0 then for j:=0 to fNum do begin if IdMessage1.MessageParts.Items[j] is TIdAttachment then begin fCount := fCount+1; fName := filePath+intToStr(i)+intToStr(j)+TIdAttachment(IdMessage1.MessageParts.Items[fNum]).Filename; if fileExists(fName) then deletefile(fName); TIdAttachment(IdMessage1.MessageParts.Items[j]).SaveToFile(fName); //filePath+intToStr(i)+GetFileTitle(tmp)+'.rar' end; end; ProgressBar1.StepBy(1); GetRevFile; application.ProcessMessages; end; Label3.Caption := '共接收附件:['+intToStr(fCount)+'] '; IdPOP31.Disconnect; //断开连接 end;
-
第六章 从POP3服务器提取电子邮件
文章目录 第六章 从POP3服务器提取电子邮件从POP3服务器提取电子邮件与POP3服务器通信获取有关邮箱的信息GetMailBoxStatus()GetMessageUIDArray()GetSizeOfMessages()从邮箱提取邮件Fetch()FetchMessage() 第六章 从POP3服务器提取电子邮件 从POP3服务器提取电子邮件 与POP3服务器通信 如果拥有所需的权限,并且邮件服务器正在运行,则可以使用POP3协议从该服务器下载和处理电子邮件。通常,要与POP3服务器通信,请登录,执
-
用Delphi实现邮件附件收发功能
用DELPHI中的TIdPOP3 和TIdSMTP这两个组件完全能够对大部份邮件服务器进行邮件收发操作。 TIdPOP3组件简介 TIdPOP3 是用来接收邮件服务器的邮件信息到用户端的一个组件。它实现了RFC 1939协议。 在使用TIdPOP3组件时需设置它的几个成员属性。 Host :指定邮件服务器,一般为pop3邮件服务器的地址,如 pop3.126.com。
-
Delphi 使用Indy的TidPOP3接收邮件
最近测试了下delphi的Indy控件包中的TIdPOP3接收邮件功能,由于有些邮件服务器必须支持加密方式,所以,本测试直接使用的是加密方式(SSL),如果不需要加密方式,只需要更改服务端口以及断开POP3控件的IOHandler即可。 使用中应该先连接服务器,然后在进行读取或者删除处理,之后要断开服务器。 程序代码如下: {...
-
使用Delphi收发GMail的邮件
GMAIL的端口和连接方式比较特殊: SMTP端口为:456 POP3端口为:995 都采用安全连接(SSL) 这些通过Indy组件就可以实现 参考代码如下: object IdConnectionInterceptOpenSSL1: TIdConnectionInterceptOpenSSL SSLOptions.Method = sslvSSLv2 SSLOptio
-
indy10 idpop3接收邮件标题乱码
indy10 idpop3接收邮件标题乱码 修改IdGlobal.pas [delphi] view plain copy function BytesToString(const AValue: TIdBytes; const AStartIndex: Integer; const ALength: Integer
-
【Delphi入门】网络服务2(POP3协议 & NMPOP3组件)
POP3 协议应用 POP3 协议简单介绍 POP3是一种高级网络协议,全称为Post Office Protocol Version 3。使用该协议,用户使用客户端软件能够动态地,有效地访问服务器上的邮件。简而言之,POP3是一种能够让客户端软件提取在服务器中存放的邮件的协议 NMPOP3 组件 在Delphi6中位于Fastnet组件面板上的NMPOP3组件封装了POP3电子邮件协议,可以用来检索网络POP3服务器上的电子邮件信息。例如有几封邮件,删除邮件,邮件的文本信息等 NMPOP3 组件的主要属性
-
JavaMail学习笔记(四)、使用POP3协议接收并解析电子邮件(全)
[java] view plaincopy package org.yangxin.study.jm; import java.io.BufferedInputStream; import java.io.BufferedOutputStream; import java.io.File; import java.io.Fil...
-
跪求INDY10中idpop3和IdSSLIOHandlerSocketOpenSSL使用SSL连接Gmail用法,该怎么解决
跪求INDY10中idpop3和IdSSLIOHandlerSocketOpenSSL使用SSL连接Gmail用法 郁闷3天了, 就是不知道咋弄,网上该搜的都搜索了. C/C++ code // 指定新邮件的地址等信息 IdSSLIOHandlerSocketOpenSSL1->SSLOptions->Method = sslvTLSv1; //IdSSLIOHandl
-
弥补 idPop3 缺少的 Subject 只是这部分的处理.
在收到163.com等一些邮件的时候 subject 通常是下面的形式, =?gb2312?B?Z290b21vYmlsZQ==?= 这个翻译过来就是 pic test 只需要一个函数就可以处理好了!indy也就不再残缺了.. //idPop3缺少的只是这部分的处理. Subject// this function by Chris G黱ther and Sergio Kes
6 楼 y8c8w8 2015-01-14 11:25
5 楼 chenxun101 2015-01-14 10:25
4 楼 yixiandave 2015-01-14 10:02
3 楼 Joey王 2015-01-14 09:50
2 楼 devilyard 2015-01-14 09:46
1 楼 lizhengd1 2015-01-13 17:06