如何解决一次执行多文件中的存储过程

 

 

 

DECLARE @folder VARCHAR(200)

SET @folder='e:\tmp'

  

DECLARE @err INT,@fso INT,@dic INT,@f INT,@fldExists BIT,@fleExists BIT,@fld INT,@fle INT,@fleList INT,@cnt INT,@eof BIT

DECLARE @t TABLE(id INT IDENTITY(1,1),fName VARCHAR(200))

--创建fso

EXEC @err=sp_OACreate 'Scripting.FileSystemObject',@fso OUTPUT

--检测指定目录是否存在

EXEC @err=sp_OAMethod @fso, 'FolderExists',@fldExists OUTPUT,@folder

  

IF @fldExists=0

    PRINT 'floder does not exist!'

ELSE

    BEGIN

  

        --将指定目录给@fld对象

        EXEC @err=sp_OAMethod @fso,'GetFolder',@fld OUTPUT,@folder

        --获取指定目录的文件集合

        EXEC @err=sp_OAGetProperty @fld,'files',@fleList OUTPUT

        --获取目录下的文件数，准备循环使用    

        EXEC @err=sp_OAGetProperty @fleList,'Count',@cnt OUTPUT

        --输出

        SELECT @err 错误编号,@fldExists 目录存在否,@cnt 文件数

        --WHILE @eof!=0

        --BEGIN

            --检测是否没有文件了

  

  

      

    END