2nd post today.
here is the current code with which I could catch the correct shortcut even though there were 20 named the same and pointing to same location.
does not matter even which type link it is...

{edit}
forgot to post the code [Eek!]

here:
code:
link("C:\Documents and Settings\Lurenko\Työpöytä\KiXforms\bbchecker\wkix32.exe")
function Link($LinkDest)
$Shell=createobject("Shell.application")
$LinkDest=$Shell.namespace($LinkDest).self
for each $item in $LinkDest.parent.items
 if $item.islink $LinkDestFolderItems=$LinkDestFolderItems+$item.modifydate+chr(10) endif
next

for each $verb in $LinkDest.verbs
 if instr(join(split($verb,"&"),""),readvalue("HKEY_CLASSES_ROOT\lnkfile",""))
  $LinkDest.invokeverb(""+$verb)
 endif
next


for each $item in $LinkDest.parent.items
 if $item.islink
  $new=1
  for each $itemBefore in split(left($LinkDestFolderItems,len($LinkDestFolderItems)-1),chr(10))
   if $itemBefore=$item.modifydate $new=0 endif
  next
  if $new
   $Shortcut=$item.getlink
  endif
 endif
next
if not vartype($Shortcut) exit 4 endif
? $Shortcut.path
endfunction


[ 23. November 2002, 00:11: Message edited by: Lonkero ]
_________________________
!

download KiXnet