点击或拖拽改变大小

CSmtp 类

X#
提供一个类来处理 Internet 协议 SMTP。
继承层次
Object
  CMailAbstract
    CSmtp

命名空间:  VO
程序集:  VOInternetClasses (在 VOInternetClasses.dll 中) 版本:2.22 GA
语法
 CLASS CSmtp INHERIT CMailAbstract
查看代码

CSmtp 类型公开以下成员。

构造函数
  名称说明
公共方法CSmtp
构造一个 CSmtp 对象。
Top
属性
  名称说明
公共属性DomainName
**缺少文档**
(继承自 CMailAbstract。)
公共属性Email
一个 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。)
Top
方法
  名称说明
公共方法代码示例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。)
Top
字段
  名称说明
公共字段oSocket (继承自 CMailAbstract。)
Top
备注
该类提供了所有必要的方法和属性,用于向简单邮件传输协议(SMTP)服务器发送电子邮件。
示例
X#
 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
参见