Подключение сетевых дисков из под Win
 

День Добрый!

Имеется скрипт, самописный, VBScript, хоть я в не силен, все на коленках - подключения сетевых дисков:
Работает не очень корректно, точнее вапще не корретно. хотелось бы понять где ошибка.
И в дополнение - прошу помощи в доработке:
в моем арианте при подключении нескольких дисков - если бы он корректно работал - на каждом ерроре - он переписывает лог файл, а хотелось бы чтобы он проверил - есть ли лог, и если нет - создал. а если есть - дописал инфу, и согласно тому. на каком диске ошибка - он это и указал не так как у меня:
(10:51:01) ErrorDescription: Сетевое подключение не существует.
А в приличном виде вроде как:
(10:51:01) ErrorDescription: Диск такой-то - путь такой-то - Сетевое подключение не существует.
(10:51:01) ErrorDescription: Диск такой-то - путь такой-то - Сетевое подключение не существует.
(10:51:01) ErrorDescription: Диск такой-то - путь такой-то - Сетевое подключение не существует.
И т.д.
Помогите, если не сложно...
Пы.Сы. На готовые решения не отправлять, интересно самому написать...
Спасибо.