G
Guest
Dear Kelly or other experts,
I have used a few tweaks from your site that work wonderfully.
But I installed a tweak that wasn't what I thought it was.
Can you "please, please" email me VBS tweak to reverse it.
My computer now show .lnk after every desk top icon etc.
The name of the tweak was "ShowHiddenexts".
My email address is (e-mail address removed).
Could you please email me a vbs to reverse the below PLEASE?
Thanks a million.
Here is the vbs script.
On Error Resume Next
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.RegDelete "HKCR\lnkfile\NeverShowExt"
WshShell.RegDelete "HKCR\DocShortcut\NeverShowExt"
WshShell.RegDelete "HKCR\InternetShortcut\NeverShowExt"
WshShell.RegDelete "HKCR\piffile\NeverShowExt"
WshShell.RegDelete "HKCR\SHCmdFile\NeverShowExt"
WshShell.RegDelete "HKCR\ShellScrap\NeverShowExt"
Dim MyBox
MyBox = MsgBox("You must Log Off/Log On for the changes to take effect.",
vbOKOnly,"Done")
VisitKelly's Korner
Sub VisitKelly's Korner
If MsgBox("This script came from the Tweaks Section of Kelly's Korner" &
vbCRLF & vbCRLF & "Would you like to visit Kelly's Web Site now?", vbQuestion
+ vbYesNo + vbDefaultButton, "Visit Kelly's Korner") =6 Then
wshshell.Run "http://www.kellys-korner-xp.com/xp_tweaks.htm"
End If
End Sub
Was this post helpful to you?
Why should I rate a post?
I have used a few tweaks from your site that work wonderfully.
But I installed a tweak that wasn't what I thought it was.
Can you "please, please" email me VBS tweak to reverse it.
My computer now show .lnk after every desk top icon etc.
The name of the tweak was "ShowHiddenexts".
My email address is (e-mail address removed).
Could you please email me a vbs to reverse the below PLEASE?
Thanks a million.
Here is the vbs script.
On Error Resume Next
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.RegDelete "HKCR\lnkfile\NeverShowExt"
WshShell.RegDelete "HKCR\DocShortcut\NeverShowExt"
WshShell.RegDelete "HKCR\InternetShortcut\NeverShowExt"
WshShell.RegDelete "HKCR\piffile\NeverShowExt"
WshShell.RegDelete "HKCR\SHCmdFile\NeverShowExt"
WshShell.RegDelete "HKCR\ShellScrap\NeverShowExt"
Dim MyBox
MyBox = MsgBox("You must Log Off/Log On for the changes to take effect.",
vbOKOnly,"Done")
VisitKelly's Korner
Sub VisitKelly's Korner
If MsgBox("This script came from the Tweaks Section of Kelly's Korner" &
vbCRLF & vbCRLF & "Would you like to visit Kelly's Web Site now?", vbQuestion
+ vbYesNo + vbDefaultButton, "Visit Kelly's Korner") =6 Then
wshshell.Run "http://www.kellys-korner-xp.com/xp_tweaks.htm"
End If
End Sub
Was this post helpful to you?
Why should I rate a post?