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

Rank: 2

帖子
84 
积分
115 
技术
2  
捐助
0  
注册时间
2023-2-17 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2024-10-29 02:27 | 只看该作者

[文本处理] vbscript 脚本中文件路径含有 %TEMP%， 如何转义成普通字符串

vbscript  脚本中文件路径含有 %TEMP%，但我不想 %temp% 求值，如何转义呢？
  1. Set WshShell=CreateObject("WScript.Shell")

  2. strDesKtop=WshShell.SpecialFolders("DesKtop")

  3. Set oShellLink=WshShell.CreateShortcut(strDesKtop&"\8.3dos_short2long.lnk")

  4. sss="D:\Users\test\Desktop\a ;" & "%" & "TEMP" & "%"

  5. WScript.Echo sss

  6. oShellLink.TargetPath=sss

  7. oShellLink.WindowStyle=1

  8. oShellLink.Description="测试“创建桌面快捷方式”"

  9. oShellLink.Save
复制代码
收藏 分享

czjt1234

Rank: 6Rank: 6

帖子
1058 
积分
1559 
技术
112  
捐助
0  
注册时间
2010-4-30 
2楼
发表于 2024-10-29 08:25 | 只看该作者 
  1. Set WshShell = CreateObject("WScript.Shell")

  2. strDesKtop = WshShell.SpecialFolders("DesKtop")

  3. Set oShellLink = WshShell.CreateShortcut(strDesKtop & "\8.3dos_short2long.lnk")

  4. sss = WshShell.ExpandEnvironmentStrings("%TEMP%")

  5. sss = "D:\Users\test\Desktop\a ;" & sss

  6. WScript.Echo sss

  7. oShellLink.TargetPath = sss

  8. oShellLink.WindowStyle = 1

  9. oShellLink.Description = "测试“创建桌面快捷方式”"

  10. oShellLink.Save()
复制代码

QQ 20147578

TOP

tiandyoin

Rank: 2

帖子
84 
积分
115 
技术
2  
捐助
0  
注册时间
2023-2-17 
3楼
发表于 2024-10-29 10:27 | 只看该作者
回复 2# czjt1234


    不看实际路径？我就是不想扩展，还给他扩展开来？

TOP

czjt1234

Rank: 6Rank: 6

帖子
1058 
积分
1559 
技术
112  
捐助
0  
注册时间
2010-4-30 
4楼
发表于 2024-10-29 13:52 | 只看该作者 
  1. Set WshShell=CreateObject("WScript.Shell")

  2. strDesKtop=WshShell.SpecialFolders("DesKtop")

  3. Set oShellLink=WshShell.CreateShortcut(strDesKtop&"\8.3dos_short2long.lnk")

  4. oShellLink.TargetPath="D:\Users\test\Desktop\a"

  5. oShellLink.Arguments="; %temp%"

  6. oShellLink.WindowStyle=1

  7. oShellLink.Description="测试“创建桌面快捷方式”"

  8. oShellLink.Save
复制代码

QQ 20147578

TOP

返回列表