На главную
ПРАВИЛА FAQ Помощь Участники Календарь Избранное DigiMania RSS
msm.ru
! Соблюдайте общие правила форума
Пожалуйста, выделяйте текст программы тегом [сode=pas] ... [/сode]. Для этого используйте кнопку [code=pas] в форме ответа или комбобокс, если нужно вставить код на языке, отличном от Дельфи/Паскаля.
Указывайте точные версии Delphi и используемых сетевых библиотек.

Не приветствуется поднятие старых тем. Если ваш вопрос перекликается со старой темой, то для вопроса лучше создать новую тему, а старую указать в первом сообщении с описанием взаимосвязи.

Внимание:
попытки открытия обсуждений реализации вредоносного ПО, включая различные интерпретации спам-ботов, наказывается предупреждением на 30 дней.
Повторная попытка - 60 дней. Последующие попытки бан.
Мат в разделе - бан на три месяца...

Полезные ссылки:
user posted image MSDN Library user posted image FAQ раздела user posted image Поиск по разделу user posted image Как правильно задавать вопросы


Выразить свое отношение к модераторам раздела можно здесь: user posted image Krid, user posted image Rouse_

Модераторы: Krid, Rouse_
  
> В чем может быть ошибка CreateDirectory на сетевом диске?
Имеется сетевой диск z: код, указанный ниже выдает ошибку 3, даже если программу запускаю от имени администратора, причем в ручную (например из total commander'а) папка создается без проблем
ExpandedWrap disabled
    procedure TForm1.Button5Click(Sender: TObject);
    var destDir:string;
        b:boolean;
        f:textfile;
        err:cardinal;
    begin
     destDir:='z:\x_y';
     b:=winapi.Windows.CreateDirectory(pchar(destDir),nil);
     err:= getlasterror;
     assignfile(f,'save.rep');
     rewrite(f);
     writeln(f,destdir);
     closefile(f);
     if not b
       then begin
            messagebox(0,
                pchar('не удалось создать папку для архива '+inttostr(err)),
                'Ошибка',0);
        end;
    end;

есть подозрения, что ошибка в настройках системы, так как раньше этот код работал нормально, на других компьютерах и сейчас этот код работает нормально :wacko:
может кто-то сталкивался с такой проблемой?
Решил задачу прямым указанием сетевой папки через \\имя_компьютера\имя_папки\ вместо указания сетевого диска. Похоже что windows где-то в кэше не так прописал имена сетевых дисков
1 пользователей читают эту тему (1 гостей и 0 скрытых пользователей)
0 пользователей:


Рейтинг@Mail.ru
[ Script Execution time: 0,0740 ]   [ 20 queries used ]   [ Generated: 23.10.18, 09:35 GMT ]