IF EXISTS (SELECT name FROM sysobjects 
         WHERE name = 'indata' AND type = 'P')   DROP PROCEDURE indata
GO
CREATE PROCEDURE indata
@kk varchar(40),
@servername varchar(40)
AS
set @kk='"Data Source='+@servername+';User ID=Admin;Password="'  
print @kk
begin TRANSACTION
declare @tt varchar(8000);
set @tt='insert into bm出库表 SELECT  * FROM OPENDATASOURCE(''SQLOLEDB''',+@KK+''').YY.dbo.bm30001出库表 where 日期=''2004-01-01'''
exec @tt
IF (@@ERROR <> 0)
begin
delete  from bm出库表 where 日期='2004-05-06'
ROLLBACK TRANSACTION
endelse
Commit TRANSACTION