[文件操作] 如何批处理修改游戏路径？

234540089

e盘内一以中文名（网络游戏）命名的文件夹。因一程序不能以中文命名。所以须改名。
改名后所有路径快捷方式改变
求一批处理方法。最好附带命令注释。
谢谢

youxi01

呵呵，不是修改快捷方式的名称，而是修改快捷方式中　目标　路径和所对应的文件的文件名称

随风

因不懂vbs也没测试3楼的代码,大概看了下,似乎只是修改快捷方式的名称,
那么用的着vbs么?
直接用bat不行吗?

foxJL

保重啊!!
我也是最近忙的头都晕了..

youxi01

过奖,过奖,好久没玩了，手都生了,都不会写代码了
最近实在是太忙，头发都要掉光了

novaa

哈哈
YOUXI牛。
BAT和VBS结合的那么好。 佩服。

youxi01

匆忙中写了一个,使用说明也没时间详细写了,不知道好不好用?

@echo off
>>Change_Link.vbs more +8 <%~0
set /p LinkName=请输入该游戏在桌面的快捷方式名称：
set /p FileName=请输入要修改成的名称：
cscript.exe Change_Link.vbs %LinkName% %FileName% //nologo 
del Change_Link.vbs
pause>nul
Rem ==============以下为要生成的vbs文件内容=========
dim wsh,fso
Set wsh=WScript.CreateObject("wscript.shell")
Set fso = CreateObject("Scripting.FileSystemObject")
DesktopPath=wsh.SpecialFolders("Desktop")

Path=WScript.Arguments(0)
newname=WScript.Arguments(1)

Function Change_link(Soc,resname)
Set OLink=wsh.CreateShortcut(DesktopPath&"\"&Soc&".lnk")
Path=OLink.TargetPath
Set f=fso.GetFile(Path)
path=Replace(Path,f.name,resname)
f.name=resname
OLink.TargetPath=path
OLink.save
End Function

Change_link path,newname
复制代码

novaa

不太知道要所什么？
什么快捷方式
桌面的？