Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Perl: Общие вопросы > Win32::NetResource


Автор: smoke_man 15.2.2008, 09:10
Доброе утро! Такая проблема - при работе с любыми компами сети - все отлично работатет,как только пытаюсь обратится к серверу - пишет "Неверно указан тип сетевого ресурса." Пробывал менять параметры но все равно таже ошибка. Так как получить доступ к расшаренным ресурсам сервера?
Код

use strict;
use Win32::NetResource qw(:DEFAULT AddConnection CancelConnection GetError);

my $n = {
                    'Scope' => RESOURCE_CONNECTED,
                    'Type' => RESOURCETYPE_ANY,
                    'DisplayType' => RESOURCEDISPLAYTYPE_SHARE,
                    'Usage' => RESOURCEUSAGE_CONNECTABLE,
                    'LocalName' =>"q:",
                    'RemoteName' => "\\\\Server/InBox",
             };

AddConnection($n,"","",1);

my $err;
GetError($err);
warn Win32::FormatMessage($err);

Автор: smoke_man 15.2.2008, 15:12
Проблема решена

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)