4808
社区成员
- 主页
- 语言基础/算法/系统设计
- 数据库相关
- 图形处理/多媒体
- 网络通信/分布式开发
- VCL组件开发及应用
- Windows SDK/API
- 问答
发送邮件的错误，谁帮忙看看？
发送邮件时出错信息如下：
Invalid Text count. TIdText must be greater than 1:
对应的代码如下：
with TIdText.Create(IdMsgSend.MessageParts, Memo1.Lines) do
begin
ContentType := 'text/html';
ContentTransfer := 'base64';
end;
.
.
.
.
IdMsgSend.Body.Assign(Memo1.Lines);
Invalid Text count. TIdText must be greater than 1:
对应的代码如下：
with TIdText.Create(IdMsgSend.MessageParts, Memo1.Lines) do
begin
ContentType := 'text/html';
ContentTransfer := 'base64';
end;
.
.
.
.
IdMsgSend.Body.Assign(Memo1.Lines);
...全文
请发表友善的回复…
发表回复
僵哥 2002-09-15
IdMsgSend是个什么控件？
hjd_cw 2002-09-15
是不是
IdMsgSend.Body.Assign(Memo1.Lines);
没有成功？
IdMsgSend.Body.Assign(Memo1.Lines);
没有成功？
huche 2002-09-15
to knock(天天睡觉)
这样肯定是不行的，参数类型都不对啊。
这样肯定是不行的，参数类型都不对啊。
knock 2002-09-15
这样试试：
with TIdText.Create(IdMsgSend.MessageParts, Memo1.text) do
begin
ContentType := 'text/html';
ContentTransfer := 'base64';
end;
.
.
.
.
IdMsgSend.Body.Assign(Memo1.text);
with TIdText.Create(IdMsgSend.MessageParts, Memo1.text) do
begin
ContentType := 'text/html';
ContentTransfer := 'base64';
end;
.
.
.
.
IdMsgSend.Body.Assign(Memo1.text);
huche 2002-09-15
to hjd_cw
应该不是，因为如果我把前面的代码去除,邮件能发出去，但是邮件内容显示的是base64码，头信息也没有包含html格式信息,所以也不能按html页察看邮件。
错误信息是TIdSMTP发送的时候返回的.
谢谢！！
to unsigned
IdMsgSend 是 TIdMessage控件
应该不是，因为如果我把前面的代码去除,邮件能发出去，但是邮件内容显示的是base64码，头信息也没有包含html格式信息,所以也不能按html页察看邮件。
错误信息是TIdSMTP发送的时候返回的.
谢谢！！
to unsigned
IdMsgSend 是 TIdMessage控件
huche 2002-09-15
to hjd_cw
应该不是，因为如果我把前面的代码去础信息能发出去，但是显示的是base64码，头信息也没有包含html信息所以也不能按html页察看邮件。
错误信息是TIdSMTP发送的时候返回的.
谢谢！！
to unsigned
IdMsgSend 是 TIdMessage控件
应该不是，因为如果我把前面的代码去础信息能发出去，但是显示的是base64码，头信息也没有包含html信息所以也不能按html页察看邮件。
错误信息是TIdSMTP发送的时候返回的.
谢谢！！
to unsigned
IdMsgSend 是 TIdMessage控件