CSmtp 类 |
命名空间: VO
CSmtp 类型公开以下成员。
名称 | 说明 | |
---|---|---|
DomainName | **缺少文档** (继承自 CMailAbstract。) | |
一个 CEmail 类的实例。
| ||
EmailFormat |
电子邮件的格式。
| |
Error |
表示最近发生的错误的数字值。
(继承自 CMailAbstract。) | |
ErrorMsg |
表示错误描述的字符串。
(继承自 CMailAbstract。) | |
MailApplication |
一个字符串,保存连接到邮件服务器时使用的名称
| |
PassWord |
表示要使用的密码的字符串。
(继承自 CMailAbstract。) | |
RemoteHost |
表示邮件服务器的地址的字符串。
(继承自 CMailAbstract。) | |
RemotePort |
表示端口号的数字值。
(继承自 CMailAbstract。) | |
ReplyCode |
表示服务器回复代码的数字值。
(继承自 CMailAbstract。) | |
ReplyString |
表示服务器回复的字符串。
(继承自 CMailAbstract。) | |
SecureSMTP |
一个逻辑值,指示 CSmtp 类是否应使用安全 SMTP
| |
TextEncoding |
电子邮件的文本编码类型。
| |
Timeout |
表示超时时间的数字值(以毫秒为单位)。
(继承自 CMailAbstract。) | |
TimeoutRetries | **缺少文档** (继承自 CMailAbstract。) | |
UserName |
表示要使用的用户名的字符串。
(继承自 CMailAbstract。) |
名称 | 说明 | |
---|---|---|
CheckReply |
检查邮件服务器的响应是否包含错误代码。
| |
Close |
关闭 Internet 会话的所有内部值。
(继承自 CMailAbstract。) | |
connect |
与远程 SMTP 服务器建立连接。
| |
Destroy | **缺少文档** (继承自 CMailAbstract。) | |
Disconnect |
关闭当前的 SMTP 连接。
| |
InternetStatus | **缺少文档** (继承自 CMailAbstract。) | |
Logon |
使用 smtp 类的用户名和密码登录到远程主机
| |
Open |
初始化 Internet 会话的所有内部启动值。
(继承自 CMailAbstract。) | |
RecvRemote |
从远程 SMTP 服务器接收响应数据。
(重写 RecvRemote.) | |
SendData |
向远程主机发送数据。
(继承自 CMailAbstract。) | |
SendHeaderInfo |
创建邮件头并作为电子邮件的一部分发送到远程 SMTP 服务器。
| |
SendMail |
将完整的电子邮件发送到远程 SMTP 服务器。
| |
SendRaw | **缺少文档** (继承自 CMailAbstract。) | |
SendRemote |
向远程主机发送任何数据。
(继承自 CMailAbstract。) |
名称 | 说明 | |
---|---|---|
oSocket | (继承自 CMailAbstract。) |
1FUNCTION SMTPSendMail (cServerIP AS STRING,; 2 cMailSubject AS STRING,; 3 xDestUser AS USUAL,; 4 xCCUser AS USUAL,; 5 cBody AS STRING,; 6 cFromAddress AS STRING,; 7 xAttachFile AS USUAL,; 8 cFromName AS STRING,; 9 xBCCUser AS USUAL,; 10 cCargo AS STRING) AS LOGIC PASCAL 11LOCAL oSmtp AS CSMTP 12LOCAL lRet AS LOGIC 13LOCAL oEmail AS CEmail 14 15oEMail := CEmail{} 16oEmail:FromAddress := cFromAddress 17oEmail:FromName := cFromName 18oEmail:Cargo := cCargo 19oEmail:Subject := cMailSubject 20oEmail:DestList := xDestUser 21oEmail:CCList := xCCUser 22oEmail:BCCList := xBCCUser 23oEmail:MailBody := cBody 24 25IF !IsNil(xAttachFile) 26 oEmail:AttachmentFileList := xAttachFile 27ENDIF 28 29oSmtp := CSmtp{oEmail} 30oSMtp:RemoteHost := cServerIP 31oSmtp:TimeOut := 5000 32 33lRet := oSmtp:SendMail() 34 35RETURN lRet