20分 html文件是,如何将ｅｘｃｅｌ文件转为html 文件(20分)

我使用的是delphi5的server控件，

不知道各位有什么好方法没有．下面是我的代码，总是不能实现

不知道这是为什么！！

不好意识，没多少分了．全部奉上

try

ExcelApplication1.Connect;

ExcelApplication1.Visible[0] := True;

ExcelWorkbook1.ConnectTo(

ExcelApplication1.Workbooks.Add(Null, 0));

ExcelWorksheet1.ConnectTo(

ExcelWorkbook1.Worksheets['Sheet1'] as _Worksheet);

ExcelWorksheet1.Cells.Item[1,1]:=1;

ExcelWorksheet1.Cells.Item[2,1]:=1;

ExcelWorkbook1.SaveAs('F:/wy/软件/ExcelTst/Sample1.htm',

'xlhtml' ,

Null ,

Null ,

Null ,

Null ,

xlShared ,

Null ,

Null ,

Null ,

Null ,

0);

finally

//Excel終了

ExcelApplication1.Quit;

end;