重命名文件-DOS问题?
我有一堆文件要重命名(通常是)E343-12-GA-0001-01。图纸至E343-12-GA-0001-01-T.dwg我以前可以在DOS中这样做,但我忘记了怎么做了。当我现在尝试时,我得到了E343-12-GA-0001-T.dwg(注意没有-01)
有人想帮我吗?
我目前正在通过dir对文件重新编号。*/重新编号。bat和在EXCEL中编辑文件,但这比另一种方法更容易出现操作员错误。
如果有可用的windows命令,我不需要使用DOS。 DOS中提到的旧REN命令。仍然可以从命令行提示符在Windows中使用。 这就是我正在使用的,我找不到在文件名之后但在之前添加-t的语法。图纸 尝试在Windows资源管理器的“帮助”下查找。搜索重命名文件。其中一个结果将被重命名(任)。我很确定所有的语法都在这里解释过了。 这应该在LISP中工作:
(defun c:DocSuff (/ *error* *acad FOLDER FPATH SHELL SUFF)
(vl-load-com)
;; Suffix Filename~Lee Mac
(defun *error* (msg)
(and Shell (not (vlax-object-released-p Shell))
(vlax-release-object Shell))
(or (wcmatch (strcase msg) "*BREAK,*CANCEL*,*EXIT*")
(princ (strcat "\n** Error: " msg " **")))
(princ))
(setq Suff (getstring t "\nSpecify Suffix: ")
*acad(vlax-get-acad-object)
shell(vla-getInterfaceObject *acad "Shell.Application")
folder (vlax-invoke-method shell 'BrowseForFolder
(vla-get-HWND *acad) "Select Directory" 0))
(vlax-release-object shell)
(if folder
(progn
(setq fpath (vlax-get-property
(vlax-get-property folder 'Self) 'Path))
(and (/= (substr fpath (strlen fpath)) "\\")
(setq fpath (strcat fpath "\\")))
(foreach dwg (mapcar
(function
(lambda (x) (strcat fpath x)))
(vl-directory-files fpath "*.dwg" 1))
(vl-file-rename dwg
(strcat fpath (vl-filename-base dwg) Suff ".dwg"))))
(princ "\n*Cancel*"))
(princ))
将重命名目录中的所有内容。 为DOS和Windows用户重命名文件和目录(文件夹)。
http://www.computerhope.com/issues/ch000846.htm#4
我想你只需要一个通配符。 谢谢大家的建议,最后使用excel还不错-我只需设置一次,然后将列表复制粘贴到一列中,然后将修改后的列表复制回文件并重命名。蝙蝠,点击,全部完成。
Mark,我能找到的所有示例都会更改文件名的一部分(比如第5个字母),但不会添加到其中。仍然记不起如何在名称中附加一个部分(除了通过编程-谢谢李,我本来打算用VB实现它,但你更快了)。我想我以前知道怎么做,但也许不知道。
不用担心,只要对你有用,我只会坚持我所知道的 示例:重命名两个名为plot的文件。log和replot log使用DOS绘制T.log和replot-T.log。
任***-T*
这假设文件夹中没有其他文件扩展名,因为*是通配符。如果有,我们必须得到具体的类型:
任*。日志*-T.log
戴夫,有什么消息吗? 这是我(以为我)试过的,但我只得到了12345678。图纸>123456-T.dwg
但可能是操作员错误。我明年还有一套要重新命名。那我看看能不能记住。
页:
[1]
2