软件下载 | 资讯教程 | 最近更新 | 下载排行 | 一键转帖 | 发布投稿
您的位置:最火下载站 > 电脑教程 > 编程开发 > 其它语言 > Gentee语言编写的简易文档批量改名工具

Gentee语言编写的简易文档批量改名工具

能够批量将包含“张三,”“01”,“实验3”
这类的不规范文件名批量更改为“01张三.doc”格式。
学号在前,姓名在后。

使用方法:

建立\namelist.txt文件如下:
学号,姓名
01,张三
02,李四
03,王五
.....

\doc目录下存放所有的实验报告

\doc\张三01.doc
\doc\李四04.doc

程序

输出文件夹为\doc\output\

代码片段:

Copy to ClipboardLiehuo.Net Codes引用的内容:[www.veryhuo.com]
#asm=1
#output=rename.exe
#optimizer= 1 d n u
#exe=1 r a
#icon=icon.ico

type names
{
str id
str name
}

func main<main>
{
arr m of names
uint i,j

str namefile
arrstr namelist,n

namefile.read("namelist.txt")
namefile.lines(namelist,0)

foreach name,namelist
{
name.split(n,',',$SPLIT_FIRST | $SPLIT_NOSYS | $SPLIT_EMPTY)
if(*n>=2)
{
m.insert(i)
m[i].id=n[0]
m[i].name=n[1]
i++
}
}


ffind fd
str curdir,dir
str log
getcurdir(curdir)
if !curdir.islast('\'):curdir+="\\"
dir=curdir+"doc"
if !direxist(dir):createdir(dir)
createdir(dir+"\\output")

fd.init(dir+"\\*.*",$FIND_FILE)

foreach cur,fd
{
foreach mm,m
{
if cur.name.search(mm.name,$QS_WORD)||cur.name.search(mm.id,$QS_WORD)
{
if !cur.name.search("实验"+mm.id,$QS_WORD)
{
log+=cur.name+"=>"+mm.id+mm.name+".doc\n"
copyfile(cur.fullname,dir+"\\output\\"+mm.id+mm.name+".doc")
}
}
}
}

@log
log.write("log.txt")


getch()
}
    相关阅读
    栏目导航
    推荐软件