高分求助:delphi怎样获取EXCEL里的所有工作表的名字？(200分)

高分求助:delphi怎样获取EXCEL里的所有工作表的名字？

我是用ADO + EXCEL，直接将EXCEL当作数据库来处理，但是现在要知道EXCEL有哪些工作表，才能全部取出来， 高手请相助！

给我油邮箱我给你发过去，现在我要下了．如果你不着急我可以改天贴上，给多少分无所谓，关键看好不好用．

ConnStr := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=';
ConnStr := ConnStr + excelFileName;
ConnStr := ConnStr +
';Mode=Read;Extended Properties=Excel 8.0;Persist Security Info=False';
ADOConn.Connected := False;
ADOConn.ConnectionString := ConnStr;
ADOConn.Connected := True;
ADOConn.GetTableNames(combox.Items, False);

万分感谢！
喜欢DELPHI，就是因为有一群热线的DELPHI开发者！

热心！！！ 一激动打错字了，呵呵