На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное 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_
  
> win98 и сетевой диск , как подключить сетевой диск в win98
    Есть сервер с рашаренным каталогом для определенных пользователей.
    Как под win98 подключить сетевой диск, при условии что введенное имя пользователя при входе в win98 отличается от того имени пользователя, для которого расшарен ресурс.
    Под Win2k и WinXP все работает нормально.
      Напиши хотя бы как пытаешься.
        Цитата (Song @ 18.12.03, 14:08)
        Напиши хотя бы как пытаешься.

        вот фрагмент:

        var
          NetRes: TNetResource;
          stPassword: string;
          stUserName: string;
          res: integer;
        begin
          FillChar(NetRes, SizeOf(NetRes), 0);
          NetRes.dwType       := RESOURCETYPE_DISK;
          NetRes.lpLocalName  := 'N:';
          NetRes.lpRemoteName := '\\MIK\2';
          NetRes.lpProvider   := nil;

          stUserName := 'SanyaT';
          stPassword := '';

          res := WNetAddConnection2(NetRes, {nil} PAnsiChar(stUserName), {nil} PAnsiChar(stPassword),
                                 CONNECT_UPDATE_PROFILE);
          if (res = NO_ERROR)
          then
            ShowMessage('ok')
          else begin
            ShowMessage(IntToStr(res));
          end;

        end;
          Я у себя по другому сделал, я написал скрипт на VBS и у каждого пользователя (в зависимости от юзернэйма) свой сетевой диск(расшаренная папка). Можно конечно и на Дельфе но это прогга порядка 100kb а скрипт две строчки.

          Хотя подожди т.е. как отличается имя пользователя??? а какого хрена он туда попадет если он не тот для кого доступ открыт? Идет проверка имени пользователя - если совпадает разрешения с username то входит если нет посылает.
            Цитата (Diamond @ 20.12.03, 01:55)
            ...
            Хотя подожди т.е. как отличается имя пользователя??? а какого хрена он туда попадет если он не тот для кого доступ открыт? Идет проверка имени пользователя - если совпадает разрешения с username то входит если нет посылает.

            Задача как раз состоит в том, чтобы пользователь смог подключиться к удаленному ресурсу, даже в том случае, если он не зарегистрирован. В Win200 и WinXP все проходит на ура. А вот как сделать то же самое в 98-й винде.
              Если я правильно понял, то диск надо подключить, а вот доступа к нему юзер все равно не получит?
              Есть такая фишка в 2k - можно подключать не только расшаренную папку как диск но любую папку которая выше (или ниже не знаю как правильно, короче в ней), если ты попытаешь сделать тоже самое в 9x то ничего не выйдет - ты должен подключать ТОЛЬКО расшаренную папку. На мой взгляд других проблем быть не должно. Попробуй подключить не своей прогой, а стандартными средствами 9х может и они тоже не смогут.
              0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
              0 пользователей:


              Рейтинг@Mail.ru
              [ Script execution time: 0,0215 ]   [ 16 queries used ]   [ Generated: 27.04.24, 22:52 GMT ]