список сетевых подключений в windows XP sp2-sp3

Тема в разделе "WASM.WIN32", создана пользователем Toxasoft, 24 ноя 2010.

  1. Toxasoft

    Toxasoft New Member

    Публикаций:
    0
    Регистрация:
    20 сен 2010
    Сообщения:
    188
    Здраствуйте. (я нуб в интернетовских вещах)
    мне в голову приш ла мысль сделать под xp "индикатор сетевых подключений"(тот что в трее) как в windows7.
    И поетому возникло несколько вопросов:
    Как получить список сетевых подключений?
    Как вывести окно подключения?
    И как проверить статус подкльчения?
    Как закрыть подключение?

    P.S плиз пишите на масме или Делфи (но плиз не на сиииси)
     
  2. punxer

    punxer Андрей

    Публикаций:
    0
    Регистрация:
    16 окт 2006
    Сообщения:
    1.327
    Адрес:
    Ржев
    Тоже самое в гугле напиши плиз
     
  3. Toxasoft

    Toxasoft New Member

    Публикаций:
    0
    Регистрация:
    20 сен 2010
    Сообщения:
    188
    Харашо. но я ожидал квалифицырованой помоши
     
  4. gorodon

    gorodon New Member

    Публикаций:
    0
    Регистрация:
    19 окт 2009
    Сообщения:
    301
    Toxasoft
    Поковыряй Tcpview от Sysinternals - будет полезно.
     
  5. _sheva740

    _sheva740 New Member

    Публикаций:
    0
    Регистрация:
    31 авг 2005
    Сообщения:
    1.539
    Адрес:
    Poland
    Toxasoft
    Нужно писать "Хорошо". И "квалифицированной помощи".
    После точки пишем с большой буквы.
    У тебя разве не подсвечиваются ошибка при наборе?

    Тебе аналог netstat - а нужен?
    На masm-e что-то типа ... ?
    [​IMG]
     
  6. punxer

    punxer Андрей

    Публикаций:
    0
    Регистрация:
    16 окт 2006
    Сообщения:
    1.327
    Адрес:
    Ржев
    Да не то ему нужно. Ему нужно управлять подключениями в папке сетевые подключения. Простите за тафталогию.
     
  7. _sheva740

    _sheva740 New Member

    Публикаций:
    0
    Регистрация:
    31 авг 2005
    Сообщения:
    1.539
    Адрес:
    Poland
    Управлять этим что ли?
    [​IMG]
     
  8. _sheva740

    _sheva740 New Member

    Публикаций:
    0
    Регистрация:
    31 авг 2005
    Сообщения:
    1.539
    Адрес:
    Poland
    Если да, то наверное так:
    1. Тянем с официала devcon.exe
    2. Ищем наш девайс в файле list_dev.txt
    devcon find *> list_dev.txt
    3. Выключаем и включаем его
    devcon disable *конец_строки_имени_девайса
    devcon enable *конец_строки_имени_девайса
     
  9. punxer

    punxer Андрей

    Публикаций:
    0
    Регистрация:
    16 окт 2006
    Сообщения:
    1.327
    Адрес:
    Ржев
  10. Toxasoft

    Toxasoft New Member

    Публикаций:
    0
    Регистрация:
    20 сен 2010
    Сообщения:
    188
    (может кому надо)
    Я в инете поискал и вот:

    Код (Text):
    1. var
    2.   Reg: TRegistry;
    3.   name: string;
    4. begin
    5.   Reg := TRegistry.Create;
    6.   Reg.RootKey := HKEY_CURRENT_USER;
    7.  Reg.OpenKey('\RemoteAccess', False);
    8.  name := Reg.ReadString('XXXX');  => xxxx- имя подключения
    9.     winexec( pchar('rundll32.exe rnaui.dll,RnaDial ' + name),sw_show);
    Незнаю верно или нет(у мня внд7, а ХР только завтра установлю)
     
  11. punxer

    punxer Андрей

    Публикаций:
    0
    Регистрация:
    16 окт 2006
    Сообщения:
    1.327
    Адрес:
    Ржев
  12. Toxasoft

    Toxasoft New Member

    Публикаций:
    0
    Регистрация:
    20 сен 2010
    Сообщения:
    188
    Мне хоть это:
     
  13. punxer

    punxer Андрей

    Публикаций:
    0
    Регистрация:
    16 окт 2006
    Сообщения:
    1.327
    Адрес:
    Ржев
    RnaDial принимает 2 параметра типа PChar и Int
    Подгрузи себе (LoadLibrary) rnaui.dll, получи адрес процедуры RnaDial и и вызывай

    Код (Text):
    1. pRnaDial(pchar(name),SW_SHOW);
    Или как там в Delphi
     
  14. Toxasoft

    Toxasoft New Member

    Публикаций:
    0
    Регистрация:
    20 сен 2010
    Сообщения:
    188
    _sheva740 а нет ли аналога devcon но в апи
     
  15. _sheva740

    _sheva740 New Member

    Публикаций:
    0
    Регистрация:
    31 авг 2005
    Сообщения:
    1.539
    Адрес:
    Poland
    Это что ли?

    Код (Text):
    1. rnaui.dll,RnaDial <провайдер> - вызвать окно "Установка связи" с указанным провайдером
    2. rnaui.dll,RnaWizard - вызвать окно "Удаленный доступ к сети"
    3. rnaui.dll,RnaWizard /1 - вызвать окно "Новое соединение"
     
  16. Toxasoft

    Toxasoft New Member

    Публикаций:
    0
    Регистрация:
    20 сен 2010
    Сообщения:
    188
    punxer я просто на биструю руку пишу и не оптимизирую
     
  17. Toxasoft

    Toxasoft New Member

    Публикаций:
    0
    Регистрация:
    20 сен 2010
    Сообщения:
    188
    _sheva740
    Или да, или
    -Подключить;
    -отключить;
    -удалить.


    За создать(rnaui.dll,RnaWizard /1 - вызвать окно "Новое соединение")
    спс
     
  18. _sheva740

    _sheva740 New Member

    Публикаций:
    0
    Регистрация:
    31 авг 2005
    Сообщения:
    1.539
    Адрес:
    Poland
    Toxasoft
    Ты его сам переписать хочешь?
     
  19. Toxasoft

    Toxasoft New Member

    Публикаций:
    0
    Регистрация:
    20 сен 2010
    Сообщения:
    188
    _sheva740

    [​IMG]
    надо чтоб это через апи или хоть скрытно
     
  20. _sheva740

    _sheva740 New Member

    Публикаций:
    0
    Регистрация:
    31 авг 2005
    Сообщения:
    1.539
    Адрес:
    Poland
    Ну наверное так? Если для отключения, то:
    Код (Text):
    1. .data
    2. cmd1        db 'C:\i386\devcon disable *конец_строки_имени_девайса', 0
    3.  
    4. ...
    5.  
    6. invoke WinExec, cmd1, SW_HIDE
    7. ;или
    8. ;invoke ShellExecute,NULL,NULL,addr cmd1,NULL,NULL,SW_HIDE