VBScript: подключение принтеров

Помагите, пожалуйста со скриптом.

Нужно, что бы скрипт собирал на указанном принт-сервер расшаренные принтера, и давал возможность пользователю, выбрать на нужный подключаемы порт  эти принтера.