2007年2月27日星期二

一段批量将doc文件存为同名txt的autohotkey代码

最近在好好学习地写论文,做了一些批量根据数据生成tecplot图形lay文件和利用autohotkey编写地批量tecplot图形的wmf导出代码,由于不通用,就不放在这里了。doslib7.5的chm文件已经全部翻译完毕,但还在校对中。计划写一个autocad外挂程序小览,这个茶余饭后会完成。

下面简单的介绍一个批量将doc文件存为同名txt的autohotkey代码,可以改造成其他类似用途。


FileList = ; Initialize to be blank.
Loop, g:\3\*.*
FileList = %FileList%%A_LoopFileName%`n
Sort, FileList, R ; The R option sorts in reverse order. See Sort for other options.
Loop, parse, FileList, `n
{
if A_LoopField = ; Ignore the blank item at the end of the list.
continue
Run g:\3\%A_LoopField%
WinWaitActive,,,0.5
Send, !fa{tab}{down}{down}{down}{enter}!s!fc
}