【TC技巧】如何将多个文件分别移入到以文件名命名的文件夹中
http://chenqj.blogspot.com
近日遇到了一个问题,有一堆pdf,是文献的,内置图片文件,文件个头很大,大概每个30M/6页,于是希望将其变小,顺序依次是,用PDF to IMAGE软件提取每个pdf的图片,然后进行图片处理,再用老马的freepic2pdf转为新的pdf。在这过程中,最好是一个pdf在一个文件夹中,这样子,pdf提取的图形文件才不会太混乱。那么如何把一堆pdf文件分别移到多个文件夹中呢。开始想找软件,后来发现用Total Commander(TC)两步就可以完成了,于是乎如下做:
(1)将多个Pdf分别压缩到多个压缩文件中(按alt+F5,选中对每个文件分别创建压缩包,可选移动到压缩文件中)
(2)将多个压缩包解压(按alt+F9,选中将每个压缩文件解压到同名的文件夹中)
关键就是括号内TC提供的功能了。
:),大功告成
【TC技巧】如何将多个文件分别移入到以文件名命名的文件夹中
November 3, 2008
软件学习心得, total commander, totalcmd Leave a comment
[Totalcmd]根据文本文件的内容依次对文件进行批量重命名
March 15, 2007
软件使用心得, total commander, totalcmd 2 Comments
[Totalcmd]根据文本文件的内容依次对文件进行批量重命名
上次写过一篇关于根据某文件的第几行对各文件进行批量重命名的文章。
http://chenqj.blogspot.com/search/label/totalcmd
主要的方法是根据TC的一个script wdx插件编写脚本来完成的。
由于最近碰到一个类似的问题,有某期刊某一年的一批caj期刊文件,名字顺序是对的,但是只是简单的1,2,3之类的名字。而具体的文章名字通过查询期刊网已经按照顺序放在一个文本文件里面。
比如c:\123.txt中有新的名字顺序
1.数学的应用
2.物理的范畴
那么研究,写了一个这样的代码
(注:下面的代码是针对一个文件名前面有001,002等三个数字开头的txt文件进行操作的,其脚本给出的结果是根据这前面的三位数字代表的数值去查找相对应的c:\123.txt中的行的内容,来显示在wdx的content行中。)
(注1:怎么给待操作的文件预先加上3位数字?,可以通过先重命名一次来得到)
(注2:怎么根据content进行批量重命名:见重命名中的plugin部分)
vbs代码:
'Script for Script Content Plugin
'qjchen
Dim fso, ts, s, re, fd ,f
Set fso = CreateObject("Scripting.FileSystemObject")
sExt = lcase(fso.GetExtensionName(filename))
Const ForReading = 1
Select Case sExt
case "bar"
content="bar file"' Just For testing
'---------------------------------
case "txt"
Set fd = fso.GetFile(filename)
name = fd.Name
num=left(name,3)
num=cint(num)
f1="c:\123.txt"
Set f = fso.GetFile(f1)
Set ts = fso.OpenTextFile(f1, ForReading)
for i= 1 to num
s = ts.readline
next
ts.Close
content= s
Case Else
'content = sExt + " file type"
End Select
可以把这段代码存为该插件目录下的1.vbs
打开script.ini,修改其中的extension段为:
[Extension]
Script=1.vbs
结果如图
由于脚本编写水平属于现学现用型,有点乱,见笑了,应可精简不少。
[Totalcmd]根据文本文件的内容依次对文件进行批量重命名
March 15, 2007
软件使用心得, total commander, totalcmd 2 Comments
[Totalcmd]根据文本文件的内容依次对文件进行批量重命名
上次写过一篇关于根据某文件的第几行对各文件进行批量重命名的文章。
http://chenqj.blogspot.com/search/label/totalcmd
主要的方法是根据TC的一个script wdx插件编写脚本来完成的。
由于最近碰到一个类似的问题,有某期刊某一年的一批caj期刊文件,名字顺序是对的,但是只是简单的1,2,3之类的名字。而具体的文章名字通过查询期刊网已经按照顺序放在一个文本文件里面。
比如c:\123.txt中有新的名字顺序
1.数学的应用
2.物理的范畴
那么研究,写了一个这样的代码
(注:下面的代码是针对一个文件名前面有001,002等三个数字开头的txt文件进行操作的,其脚本给出的结果是根据这前面的三位数字代表的数值去查找相对应的c:\123.txt中的行的内容,来显示在wdx的content行中。)
(注1:怎么给待操作的文件预先加上3位数字?,可以通过先重命名一次来得到)
(注2:怎么根据content进行批量重命名:见重命名中的plugin部分)
vbs代码:
'Script for Script Content Plugin
'qjchen
Dim fso, ts, s, re, fd ,f
Set fso = CreateObject("Scripting.FileSystemObject")
sExt = lcase(fso.GetExtensionName(filename))
Const ForReading = 1
Select Case sExt
case "bar"
content="bar file"' Just For testing
'---------------------------------
case "txt"
Set fd = fso.GetFile(filename)
name = fd.Name
num=left(name,3)
num=cint(num)
f1="c:\123.txt"
Set f = fso.GetFile(f1)
Set ts = fso.OpenTextFile(f1, ForReading)
for i= 1 to num
s = ts.readline
next
ts.Close
content= s
Case Else
'content = sExt + " file type"
End Select
可以把这段代码存为该插件目录下的1.vbs
打开script.ini,修改其中的extension段为:
[Extension]
Script=1.vbs
结果如图
由于脚本编写水平属于现学现用型,有点乱,见笑了,应可精简不少。
在TC内解双重压缩文件的简单Autohotkey代码
March 6, 2007
autohotkey, total commander, totalcmd Leave a comment
在TC内解双重压缩文件的简单Autohotkey代码
常下软件的朋友经常会遇到zip内有rar文件的情况,此时,需要先解zip再解rar
记得好久之前就出有这样的专门的软件了。
在TC中其实也不麻烦,选zip,按alt+,解压一次,对rar按下右键,也解压就可以了。
用TC script也可以做到一次完成。其实个人觉得TC以后的版本倒不妨加入一个脚本支持,可以有更大的DIY空间。
此处只是提供一种思路。代码也不完善。
请将下面一段代码存为abc.ahk,运行之(需安装有autohotkey),以后在TC中按alt+F2,可以在某些情况下解压双层压缩文件
^F2::
send +{right}
send winrar e *.z?? *.r??{enter}
send md install{enter}
WinWaitActive,,,2
send winrar x *.r?? install\{enter}
return
代码的限制性:
(1)必须安装有winrar
(2)请在TC中先定位到需要解压zip的目录,最好此时还没有什么rar文件
(3)请切换到英文输入法
(4)这个大概对于总和20M左右的压缩文件适合,更多了的情况下需要把第五句修改一下,加大2秒到更长时间(请熟悉autohotkey的朋友告诉一下如何写等待解压完zip再解压rar的方法,谢谢)
所以在没有找到第5句话的写法前,这篇文章的作用还很小。
名词——Autohotkey(www.autohotkey.com),可参考xbeta和yonken的文章。
http://www.blogcn.com/user48/yonken/index.html
它的作用就是完成一些批量的工作。本人只学了一点皮毛。比如拿它来作批量将doc文件导为txt文件,批量按文本文件第三行来修改文件名,批量将tecplot的lay文件导出为wmf文件,用它来定义autocad的加速按键。可能它比hoekey还要稍微强一点,和autoit差不多。
如何使用:用一个文本文件编写一段代码,保存为.ahk文件,然后运行这个ahk文件即可。常见用法,可以在同一个ahk文件内定义许多快捷键及其相对应的批操作。
在TC内解双重压缩文件的简单Autohotkey代码
March 6, 2007
autohotkey, total commander, totalcmd Leave a comment
在TC内解双重压缩文件的简单Autohotkey代码
常下软件的朋友经常会遇到zip内有rar文件的情况,此时,需要先解zip再解rar
记得好久之前就出有这样的专门的软件了。
在TC中其实也不麻烦,选zip,按alt+,解压一次,对rar按下右键,也解压就可以了。
用TC script也可以做到一次完成。其实个人觉得TC以后的版本倒不妨加入一个脚本支持,可以有更大的DIY空间。
此处只是提供一种思路。代码也不完善。
请将下面一段代码存为abc.ahk,运行之(需安装有autohotkey),以后在TC中按alt+F2,可以在某些情况下解压双层压缩文件
^F2::
send +{right}
send winrar e *.z?? *.r??{enter}
send md install{enter}
WinWaitActive,,,2
send winrar x *.r?? install\{enter}
return
代码的限制性:
(1)必须安装有winrar
(2)请在TC中先定位到需要解压zip的目录,最好此时还没有什么rar文件
(3)请切换到英文输入法
(4)这个大概对于总和20M左右的压缩文件适合,更多了的情况下需要把第五句修改一下,加大2秒到更长时间(请熟悉autohotkey的朋友告诉一下如何写等待解压完zip再解压rar的方法,谢谢)
所以在没有找到第5句话的写法前,这篇文章的作用还很小。
名词——Autohotkey(www.autohotkey.com),可参考xbeta和yonken的文章。
http://www.blogcn.com/user48/yonken/index.html
它的作用就是完成一些批量的工作。本人只学了一点皮毛。比如拿它来作批量将doc文件导为txt文件,批量按文本文件第三行来修改文件名,批量将tecplot的lay文件导出为wmf文件,用它来定义autocad的加速按键。可能它比hoekey还要稍微强一点,和autoit差不多。
如何使用:用一个文本文件编写一段代码,保存为.ahk文件,然后运行这个ahk文件即可。常见用法,可以在同一个ahk文件内定义许多快捷键及其相对应的批操作。
[原创] Totalcmd根据文本文件的第n行批量重命名
February 22, 2007
软件使用心得, total commander, totalcmd 2 Comments
[原创] Totalcmd根据文本文件的第n行批量重命名
(华南理工大学建筑学院 qjchen)
问题1:
有一批txt文件,希望根据其文本文件的第一行或者第n行内容重命名文件【这个问题有时在某些下
载的电子书会遇到)。
问题2:
或者有一批html文件,希望根据其标题(title)进行批量重命名。(这个问题在没有安装插件
firefox存网页的时候会遇到)
在昨天之前,我还没有什么方法,只能编下程序。
在http://chenqj.blogspot.com/2007/02/4-qjchen-txtca1234-httpqjchen.html
我用Lisp,python,cmd脚本和 Autohotkey等几种小众语言编了完成。
但是一直觉得TC重命名水平很高,于是找WDX插件,找到如下这个——Script Content plugin
——Lev Freidin (c) 2005
下载地址:
http://www.totalcmd.net/plugring/script_wdx.html
这个WDX插件的功能非常强大,它可以读取js和vbs脚本的结果来作为一个TC的内容插件。这点给用户的自定义性非常强。
它自带了几个脚本,其中的ext.vbs给我们如下功能
‘Show size for eps, ai, ps, prn files (查看eps, ai, ps, prn文件的尺寸)
‘Show title for htm, html files (查看htm和html文件的标题——title)
WDX插件的很大一个用处就是重命名。可以查看title内容就可以按照它修改。
但是它离我的目标还差一点,没有显示文本内容,怎么办。本人编程水平还比较低,只能依样画葫芦写出如下一段代码。
‘———————————
case “txt”
Set f = fso.GetFile(filename)
Set ts = fso.OpenTextFile(filename, ForReading)
s = ts.readline
s = ts.readline
s = ts.readline
ts.Close
content= s
把这段代码拷贝到ext.vbs的Select Case sExt这句话的下一行,保存文件,即可。(注意,本文是读取文本txt文件的第三行,所以这么写。假如是第n行,当然可以把ts.readline写上n遍,但是最好还是写个for循环吧)
作者说了,假如你想多几个内容,可以把这个程序拷贝多几个目录,分别指定vbs,这个可以打开script.ini,看看[Script]的Section这个段,比如把Section=AddZeros就变成了其自带的另外一种内容显示模式(文件名中数字填充0的模式,方便排序)
接下来的wdx自定义列及重命名工作,各位肯定很熟手,就不一一列举了。
主要是在Ctrl+M之后,选Plugins就可以了。
我在这里放了一个swf文件,主要是为了顺便学习Wink的应用
http://qjchen.googlepages.com/mytcrename1.htm
各位见笑了:)
[原创] Totalcmd根据文本文件的第n行批量重命名
February 22, 2007
软件使用心得, total commander, totalcmd 2 Comments
[原创] Totalcmd根据文本文件的第n行批量重命名
(华南理工大学建筑学院 qjchen)
问题1:
有一批txt文件,希望根据其文本文件的第一行或者第n行内容重命名文件【这个问题有时在某些下
载的电子书会遇到)。
问题2:
或者有一批html文件,希望根据其标题(title)进行批量重命名。(这个问题在没有安装插件
firefox存网页的时候会遇到)
在昨天之前,我还没有什么方法,只能编下程序。
在http://chenqj.blogspot.com/2007/02/4-qjchen-txtca1234-httpqjchen.html
我用Lisp,python,cmd脚本和 Autohotkey等几种小众语言编了完成。
但是一直觉得TC重命名水平很高,于是找WDX插件,找到如下这个——Script Content plugin
——Lev Freidin (c) 2005
下载地址:
http://www.totalcmd.net/plugring/script_wdx.html
这个WDX插件的功能非常强大,它可以读取js和vbs脚本的结果来作为一个TC的内容插件。这点给用户的自定义性非常强。
它自带了几个脚本,其中的ext.vbs给我们如下功能
‘Show size for eps, ai, ps, prn files (查看eps, ai, ps, prn文件的尺寸)
‘Show title for htm, html files (查看htm和html文件的标题——title)
WDX插件的很大一个用处就是重命名。可以查看title内容就可以按照它修改。
但是它离我的目标还差一点,没有显示文本内容,怎么办。本人编程水平还比较低,只能依样画葫芦写出如下一段代码。
‘———————————
case “txt”
Set f = fso.GetFile(filename)
Set ts = fso.OpenTextFile(filename, ForReading)
s = ts.readline
s = ts.readline
s = ts.readline
ts.Close
content= s
把这段代码拷贝到ext.vbs的Select Case sExt这句话的下一行,保存文件,即可。(注意,本文是读取文本txt文件的第三行,所以这么写。假如是第n行,当然可以把ts.readline写上n遍,但是最好还是写个for循环吧)
作者说了,假如你想多几个内容,可以把这个程序拷贝多几个目录,分别指定vbs,这个可以打开script.ini,看看[Script]的Section这个段,比如把Section=AddZeros就变成了其自带的另外一种内容显示模式(文件名中数字填充0的模式,方便排序)
接下来的wdx自定义列及重命名工作,各位肯定很熟手,就不一一列举了。
主要是在Ctrl+M之后,选Plugins就可以了。
我在这里放了一个swf文件,主要是为了顺便学习Wink的应用
http://qjchen.googlepages.com/mytcrename1.htm
各位见笑了:)
Totalcmd (Total Commander 7)的令人愉悦的新功能
November 30, 2006
软件使用心得, total commander, totalcmd, typeandrun 1 Comment
用Totalcmd也有8年的,是很早时候OLDFAT兄介绍的3.5开始,最近总算看到版本翻倍的时候了。许多软件我都懒得去更新,比如office一直用的是97的,还觉得只用到极少的功能,autocad还用14的等等,但是基本上Totalcmd我是跟着升级的,还不断到www.totalcmd.net更新插件。
7.0虽然还是beta版,但毕竟是个大号版本的更新,还是有不少新功能的,DRL有朋友已经全部翻译了更新,这里就不重复,贴几张TC的更新图片吧。
1)图标变得漂亮(用了大图标,为了显示而已),感觉颇是淡雅的感觉。
2)给同时喜欢资源管理器的朋友增加了侧边栏(一个或者两个)

3)命令行的自动补全,向win+r和typeandrun靠齐了

4)单双行颜色不同的选项,记得以前有一个非常类似TC的程序有这样的功能,竖列还有虚线可以选,比现在的TC还要好些,不过相信TC会越做越好。
5)可以用简单的按键,比如F1,或者一个名称,如nn,来调用TC内部函数和其他外部函数了,这个就是它的HOTKEY或者ALIAS功能了。以前在config-misc里面,只能用到内部程序,而在start里面,调用的基本是ctrl+alt+F1之类比较难按的按键。
Totalcmd (Total Commander 7)的令人愉悦的新功能
November 30, 2006
软件使用心得, total commander, totalcmd, typeandrun 1 Comment
用Totalcmd也有8年的,是很早时候OLDFAT兄介绍的3.5开始,最近总算看到版本翻倍的时候了。许多软件我都懒得去更新,比如office一直用的是97的,还觉得只用到极少的功能,autocad还用14的等等,但是基本上Totalcmd我是跟着升级的,还不断到www.totalcmd.net更新插件。
7.0虽然还是beta版,但毕竟是个大号版本的更新,还是有不少新功能的,DRL有朋友已经全部翻译了更新,这里就不重复,贴几张TC的更新图片吧。
1)图标变得漂亮(用了大图标,为了显示而已),感觉颇是淡雅的感觉。
2)给同时喜欢资源管理器的朋友增加了侧边栏(一个或者两个)

3)命令行的自动补全,向win+r和typeandrun靠齐了

4)单双行颜色不同的选项,记得以前有一个非常类似TC的程序有这样的功能,竖列还有虚线可以选,比现在的TC还要好些,不过相信TC会越做越好。
5)可以用简单的按键,比如F1,或者一个名称,如nn,来调用TC内部函数和其他外部函数了,这个就是它的HOTKEY或者ALIAS功能了。以前在config-misc里面,只能用到内部程序,而在start里面,调用的基本是ctrl+alt+F1之类比较难按的按键。
妙用TC小技巧 文件夹的大小随便看
October 14, 2006
软件使用心得, total commander, totalcmd Leave a comment
每年总会向《电脑商情报》投几篇文章,来年的几份报纸(《电脑商情报》、《中国国家地理》、羊城晚报》)订购就有着落了。
下面是一篇小文章:妙用TC小技巧,文件夹的大小随便看
[2006-06-19 13:33:24] [作者:qjchen] [责任编辑:黄莹]
由于有版权问题,因此只提供链接就是了
http://family.chinaok.com/2006-06/20110.htm
