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 "完成!"