带通配符,查找 指定目录下文件的SQL存储过程
admin
2023-06-11 08:43:19
0次

通配符查找 指定目录下文件的过程:

--查找指定文件夹(目录)下的文件。
ALTER PROCEDURE [FileS].[DIR_FileS]
@Path nvarchar(1000) --搜索路径。
        --表示【文件夹路径】必须以'\'结尾;
        --表示【文件路径】不能以\结尾。(文件名可带通配符)
,@FileS nvarchar(MAX) OUTPUT --返回 找到的 文件名串
,@Depth int=1 --搜索[文件夹]深度。不为1,将搜索[子文件夹]。0全部目录,1 第一级目录,2 第二级目录 依此类推
,@FG nvarchar(10)=NULL --文件名串的 分隔符;默认char(13)
AS
BEGIN
        SET NOCOUNT ON;        
        SET @FG=ISNULL(@FG,char(13));--分隔符;默认char(13)
        IF @Depth<0 SET @Depth=1;--深度为负数,改1

        SET @FileS=NULL;
        DECLARE @Tab table ([FileName] nvarchar(Max),depth smallint,isfile bit); 
        DECLARE @FileName as nvarchar(Max);
        DECLARE @i as int;
        
        --整理 参数 @Path 
        SET @Path =RTRIM(LTRIM(ISNULL(@Path,''))); --'
        IF LEN(@Path)<2 GOTO END1; --无效的参数 @Path 
        
        --分离 文件名(带通配符)
        IF CHARINDEX('\',@Path,1)>0 AND RIGHT(@Path,1)<>'\' BEGIN     --'           
                --取最右侧'\' 位置
                SET @i =LEN(@Path);
                while @i>0 AND SUBSTRING(@Path,@i,1)<>'\' BEGIN   --'
                        SET @i=@i-1;
                        END;
                IF @i>0 BEGIN 
                        --截取 文件名
                        SET @FileName=SUBSTRING(@Path,@i+1,LEN(@Path));
                        SET @Path =SUBSTRING(@Path,1,@i-1);
                        --转换通配符
                        SET @FileName=replace(@FileName,'*','%');
                        SET @FileName=replace(@FileName,'?','_');
                        END;
                END;
        --print '@Path='+ISNULL(@Path,'')+'  @FileName='+ISNULL(@FileName,'');
         
        insert @Tab exec master..xp_dirtree @Path
        ,@Depth --查找深度:0全部目录,1 第一级目录,2 第二级目录 依此类推
        ,1 ;--0文件夹,非0:文件夹和文件名

        --删除不匹配 记录
        IF ISNULL(@FileName,'')<>'' BEGIN 
                --select [FileName] from @Tab WHERE [isfile]=1 AND [FileName]like @FileName ;        
                DELETE @Tab WHERE [isfile]<>1 OR [FileName]not like @FileName;                        
                END;
        ELSE DELETE @Tab WHERE [isfile]<>1;
        
        --拼装 文件名串;加 分隔符@FG
        SET @FileS='';
        SELECT @FileS=@FileS+@FG+ISNULL([FileName],'') FROM @Tab;        
        IF @FileS<>''BEGIN  --去除首位 分隔符@FG
                IF SUBSTRING(@FileS,1,LEN(@FG))=@FG BEGIN ;
                        SET @FileS=SUBSTRING(@FileS,LEN(@FG)+1,LEN(@FileS));
                        END;
                END;        
END1:
        --print '@FileS='+@FileS;
        --select [FileName] from @Tab;
END


相关内容

热门资讯

空调连续工作多久需要停机休息 空调连续工作的时间取决于多个因素,包括空调的型号、功率、使用环境和维护情况等。一般来说,空调可以连续...
空调哪个符号是除湿的 空调除湿功能通常用一个水滴形状的符号表示。不同品牌和型号的空调遥控器可能会有所差异,但一般来说,除湿...
格力空调多长时间加一次氟利昂 1、一般情况下,空调对氟利昂的使用量是非常小的,所以在空调使用了四年左右的时候再考虑加也没问题。2、...
空调用多长时间需要加氟一次 一般情况下是五年。当出现以下这几种情况时,空调才需要加氟。1、空调的室内机和室外机各有两个接口,当接...
格调生活·C标思享荟:卡萨帝在... 9月12日的郑州龙湖金融岛,夜风轻拂,灯光璀璨。“C标时刻共传奇——卡萨帝思享荟暨20周年品牌盛典郑...
品牌价值破千亿、高端份额持续领... 9月12日,“C标时刻共传奇——卡萨帝思享荟暨20周年品牌盛典郑州站”在郑州龙湖金融岛举办。2026...
空调主板坏了修800还是换新的 空调主板坏了是修还是换新,需要考虑多个因素,以下是一些建议:1. 维修成本:如果维修费用较低,比如 ...
空调开多久需要休息多长时间 问题:空调开多久需要休息多长时间回答:1、在使用空调的过程中,一般空调开7~8个小时左右需要休息2~...
中央空调多长时间清洗一次 1、一般空调开机前清洗一次即可,空调开机中间时段再清洗一次,空调关机时清洗一次,这样比较合理。2、空...
中央空调氟利昂多久加一次 看空调制热和制冷程度,很多人的观点认为氟利昂必须一年放一次,其实这个观点是错误的,理解上面有点偏差,...