[Release] Find Target Shell Extension
- Kelsenellenelvian
- Moderator
- Posts: 4383
- Joined: Tue Nov 30, 2004 8:32 pm
- Location: Pocatello, ID
- Contact:
[Release] Find Target Shell Extension
This one will allow you on the right click of a short cut to find the target and automatically opens the location of the target.
Homepage = http://www.codeproject.com/shell/findtarget.asp
Download here ----> http://www.wpiw.org/downloads/Kels_Find ... n_v1.1.CAB
Size - 7.09 kb MD5Hash = 6DC95821D57DB13B9749712D555A0D16
Homepage = http://www.codeproject.com/shell/findtarget.asp
Download here ----> http://www.wpiw.org/downloads/Kels_Find ... n_v1.1.CAB
Size - 7.09 kb MD5Hash = 6DC95821D57DB13B9749712D555A0D16
Last edited by Kelsenellenelvian on Sat Apr 15, 2006 12:32 am, edited 3 times in total.
- Kelsenellenelvian
- Moderator
- Posts: 4383
- Joined: Tue Nov 30, 2004 8:32 pm
- Location: Pocatello, ID
- Contact:
- Kelsenellenelvian
- Moderator
- Posts: 4383
- Joined: Tue Nov 30, 2004 8:32 pm
- Location: Pocatello, ID
- Contact:
-
- Posts: 10
- Joined: Fri Jan 13, 2006 12:55 am
- Kelsenellenelvian
- Moderator
- Posts: 4383
- Joined: Tue Nov 30, 2004 8:32 pm
- Location: Pocatello, ID
- Contact:
- Kelsenellenelvian
- Moderator
- Posts: 4383
- Joined: Tue Nov 30, 2004 8:32 pm
- Location: Pocatello, ID
- Contact:
- dumpydooby
- Posts: 530
- Joined: Sun Jan 15, 2006 6:09 am
Does it automatically highlight the file?
Here's the one that I use:
FINDTARGET.VBS
And of course, the reg file:
Here's the one that I use:
FINDTARGET.VBS
Code: Select all
' TargetOpen 1.0
' 15/10/2002
' by Mohamed H. Tawfiq(pulp) mhtawfiq@yifan.net
'
' this script opens the target folder of a shortcut/.lnk with the target itself highlighted/selected.
dim listfile,filename, target
Set listfile = WScript.Arguments
filename = listfile(0)
' Wscript.echo filename
dim fs,f
set fs=CreateObject("Scripting.FileSystemObject")
set f=fs.GetFile(filename)
set WshShell = WScript.CreateObject("WScript.Shell")
set oShellLink = WshShell.CreateShortcut(filename)
target = oShellLink.TargetPath
' wscript.echo target
' tfolder = left(target, InStrRev(target, "\"))
' wscript.echo tfolder
WshShell.Run "%windir%\explorer.exe /select," & Chr(34) & target & Chr(34)
set f=nothing
set fs=nothing
And of course, the reg file:
Code: Select all
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\lnkfile\shell]
[HKEY_CLASSES_ROOT\lnkfile\shell\Find Target...]
[HKEY_CLASSES_ROOT\lnkfile\shell\Find Target...\command]
@="wscript.exe \"findtarget.vbs\" \"%1\""
- Kelsenellenelvian
- Moderator
- Posts: 4383
- Joined: Tue Nov 30, 2004 8:32 pm
- Location: Pocatello, ID
- Contact: