求助如何用bat添加桌面浏览器，属性 ，快捷方式，目标中的字符

无天

如何用bat添加桌面浏览器，属性 ，快捷方式，目标中的字符，试了很多方法有的不行有的只能添加部分字符。

flashercs

保存成1.vbs,文件编码是ANSI
修改的快捷方式必须已经存在.

1. On Error Resume Next
   
2. Dim fso,shell,folder,folderItem
   
3. Set fso = CreateObject("Scripting.FileSystemObject")
   
4. Set shell = CreateObject("Shell.Application")
   
5. Set folder = shell.NameSpace(16) ' 桌面
   
6. Set folderItem = folder.ParseName("浏览器.lnk") ' 快捷方式名
   
7. If folderItem.IsLink Then
   
8.   Dim shellLink
   
9.   Set shellLink = folderItem.GetLink
   
10.   shellLink.Arguments = "--incognito https://www.baidu.com" ' 修改参数
    
11.   shellLink.Save
    
12. End If

复制代码

czjt1234

1. s = "Google Chrome.lnk"    '浏览器的名称
   
2. 
   
3. Set oWshShell = CreateObject("WScript.Shell")
   
4. oWshShell.CurrentDirectory = oWshShell.SpecialFolders("AllUsersDesktop")
   
5. Set oWshShortcut = oWshShell.CreateShortcut(s)
   
6. oWshShortcut.TargetPath = "C:\Windows\system32\cmd.exe"    '目标
   
7. oWshShortcut.Arguments = "/k"                              '命令行参数
   
8. oWshShortcut.WorkingDirectory = "C:"                      '起始位置
   
9. oWshShortcut.Hotkey = "CTRL+ALT+F"                         '快捷键
   
10. oWshShortcut.WindowStyle = 1                               '运行方式
    
11. oWshShortcut.Description = "备注"                           '备注
    
12. oWshShortcut.IconLocation = "C:\Program Files\Internet Explorer\iexplore.exe,1"
    
13. oWshShortcut.Save()

复制代码

运行方式可选值有3个：
1 窗口化 (缺省值)
3 最大化
7 最小化

IconLocation是快捷方式的图标
缺省值为TargetPath属性指定的文件的第一个图标
可以指定其它图标，如 "C:\Program Files\Internet Explorer\iexplore.exe,2"
其中的2表示该文件的第三个图标，第一个图标的序号为0

快捷键不区分大小写
比如 CTRL+ALT+F
比如 CTRL+Numpad2 表示 Ctrl + 小键盘的数字键2

aloha20200628

回复 1# 无天

参见本坛一枚老帖 http://www.bathome.net/thread-33298-1-1.html 其中示范了桌面快捷方式各种属性值的修改方法...

piazini

powershell 能实现