vbs怎么更改文件名？

vbs 里面没有文件重命名的方法,

都是用fileObj.move实现的:

Set FSO=CreateObject("Scripting.FileSystemObject")

Set f1=fso.GetFile("C:\1.txt")

f1.Move("C:\2.txt")

folder = "A目录" '这里写你的那些文件所在的文件夹就好了

firstName = InputBox("请输入文件名前缀：","请输入")

If firstName = "" Then WScript.Quit

Set fso = CreateObject("Scripting.FileSystemObject")

For Each x In fso.GetFolder(folder).Files

x.Name = firstName & x.Name

Next

MsgBox "重命名完毕",64+4096,"OK"

方法如下：

步骤1，打开工具软件，然后将需要添加前缀的文件导入到软件中，也可以通过拖动文件到软件进行导入。

步骤2，这时候在左边可以看到设置界面，命名方式选择“插入”；然后在插入内容右边输入添加的前缀；最后插入位置选择“文件名头”。这时候在右边可以预览到新的文件名称了，可以随时修改随时预览。

步骤3，当设置好了之后就可以点击【开始重命名】按钮，启动软件程序了，处理完成后软件会d出“重命名成功”的窗口。

步骤4，通过案例对比可以看出，修改后的文件名前面都添加了相同的前缀。

---