22,300
社区成员




exec xp_cmdshell 'del D:\MailData.xls'
declare @fname nvarchar(250),@err int,@obj int,@constr nvarchar(1000),@out int
set @fname='D:\MailData.xls'
set @constr='Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties="Excel 8.0;HDR=YES'
+';DATABASE='+@fname+'"'
--连接数据库
exec @err=sp_oacreate 'adodb.connection',@obj out
if @err<>0
begin
print 1
print @err
end
else
exec @err=sp_oamethod @obj,'open',null,@constr
if @err<>0
begin
print 2
print @err
end
exec @err=sp_oadestroy @out
exec @err=sp_oadestroy @obj
--返回内容
2
-2146824582