vbs怎么更改文件名?

vbs怎么更改文件名?,第1张

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"


欢迎分享,转载请注明来源:内存溢出

原文地址: https://outofmemory.cn/bake/11793456.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-18
下一篇 2023-05-18

发表评论

登录后才能评论

评论列表(0条)

保存