delphi连接sqlserver参数问题？？还是'microsoft.jet.oledb.4.0问题(0分)

左兄，没有其他快速办法只能直接写给你想给个解决方法，这个问题其他朋友也出了主意，就是出现问题。麻烦老师了。
后台过程名up_excel_export_to_db，语句为
declare @s varchar(1000)
set @s='insert into aa select * from OPENROWSET(''microsoft.jet.oledb.4.0'',''Excel 8.0;HDR=YES;Database='+@excelpath+''',''select * from [Sheet1$]'')'
exec(@s)
直接赋值给@EXCELPATH后分析器中运行up_excel_export_to_db，成功执行！
前台一个adostoreproc连接，直接对adostoreproc赋值后，active为TRUE时，也成功执行！
问题是；在DELPHI脚本中
adostoreproc.Close;
adostoreproc.Parameters.ParamByName('@excelpath').Value := 'c:/aa.xls';
adostoreproc.ExecProc;
前台delphi 是先打开aa.xls文件后传到一个ADODataSet1后显示在GRIDS控件后（因为需要先预览下），之后才把aa.xls的路径如：c:/aa.xls传到Adosp_ExcelToDb过程中出现问题的。
ADODataSet1属性中commandtext是Sheet1$
ADODataSet1属性中commandtype是cmdTableDirect
却出现错误提示为：Ole Db provider 'microsoft.jet.oledb.4.0' reported an error
是不是小引用了那些资源？？？？
（已经引用的资源：uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
RXCtrls, ExtCtrls, RXClock,OleServer, Excel97, Grids, DBGridEh,DB, ADODB,ComObj;）
版本是delphi5,和ado3个补丁版本。D5EntUpdate；D5ADOUpgrade；d5adoupdate2
sqlserver7.0
就是这个功能出现问题，但在其他过程参数传递就没有问题，焦急中。