this should do the job:
code:
$actionName="Print"
$file="whatever file you want to print"

$shell=createobject("shell.application")
$printer=$Shell.namespace($file).self

for each $action in $printer.verbs
 if instr(join(split($action,"&"),""),$actionName)
  $LinkDest.invokeverb(""+$verb)
 endif
next
dunno about the actionname "print", should it be "printto" and/or should the instr be changed to real match check, but try it out.
_________________________
!

download KiXnet