SQL SERVER²Ù×÷ACCESSµÄ´æ´¢¹ý³Ì

/*
--×÷ÓãºSQL SERVER²Ù×÷ACCESSµÄ´æ´¢¹ý³Ì
----------------------Ó÷¨-------------------------------
--´´½¨±ítc
exec sp_operate_access 'create table tc(id int)','c:\db1.mdb'
go
--ÔÚtc±í²åÈëÊý¾Ý
exec sp_operate_access 'insert into tc(id) values(1)','c:\db1.mdb'
go
--ɾ³ýtc±íµÄÊý¾Ý
exec sp_operate_access 'delete from tc where id=1','c:\db1.mdb'
go
--ɾ³ýTC±í
exec sp_operate_access 'drop table tc','c:\db1.mdb'
go
--ɾ³ý´æ´¢¹ý³Ì
drop proc sp_operate_access
*/
--´´½¨´æ´¢¹ý³Ì
create proc sp_operate_access
@cmdsql varchar(8000),
@accessfilename nvarchar(1000)
as
begin   
    declare @out int,@err int,@obj int,@constr nvarchar(1000),@src nvarchar(255),@desc nvarchar(255)
   
    select @constr='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+@accessfilename  
   
    exec @err=sp_oacreate 'adodb.connection',@obj out
    if @err=0
    begin
        exec @err=sp_oamethod @obj,'open',null,@constr
        if @err=0
        begin
            exec @err=sp_oamethod @obj,'execute',@out out,@cmdsql
            if @err=0
            begin
                EXEC sp_OAMethod @obj, 'Quit'
                exec sp_oadestroy @obj
                return
            end
            else