批处理之家 - Powered by Discuz! Board

标题: [问题求助] [已解决]VBS如何将目录的dos短路径还原成长路径？ [打印本页]

作者: haokeyy 时间: 2011-9-18 07:50 标题: [已解决]VBS如何将目录的dos短路径还原成长路径？

C:\DOCUME~1\admin\LOCALS~1\Temp

上面的这个短路径,用VBS,如何还原成原来的长路径.

作者: ArdentMan 时间: 2011-9-18 10:48

本帖最后由 ArdentMan 于 2011-9-18 11:11 编辑

为什么要还原成长路径，如下这样取的不行吗？

Dim Path
Path = CreateObject("Scripting.FileSystemObject").GetSpecialFolder(2)
MsgBox Path
复制代码

好像短路径是无法被还原成长路径的
个人猜测原因如下：
ArdentMan Bat--->Ardent~1
ArdentMan Vbs--->Ardent~1

作者: powerbat 时间: 2011-9-18 15:17

ShortPath = "C:\DOCUME~1\admin\LOCALS~1\Temp"
FullPath = CreateObject("Shell.Application").NameSpace(ShortPath).Self.Path
MsgBox FullPath
复制代码

作者: ArdentMan 时间: 2011-9-18 15:35

厉害！学习了，但好像只能还原实际获取的路径吧（自己设定的不行）

Dim SpecialPath
SpecialPath = CreateObject("Scripting.FileSystemObject").GetSpecialFolder(2)
FullPath =  CreateObject("Shell.Application").NameSpace(SpecialPath).Self.Path
MsgBox FullPath
复制代码

作者: powerbat 时间: 2011-9-18 15:51

实际不存在的路径当然不能扩展啦，系统又猜不到你想怎么扩展。

作者: zhangop9 时间: 2011-9-18 16:38

文本中是短路径，如何转为长路径了！！

作者: haokeyy 时间: 2011-9-18 17:16

谢谢，问题解决了。

欢迎光临批处理之家 (http://bathome.net./)