vbs与bat混编修改虚拟盘符的卷标

我想改变我用subst创建的虚拟盘符的卷标
已知下面的命令无法改变由subst创建的盘符

@echo off
subst X: c:personalfiles
wmic logicaldisk where "deviceid='X:'" set volumename="Development"
pause

但是可以用这个vbs脚本来改变

Set oShell = WScript.CreateObject("Shell.Application")
oShell.NameSpace("X:").Self.Name = "Development"

实话了VBS不熟悉。。。
我改成这样没有生效：

@echo off
subst X: c:personalfiles
mshta vbscript:CreateObject("Shell.Application").NameSpace("X:").Self.Name = "Development"

现在想请教下如何修改上面的脚本才能生效？谢谢。

BTW:只想研究批的处理方案。

经过一番研究自己终于搞定了，

:On Error Resume Next
Sub bat
echo off & cls
'&subst X: c:personalfiles
start wscript -e:vbs "%~f0"
Exit Sub
End Sub
Set oShell = WScript.CreateObject("Shell.Application")
oShell.NameSpace("X:").Self.Name = "Personal Files"

说明一下吧，反斜杠要转义，最好的话应该是每行首加'&来处理了。

使用批处理按要求批量删除文件夹方法汇总
示例一：有这样一大堆文件夹结构，例如abcde|-----abcd2000|---------0003|----------0004........|------abcd2001|---------0006|----------0002........|------abcd2002|---------0005|--------

批处理查看同一子网络下的所有IP在线情况
本文的批处理可以让您知道自己所在局域网的同一网段下都有哪些IP被使用了。不得不承认，我在创造这个批处理的时候想法很奇怪，甚至有些愚蠢。:::

Takeown 获取文件or文件夹所有权
帮助文档：TAKEOWN[/Ssystem[/Uusername[/P[password]]]]/Ffilename[/A][/R[/Dprompt]]描述:该工具以重新分配文件所有权的方式允许管理员重新获取先前被拒绝访问的文件