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

最新推荐文章于 2022-12-22 16:25:02 发布

Landa_Peter

最新推荐文章于 2022-12-22 16:25:02 发布

阅读量842

点赞数

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

本文链接：https://blog.csdn.net/u012158899/article/details/12709811

版权

 
      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