乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 86|回复: 19

[编程交流] 重命名文件-DOS问题?

[复制链接]

48

主题

1073

帖子

1043

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
238
发表于 2022-7-6 10:37:13 | 显示全部楼层 |阅读模式
我有一堆文件要重命名(通常是)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。
回复

使用道具 举报

10

主题

8258

帖子

8335

银币

初来乍到

Rank: 1

铜币
31
发表于 2022-7-6 10:42:01 | 显示全部楼层
DOS中提到的旧REN命令。仍然可以从命令行提示符在Windows中使用。
回复

使用道具 举报

48

主题

1073

帖子

1043

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
238
发表于 2022-7-6 10:46:46 | 显示全部楼层
这就是我正在使用的,我找不到在文件名之后但在之前添加-t的语法。图纸
回复

使用道具 举报

10

主题

8258

帖子

8335

银币

初来乍到

Rank: 1

铜币
31
发表于 2022-7-6 10:49:33 | 显示全部楼层
尝试在Windows资源管理器的“帮助”下查找。搜索重命名文件。其中一个结果将被重命名(任)。我很确定所有的语法都在这里解释过了。
回复

使用道具 举报

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 10:51:13 | 显示全部楼层
这应该在LISP中工作:
 
  1. (defun c:DocSuff (/ *error* *acad FOLDER FPATH SHELL SUFF)
  2. (vl-load-com)
  3. ;; Suffix Filename  ~  Lee Mac
  4. (defun *error* (msg)
  5.    (and Shell (not (vlax-object-released-p Shell))
  6.               (vlax-release-object Shell))   
  7.    (or (wcmatch (strcase msg) "*BREAK,*CANCEL*,*EXIT*")
  8.        (princ (strcat "\n** Error: " msg " **")))
  9.    (princ))
  10. (setq Suff (getstring t "\nSpecify Suffix: ")
  11.        *acad  (vlax-get-acad-object)
  12.        shell  (vla-getInterfaceObject *acad "Shell.Application")
  13.        folder (vlax-invoke-method shell 'BrowseForFolder
  14.                 (vla-get-HWND *acad) "Select Directory" 0))
  15. (vlax-release-object shell)
  16. (if folder
  17.    (progn
  18.      (setq fpath (vlax-get-property
  19.                    (vlax-get-property folder 'Self) 'Path))
  20.      
  21.      (and (/= (substr fpath (strlen fpath)) "\")
  22.           (setq fpath (strcat fpath "\")))
  23.      
  24.      (foreach dwg (mapcar
  25.                     (function
  26.                       (lambda (x) (strcat fpath x)))
  27.                     (vl-directory-files fpath "*.dwg" 1))
  28.       
  29.        (vl-file-rename dwg
  30.          (strcat fpath (vl-filename-base dwg) Suff ".dwg"))))
  31.    
  32.    (princ "\n*Cancel*"))
  33. (princ))

 
将重命名目录中的所有内容。
回复

使用道具 举报

10

主题

8258

帖子

8335

银币

初来乍到

Rank: 1

铜币
31
发表于 2022-7-6 10:54:52 | 显示全部楼层
为DOS和Windows用户重命名文件和目录(文件夹)。
 
http://www.computerhope.com/issues/ch000846.htm#4
 
我想你只需要一个通配符。
回复

使用道具 举报

48

主题

1073

帖子

1043

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
238
发表于 2022-7-6 10:57:33 | 显示全部楼层
谢谢大家的建议,最后使用excel还不错-我只需设置一次,然后将列表复制粘贴到一列中,然后将修改后的列表复制回文件并重命名。蝙蝠,点击,全部完成。
 
Mark,我能找到的所有示例都会更改文件名的一部分(比如第5个字母),但不会添加到其中。仍然记不起如何在名称中附加一个部分(除了通过编程-谢谢李,我本来打算用VB实现它,但你更快了)。我想我以前知道怎么做,但也许不知道。
回复

使用道具 举报

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 11:01:43 | 显示全部楼层
 
不用担心,只要对你有用,我只会坚持我所知道的
回复

使用道具 举报

10

主题

8258

帖子

8335

银币

初来乍到

Rank: 1

铜币
31
发表于 2022-7-6 11:02:51 | 显示全部楼层
示例:重命名两个名为plot的文件。log和replot log使用DOS绘制T.log和replot-T.log。
 
任***-T*
 
这假设文件夹中没有其他文件扩展名,因为*是通配符。如果有,我们必须得到具体的类型:
 
任*。日志*-T.log
 
戴夫,有什么消息吗?
回复

使用道具 举报

48

主题

1073

帖子

1043

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
238
发表于 2022-7-6 11:07:06 | 显示全部楼层
这是我(以为我)试过的,但我只得到了12345678。图纸>123456-T.dwg
但可能是操作员错误。我明年还有一套要重新命名。那我看看能不能记住。
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-6 17:04 , Processed in 1.521591 second(s), 72 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表