求助，为什么下载的文件只有5k(100分)

我单位OA用的是Lotus，我现在编一个程序，在IE右键弹出菜单上执行我的程序，下载OA上的文件.
现在问题是：
１.每次收下的文件都是5k大小，而按IE的目标另存为却没有问题.
２.Url中文件名有时会有乱码，我的程序就会出现问题，而IE的另存为能正确解析文件名.
３.在某些文件链接上按IE右键触发我的程序时经常会弹出当前脚本发生错误的对话框，提示对象不支持此属性或方法：EventElement.href　.　这个是我在GetUrl.html的VB脚本中定义的，有的文件链接时没有问题.

这是我的代码，用的IDHttp控件
function TfrmDownLoad.DownLoadFile(sURL, sFName: string): boolean;
var tStream: TMemoryStream;
begin
tStream := TMemoryStream.Create;
try
try
IdHTTP1.Get(sURL, tStream);
tStream.SaveToFile(sFName);
　 Result := True;
finally tStream.Free;
end;
except
Result := False;
tStream.Free;
end;
end;

而且这个AWorkCountMax也很奇怪，跟踪调试也是5K！！就是说idhttp一开始就认为它是5k.
procedure TfrmDownLoad.IdHTTP1WorkBegin(Sender: TObject;
AWorkMode: TWorkMode; const AWorkCountMax: Integer);
begin
ProgressBar1.Max := AWorkCountMax;
ProgressBar1.Position := 0;
end;

谢谢了.

Lotus进行文件下载的时候，文件是临时生成的吧，会不会和这个相关？

试试UrlDownloadToFile，如果还是不行，可能就遇上我那个问题了。
http://www.delphibbs.com/delphibbs/dispq.asp?lid=3525080

weiliu，我已把我上一个贴子的１００分给你了，你的问题和我的有相似之处，现在，我们面临的问题都是要搞清楚IE在保存文件的机制.如果你弄明白了一定要告诉我.[]