[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[问题求助] 64位系统下获得快捷方式指向的VBS的怪异错误

  1. Function 获取快捷方式的目标(快捷方式的路径)
  2.     Dim fso, fileto, wshs
  3.     Dim 源文件路径,参数
  4.     Set wshs = CreateObject("WScript.shell")
  5.     Set fileto = wshs.CreateShortcut(快捷方式的路径)
  6.     源文件路径 = fileto.targetpath
  7.     参数 = fileto.Arguments
  8.     获取快捷方式的目标 = 源文件路径 & " " & 参数
  9.     Set wshs = Nothing
  10.     Set fileto =  Nothing
  11. End Function
复制代码
这是自己写的一个类vbs调用,查找快捷方式文件指向的真实源文件的路基和参数,合并得到完整的命令行,但是这个程序在32位系统下跑的好好的,跑到64位系统下就存在一个问题,系统是MSDN win7 64位旗舰版,运行这个程序时,如果查找的快捷方式,指向的是“C:\Program Files”下的某个文件夹内的源文件,返回来的却是“C:\Program Files (x86)......”,64系统下确实是有两个C:\Program Files,一个C:\Program Files和一个C:\Program Files (x86),前者是64位程序所默认安装位置,后者似乎是为了兼容x86而作的目录,但是我的程序确实在前者的目录下,不在后者,不知道为什么会返回后者的路径,这是个很奇异的问题,难道说VBS自己还有32和64之分?

这个很好理解,VBS解释程序还是32位的,谁告诉你说有64位的VBS了

TOP

返回列表