Lost Custom Shortcut Keys

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

On any computer that I use personally, I setup my quick shortcuts. I've done
this since early windows98. To open IE I simply hit 'ctrl-shift-z' or Outlook
is 'ctrl-shift-x'. These were working fine on my PC, though with XP you have
to create a shortcut icon on the desktop. Well while changing my desktop I
deleted these two icons, now I have replaced them, but the key strokes I want
to use can't be assigned, since XP seems to think they're still in use, but
they don't open anything either. I've been trying for the last few days to
reassign these keys, but with no luck. I know I could just make them some
other binding, but that's not my goal, since I use these same keystrokes on
about 4 other computers. Any help?
 
Nightrunner said:
On any computer that I use personally, I setup my quick shortcuts. I've done
this since early windows98. To open IE I simply hit 'ctrl-shift-z' or Outlook
is 'ctrl-shift-x'. These were working fine on my PC, though with XP you have
to create a shortcut icon on the desktop. Well while changing my desktop I
deleted these two icons, now I have replaced them, but the key strokes I want
to use can't be assigned, since XP seems to think they're still in use, but
they don't open anything either. I've been trying for the last few days to
reassign these keys, but with no luck. I know I could just make them some
other binding, but that's not my goal, since I use these same keystrokes on
about 4 other computers. Any help?

Do you have a recent restore point available from before this
deletion?
 
Nightrunner,
The attachments were not included. These are they

findhotkeys.bat
cd %UserProfile%\desktop
for /r %%A in (*.lnk) do "C:\Batch Files\findhotkey.vbs" "%%A"
for /r %%A in (*.pif) do "C:\Batch Files\findhotkey.vbs" "%%A"
for /r %%A in (*.url) do "C:\Batch Files\findhotkey.vbs" "%%A"
REM
cd %AllUsersProfile%\desktop
for /r %%A in (*.lnk) do "C:\Batch Files\findhotkey.vbs" "%%A"
for /r %%A in (*.pif) do "C:\Batch Files\findhotkey.vbs" "%%A"
for /r %%A in (*.url) do "C:\Batch Files\findhotkey.vbs" "%%A"
REM
cd %UserProfile%\Start Menu
for /r %%A in (*.lnk) do "C:\Batch Files\findhotkey.vbs" "%%A"
for /r %%A in (*.pif) do "C:\Batch Files\findhotkey.vbs" "%%A"
for /r %%A in (*.url) do "C:\Batch Files\findhotkey.vbs" "%%A"
REM
cd %AllUsersProfile%\Start Menu
for /r %%A in (*.lnk) do "C:\Batch Files\findhotkey.vbs" "%%A"
for /r %%A in (*.pif) do "C:\Batch Files\findhotkey.vbs" "%%A"
for /r %%A in (*.url) do "C:\Batch Files\findhotkey.vbs" "%%A"
REM
pause

findhotkey.vbs
on error resume next
set WshShell = WScript.CreateObject("WScript.Shell")
Dim A
Dim Ag
Set Ag=Wscript.Arguments
If Ag.Count > 0 then
For x = 0 to Ag.Count -1
A = A & Ag(x)
Next
End If
Set FSO = CreateObject("Scripting.FileSystemObject")
f=FSO.GetFile(A)
set lnk = WshShell.CreateShortcut(A)
If lnk.hotkey <> "" then
msgbox A & vbcrlf & lnk.hotkey
End If
 
Back
Top