邮件问题**

rzport_gongyu · 发表于 2009-2-9 09:35:08

想问一下邮件代码中控制用户从数据库中读取自己邮件的代码在什么地方，给我贴一段。

lixy · 发表于 2009-2-9 09:45:55

邮件库里面的相关代码。业务模型\协同系统\个人事务\邮件库
你想找什么，就在里面看看。

lixy · 发表于 2009-2-9 10:02:49

业务模型\协同系统\个人事务\邮件库\邮件例如
procedure TMailCenterForm.InitMailCap;
读取自己邮件大小

rzport_gongyu · 发表于 2009-2-9 10:39:46

我要加限制超容量收不到邮件控制收与收不到的代码在哪个事件上

lixy · 发表于 2009-2-9 10:42:31

不能。因为内部邮件的机制原因，其实在发邮件的时候，客户已经收到了邮件。

rzport_gongyu · 发表于 2009-2-9 11:17:54

如果说是不能改的话通过什么方式可以监测到每个用户的使用量呢？

lixy · 发表于 2009-2-9 11:26:45

http://bbs.justep.com/forum.php?mod=viewthread&tid=27387
http://bbs.justep.com/forum.php?mod=viewthread&tid=27398
http://bbs.justep.com/forum.php?mod=viewthread&tid=26658
楼主你都问过的，就是这样控制的。

rzport_gongyu · 发表于 2009-2-9 11:28:35

不是控制我说的是监测到用户的使用量

lixy · 发表于 2009-2-9 11:36:32

最初由 lixy 发布
[B]http://bbs.justep.com/forum.php?mod=viewthread&tid=27387
http://bbs.justep.com/forum.php?mod=viewthread&tid=27398
[url]http://bbs.justep.com..

以下省略...... [/B]

能判断出是否超限，这里的代码也能检测使用量。

lixy · 发表于 2009-2-9 13:51:00

业务模型\协同系统\个人事务\邮件库\邮件
//添加行函数
procedure TMailCenterForm.DisplayBoxMail(AMailList: TStrings;
const APath: string; const APathKind: Integer);
你在这个函数前面加一个exit;会发现邮件不能列出邮件

		自动登录	找回密码
密码			立即注册