| 标题 | 通过vbs修改目录名称与快捷方式名称的实现代码 |
| 内容 | 这篇文章主要是分享了如果用vbs修改目录名与快捷方式名称的代码，需要的朋友可以参考下 代码如下: set fso=wscript.createobject("scripting.filesystemobject") OldFolderName1="263 Enterprise Messenger" newFolderName1="Peacemap Messenger" OldFileName1 = "263 Enterprise Messenger.lnk" newFileName1 = "Peacemap Messenger.lnk" OldFileName2 = "卸载 263 Enterprise Messenger.lnk" newFileName2 = "卸载 Peacemap Messenger.lnk" originalpath="C:\Documents and Settings\All Users\「开始」菜单\程序" newpath="C:\Documents and Settings\All Users\「开始」菜单\程序\Peacemap Messenger" deskpath="C:\Documents and Settings\All Users\桌面" if (fso.folderexists(originalpath & "\" & OldFolderName1)) then Set fsoGetFolder = fso.GetFolder(originalpath & "\" & OldFolderName1) fsoGetFolder.Name = newFolderName1 end if if fso.fileexists(newpath&"\"&OldFileName1 ) then set f=fso.getfile(newpath&"\"&OldFileName1) f.name=newFileName1 end if if fso.fileexists(newpath&"\"&OldFileName2 ) then set f=fso.getfile(newpath&"\"&OldFileName2) f.name=newFileName2 end if if fso.fileexists(deskpath&"\"&OldFileName1 ) then set f=fso.getfile(deskpath&"\"&OldFileName1) f.name=newFileName1 end if msgbox "完成!" |
| 随便看 |
|
在线学习网考试资料包含高考、自考、专升本考试、人事考试、公务员考试、大学生村官考试、特岗教师招聘考试、事业单位招聘考试、企业人才招聘、银行招聘、教师招聘、农村信用社招聘、各类资格证书考试等各类考试资料。