Sql Server中,文件批量重命名

--1. 新建自定义函数:从最后一个特定字符开始截取字符串
create function fn_GetLastCharIndex(@Chars varchar(1000),@Char varchar(10))
returns varchar(1000)
begin
    
declare @i int
    
set @i=CharIndex(@Char,@Chars)
    
while(@i>0)
    
begin
        
set @Chars=Substring(@Chars,@i+1,len(@Chars))
        
set @i=CharIndex(@Char,@Chars)
    
end
    
    
return @Chars
end


--2. 获取文件名列表
if exists(select * from tempdb..sysobjects where id=object_id('tempdb..#temp'))
drop table #temp
create table #temp(filenames varchar(1000))
Insert into #temp(filenames)
Exec master..xp_cmdshell 'dir F:\灌篮高手-全国大赛全彩版'


--3. 重命名
declare @FileName varchar(1000),
    
@NewFileName varchar(1000),
    
@s varchar(1000)
declare cur_1 cursor for
select dbo.fn_GetLastCharIndex(filenames,' ') FileName from #temp where Right(filenames,4in ('.jpg'and filenames like '%slamdunk%' order by 1
open cur_1
fetch cur_1 into @FileName
while(@@fetch_status=0)
begin
    
set @NewFileName = Replace(@FileName,dbo.fn_GetLastCharIndex(@FileName,'-'),Right('00'+dbo.fn_GetLastCharIndex(@FileName,'-'),7))
    
set @s='ren F:\灌篮高手-全国大赛全彩版\' + @FileName + ' ' + @NewFileName    
    
Exec master..xp_cmdshell @s,no_output
fetch cur_1 into @FileName
end
deallocate cur_1
posted @ 2011-07-26 11:19 tohen 阅读(83) 评论(1) 编辑 收藏

 回复 引用 查看   
#1楼[楼主]2011-07-26 11:37 | tohen      
今天,是个特殊的日子。
于是,重温《灌篮高手》——她给了我一段青葱般的岁月,里面有梦想、青春、热血与坚持。
只可惜全国大赛没有动画版,只能看漫画了 ~~-_-...
遂发现AcdSee的图片排序功能太弱,没办法,只能给图片重命名。
于是,花了半个小时,写了上面这段代码。
ok,开看了!