难道这个问题没有人能够解答吗？ (20分)

我用下面的代码实现IE收藏夹的备份：
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs ,ComObj,SHDocVw, StdCtrls;
const
CLSID_ShellUIHelper: TGUID = '{64AB4BB7-111E-11D1-8F79-00C04FC2FBE1}';
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
Sh: ISHellUIHelper;
begin
Sh := CreateComObject(CLSID_SHELLUIHELPER) as ISHELLUIHELPER;
sh.ImportExportFavorites(TRUE, '');
end;

end.

但是他提示是否保存到c:/1.htm，请问如何不显示这个提示，直接备份？

你直接拷贝C:/Documents and Settings/a-5/Favorites下面的东西不久的了

1:71的比率，竟然是这个答案，天那，
我想解决这个问题

呵呵，我也没有找到解决的办法。

这个问题真的那么男吗？
为什么ieFavoritesmenu控件就解决了？（不过我没看懂，它的代码跟我一样）
天那，谁能帮帮忙啊

Variants是什么东西，我测试上面的程序的时候不能通过。
删了这个东西，然后可以运行，不过提示我找一个BookMark.html文件？？？