恳请帮帮忙，300+200分奉上！！(300分)

procedure Randomize;
var
systemTime :
record
wYear : Word;
wMonth : Word;
wDayOfWeek : Word;
wDay : Word;
wHour : Word;
wMinute : Word;
wSecond : Word;
wMilliSeconds: Word;
reserved : array [0..7] of char;
end;
asm
LEA EAX,systemTime
PUSH EAX
CALL GetSystemTime
MOVZX EAX,systemTime.wHour
IMUL EAX,60
ADD AX,systemTime.wMinute { sum = hours * 60 + minutes }
IMUL EAX,60
XOR EDX,EDX
MOV DX,systemTime.wSecond
ADD EAX,EDX { sum = sum * 60 + seconds }
IMUL EAX,1000
MOV DX,systemTime.wMilliSeconds
ADD EAX,EDX { sum = sum * 1000 + milliseconds }
MOV RandSeed,EAX
end;

对不起，贴错了！真糟糕！
BTW：我没收到什么信啊？

关于邮件群发这个问题，我也想请教一下各位：
我分析了一下SAKEMAIL的源码，发现邮件群发是先将要发送到的邮件地址，
传给服务器，然后再传一次数据即可，至于向各个目标地址发送邮件的活
则由服务器自己来做，这样一来如果要发送到的目标地址太多，肯定会使
服务器难以承受负荷的，所以我想请教一下各位，大概向服务器一次发送
多少个邮件地址比较适合。
to xujiancai:
HTML其实就是一种有格式的文本吗！把一堆文本整理一下然后再生成HTML
文档应当不是什么困难的事情吧。生成的HTML文档可以通过编码然后当做
邮件的附件来发送，这是标准的做法。E-MAIL软件在读信的时候所读的HT
ML文档也是从附件中扩展出来的。
另外建立发送邮件的部分还是参考现成的控件自己来写比较好，DELPHI带
的那个东西是ACTIVEX控件，不仅分发时会带来麻烦，而且相对内部代码
来说也是相当的脆弱。
另外你所说的HTML格式邮件编码，则可以使用现成E-MAIL控件的邮件编码
部分（SAKEMAIL就有），另外对于附件部分的编码最好使用FOXMAIL的那
种BASE64编码方式。
其实我也正是写这样功能的一个软件，非常写和我正在做同样工作的人进
行一下交流。让我们比一比，看谁的软件写得好。

To All:
用TNMSMTP控件发HTML格式的邮件我早就实现了，并不这样烦，只要设置
subtype属性为mthtml就行了！

我现在的问题是：如果所发的信（html格式）含有图片的时候，这图片应该
怎样发出去（请参考索易的信）。一附件发出去，好像不能看到正常的连接。
另：重要的是这些信件怎样从已有的网页里自动生成。我的目的是自动生成
邮件发给用户（用户可能有几十万）

To liguang:
我检查索易发过来的邮件的原始信息，发现它的图像是以大段的编码存在的，
我不知道怎样。

你所说的SOIMEXPRESS邮件中图形的大块信息，其实是经过BASE64
编码的信息，标识这个附件信息的部分不是写得很明白了吗："Content-Transfer-Encoding: base64"。解这种编码的函数到处都是
，我现在用的是SAKEMAIL中SYSMIME单元中的解码和编码函数，感觉效
果不错。建立去下载一份SAKEMAIL看一看。附：开始我觉得发送邮件会
是一件很复杂的事情，但是当我看到了SAKEMAIL的源码后，发现发件邮
件却是如一件此简单的事情。

多人接受答案了。