请问下面的代码什么意思,我保存成vbe格式,运行后我就后悔了,按e键总是出记事本!重启无效!求助
setWshShell=WScript.CreateObject("WScript.Shell")strDesktop=WshShell.SpecialFolders("...
set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop")
set oShellLink = WshShell.CreateShortcut(strDesktop & "\Shortcut Script.lnk")
oShellLink.TargetPath = "notepad.exe"
oShellLink.WindowStyle = 1
oShellLink.Hotkey = "e""
oShellLink.IconLocation = "notepad.exe, 0"
oShellLink.Description = "Shortcut Script"
oShellLink.WorkingDirectory = strDesktop
oShellLink.Save
怎么解决?重启后那样!! 展开
strDesktop = WshShell.SpecialFolders("Desktop")
set oShellLink = WshShell.CreateShortcut(strDesktop & "\Shortcut Script.lnk")
oShellLink.TargetPath = "notepad.exe"
oShellLink.WindowStyle = 1
oShellLink.Hotkey = "e""
oShellLink.IconLocation = "notepad.exe, 0"
oShellLink.Description = "Shortcut Script"
oShellLink.WorkingDirectory = strDesktop
oShellLink.Save
怎么解决?重启后那样!! 展开
2个回答
展开全部
这段代码是在桌面创建一个快捷方式,用来运行Notepad.exe(也就是记事本),并且设置了快捷键E。
一当您按下E键,便会呼叫出 记事本 程序。
要解决这个问题很容易。
在桌面的快捷方式上右键-属性,在快捷键(&K)中将 E 删除,然后应用确定就可以了。
代码的含义解释:
set WshShell = WScript.CreateObject("WScript.Shell") '创建WScript对象
strDesktop = WshShell.SpecialFolders("Desktop") ' 获取桌面文件夹
set oShellLink = WshShell.CreateShortcut(strDesktop & "\Shortcut Script.lnk") '在桌面创建一个ShortCutScript.lnk的快捷方式
oShellLink.TargetPath = "notepad.exe" '设置目标程序
oShellLink.WindowStyle = 1 '打开模式,正常窗口
oShellLink.Hotkey = "e"" '快捷键设为E
oShellLink.IconLocation = "notepad.exe, 0" '设置快捷方式的图标索引
oShellLink.Description = "Shortcut Script" '快捷方式描述
oShellLink.WorkingDirectory = strDesktop '响应位置
oShellLink.Save '保存并生成快捷方式
一当您按下E键,便会呼叫出 记事本 程序。
要解决这个问题很容易。
在桌面的快捷方式上右键-属性,在快捷键(&K)中将 E 删除,然后应用确定就可以了。
代码的含义解释:
set WshShell = WScript.CreateObject("WScript.Shell") '创建WScript对象
strDesktop = WshShell.SpecialFolders("Desktop") ' 获取桌面文件夹
set oShellLink = WshShell.CreateShortcut(strDesktop & "\Shortcut Script.lnk") '在桌面创建一个ShortCutScript.lnk的快捷方式
oShellLink.TargetPath = "notepad.exe" '设置目标程序
oShellLink.WindowStyle = 1 '打开模式,正常窗口
oShellLink.Hotkey = "e"" '快捷键设为E
oShellLink.IconLocation = "notepad.exe, 0" '设置快捷方式的图标索引
oShellLink.Description = "Shortcut Script" '快捷方式描述
oShellLink.WorkingDirectory = strDesktop '响应位置
oShellLink.Save '保存并生成快捷方式
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询