Kelly at Kelly's Corner or other experts

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?
 
C

Claymore

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?

Hello,

If you don't get an answer from Kelly - the ingenious genius of all
things Registry.

Try this:

Copy the text below between the dotted lines, but not the dotted lines
themselves. Open Notepad and paste it in. Save the result in a
suitable location as extension.reg - making sure that the default .txt
extension doesn't appear in the file name (Save as type = All Files).
Double-click on the saved .reg file to merge the contents.
Restart or Log in/Out

-------------------------------------------------------------

Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\DocShortcut]
"NeverShowExt"=""

[HKEY_CLASSES_ROOT\InternetShortcut]
"NeverShowExt"=""

[HKEY_CLASSES_ROOT\lnkfile]
"NeverShowExt"=""

[HKEY_CLASSES_ROOT\piffile]
"NeverShowExt"=""

[HKEY_CLASSES_ROOT\SHCmdFile]
"NeverShowExt"=""

[HKEY_CLASSES_ROOT\ShellScrap]
"NeverShowExt"=""

-------------------------------------------------------------
 
C

Claymore

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?

Hello,

If you don't get an answer from Kelly - the ingenious genius of all
things Registry.

Try this:

Copy the text below between the dotted lines, but not the dotted lines
themselves. Open Notepad and paste it in. Save the result in a
suitable location as extension.reg - making sure that the default .txt
extension doesn't appear in the file name (Save as type = All Files).
Double-click on the saved .reg file to merge the contents.
Restart or Log in/Out

-------------------------------------------------------------

Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\DocShortcut]
"NeverShowExt"=""

[HKEY_CLASSES_ROOT\InternetShortcut]
"NeverShowExt"=""

[HKEY_CLASSES_ROOT\lnkfile]
"NeverShowExt"=""

[HKEY_CLASSES_ROOT\piffile]
"NeverShowExt"=""

[HKEY_CLASSES_ROOT\SHCmdFile]
"NeverShowExt"=""

[HKEY_CLASSES_ROOT\ShellScrap]
"NeverShowExt"=""

-------------------------------------------------------------- Hide quoted text -

- Show quoted text -

I just noticed your problem is multi-posted. Check also the other
suggestions - especially System Restore - if it's available to you.
 
G

Guest

Claymore,
Thanks a million. That did the trick.
You are an expert for sure.....
Thanks my friend.......

Claymore said:
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?

Hello,

If you don't get an answer from Kelly - the ingenious genius of all
things Registry.

Try this:

Copy the text below between the dotted lines, but not the dotted lines
themselves. Open Notepad and paste it in. Save the result in a
suitable location as extension.reg - making sure that the default .txt
extension doesn't appear in the file name (Save as type = All Files).
Double-click on the saved .reg file to merge the contents.
Restart or Log in/Out

-------------------------------------------------------------

Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\DocShortcut]
"NeverShowExt"=""

[HKEY_CLASSES_ROOT\InternetShortcut]
"NeverShowExt"=""

[HKEY_CLASSES_ROOT\lnkfile]
"NeverShowExt"=""

[HKEY_CLASSES_ROOT\piffile]
"NeverShowExt"=""

[HKEY_CLASSES_ROOT\SHCmdFile]
"NeverShowExt"=""

[HKEY_CLASSES_ROOT\ShellScrap]
"NeverShowExt"=""
 
C

Claymore

Claymore,
Thanks a million. That did the trick.
You are an expert for sure.....
Thanks my friend.......



Claymore said:
If you don't get an answer from Kelly - the ingenious genius of all
things Registry.
Try this:
Copy the text below between the dotted lines, but not the dotted lines
themselves. Open Notepad and paste it in. Save the result in a
suitable location as extension.reg - making sure that the default .txt
extension doesn't appear in the file name (Save as type = All Files).
Double-click on the saved .reg file to merge the contents.
Restart or Log in/Out
-------------------------------------------------------------

Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\DocShortcut]
"NeverShowExt"=""
[HKEY_CLASSES_ROOT\InternetShortcut]
"NeverShowExt"=""
[HKEY_CLASSES_ROOT\lnkfile]
"NeverShowExt"=""
[HKEY_CLASSES_ROOT\piffile]
"NeverShowExt"=""
[HKEY_CLASSES_ROOT\SHCmdFile]
"NeverShowExt"=""
[HKEY_CLASSES_ROOT\ShellScrap]
"NeverShowExt"=""

-------------------------------------------------------------- Hide quoted text -

- Show quoted text -

Thanks for that Pete. And thanks for letting the folks know what
worked.

Cheers!
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top