Проблема с использованием сетевой API-функции

18.12.2007, 11:53. Показов 821. Ответов 0

Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам

Привет всем. Спасибо, что решили прочитать мой вопрос.
У меня возникла проблема при подключении из программы сетевого ресурса под Win9x.
Я использую API-функцию WnetAddConnection2:

Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
Private Declare Function WNetAddConnection2 Lib 'mpr.dll' _
Alias 'WNetAddConnection2A' (lpNetResource As NETRESOURCE, _
ByVal lpPassword As String, ByVal lpUserName As String, _
ByVal dwFlags As Long) As Long
 
Private Const RESOURCETYPE_ANY = &H0
Private Const RESOURCETYPE_DISK = &H1
Private Const RESOURCETYPE_PRINT = &H2
Private Const RESOURCETYPE_UNKNOWN = &HFFFF
 
Private Type NETRESOURCE
  dwScope As Long
  dwType As Long         
  dwDisplayType As Long
  dwUsage As Long
  lpLocalName As String  
  lpRemoteName As String 
  lpComment As String
  lpProvider As String   
End Type
 
Public Function Connect() As Long
 
Dim UserName As String
Dim UserPassword As String
Dim NetRes As NETRESOURCE
 
  NetRes.lpLocalName = 'x:'
  NetRes.dwType = RESOURCETYPE_DISK
  NetRes.lpRemoteName = '\ServerRemoteDir'
  NetRes.lpProvider = vbNullString
 
  UserName = 'Guest'
  UserPassword = '111'
 
  Connect = WNetAddConnection2(NetRes, UserPassword, UserName, 0)
 
End Function

В этом примере я использую имя пользователя Guest. Так вот, если я при входе в систему зарегистрировался под этим же именем, то все работает. Если же я при загрузке виндов указал другое имя, скажем Admin, то ресурс становиться невозможно подключить. В Win Nt/2000 этой неприятности не наблюдается, но критичным является написание программы именно под Win9x. Если кто-нибудь знает, как можно обойти эту проблему, пожалуйста напишите мне: jfr@imail.ru (Алексей)
Заранее большое спасибо всем.

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

18.12.2007, 11:53

Ответы с готовыми решениями:

Проблема с handle, который нужно передать функции API
Привет всем, Столкнулся с проблемой, в VB я 'начинающий', надеюсь, что кто-нибудь поможет. Мне нужно зарегистрировать имя DDE-сервера...

Проблема с поиском корня заданой функции ( с использованием функции типа void с параметрами массива)
Доброго времени суток. Суть задания в том, что используя только функцию типа void в параметрах которой указан массив ( внутри которого...

Проблема с использованием функции Find
Добрый день. Возникла проблема. Почему не ищет? дельта Т раз =131,95 А в ексель если подстановкой то будет 478

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

18.12.2007, 11:53

Помогаю со студенческими работами здесь

Нужно создать програму на асемблере с использованием API функции GetDoubleClickTime
Мне нужно написать прогу которая повертала би максимальное значение между 2 щелчками мишки!!! ( как раз с помощью функции...

проблема с использованием функции в проекте Visual Basic, вызываемой из DLL написаной на Delphi5
Привет! У меня возникла проблема с использованием функции в проекте Visual Basic, вызываемой из DLL написаной на Delphi5. Код DLL: ...

проблема с установкой сетевой 1с
есть 3 компа с winXP, они в сетке.В сетке уже есть работающий сетевой ключ,но нужно, чтоб эти 3 компа работали со своим отдельным...

Asus P8H77-V LE проблема с сетевой картой
Доброго дня. Есть материнка Asus P8H77-V LE, в ней была произведена замена ЦПУ с i5 3330 на i7 3770, новый ЦПУ был прогрет АИДой, под...

Перемещение игрока в сетевой игре пс использованием джойстика
Есть два скрипта:джойстик и скрипт игрока, который получает от джойстика вектор. Но суть в том, что джойстик работает только у последнего...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .

Наверх