donky, I checked my words and with that above code only minor changes are required.
Like I said, network link is just the same as lnk.
it just does not have that ending.

I tried with:
code:
link("C:\Lonkero\KiXforms\mine")
function Link($LinkDest)
$Shell=createobject("Shell.application")
$LinkDest=$Shell.namespace($LinkDest).self

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

didn't try much more.
removed also the checks I had and modification code.
while did it was in kixforms folder

[ 27. November 2002, 15:19: Message edited by: Lonkero ]
_________________________
!

download KiXnet