I'll see what I can do to update printerlist, but in the mean time you might try seeing if this will help.

Change this line
Code:
 $shares[ubound($shares)] = $share.name  


to
Code:
 $shares[ubound($shares)] = $share.printerpath 



Let me know if this helps.