[emergency]

прошу прощения, ответ такой: пишем скрипт

Код:
// FindTarget.js
// аргумент - путь к lnk-ярлыку
try {
var
Item=GetItemByPath(WScript.Arguments.Item(0)).GetLink.Target,
ShellWindows=Item.Application.Windows(),
ParentItem=Item.Parent.Self,
ParentFolderPath=ParentItem.Path,
GrandParentFolderPath=ParentItem.Parent.Self.Path;
ParentItem.InvokeVerb("Open");
for (var t=50; --t>=0; WScript.Sleep(50))
try {
var
FolderView=ShellWindows.Item().Document,
FolderViewItem=FolderView.Folder.Self;
if (
FolderViewItem.Path==ParentFolderPath &&
FolderViewItem.Parent.Self.Path==GrandParentFolderPath
) {
FolderView.SelectItem(Item, 1|4|8|16);
break;
}
} catch (Err) {}
} catch (Err) {}

function GetItemByPath (Path) {
var
Shell=new ActiveXObject("Shell.Application"),
FSO=new ActiveXObject("Scripting.FileSystemObject");
return Shell.
NameSpace(FSO.GetParentFolderName(Path)).ParseName(FSO.GetFileName(Path));
}

сохраняем с расширением .js кладем например в G:\findobject\findobject.js

делаем там же рег файл
Код:
REGEDIT4

[HKEY_CLASSES_ROOT\lnkfile\shell\FindTarget]
@="&Найти объект"
[HKEY_CLASSES_ROOT\lnkfile\shell\FindTarget\command]
@="C:\\WINDOWS\\System32\\WScript.exe \"G:\\findobject\\findobject.js\" \"%1\""

выполняем и наслаждаемся функционалом
отдельное спасибо ребятам с http://forum.script-coding.info