Wifi Роутер - раздача wifi с пк

@AlisherUser · Регистрация: 25.02.2016

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

Здравствуйте,я хотел создать программу wifi Роутер но у меня одна проблема wifi создаётся , с телефона подключается но доступа к интернету нет как я могу программно дать доступ к точке доступа вот видео как делается это в ручную.

Кликните здесь для просмотра всего текста

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Shell("netsh wlan set hostednetwork mode=allow ssid=" & TextBox1.Text & " key='" & TextBox2.Text & "' keyusage=persistent")
    End Sub
 
    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Shell("netsh wlan start hostednetwork")
    End Sub
 
    Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
        Shell("netsh wlan stop hostednetwork")
    End Sub
 
    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        Dim str As String = "netsh wlan show hostednetwork" & vbCrLf & "TIMEOUT /T 20 /NOBREAK"
        Shell(str)
    End Sub
End Class

@Orlangur · 17.05.2016, 10:28

AlisherUser, нужны тесты, желательно с различных ос, я просто не в курсе в какой ос как называются адаптеры, но, вроде как, имена разные, это делал под windows 7, возможно нужна еще функция, которая будет определять тип ос и в зависимости от него, будет подсовывать в переменную adap нужную строку с названием

@AlisherUser · 17.05.2016, 11:24 **[ТС]**

Сообщение от Orlangur1991

нужны тесты, желательно с различных ос

У меня тоже win7

@Orlangur · 17.05.2016, 12:15

только что попал в руки ноут с windows 8.1, смог проверить и внести некоторые корректировки, был косяк, если на этой машине ранее не поднимался такой роутер, то получалось, что прога переименовывала адаптер, который еще не был создан, плюс к тому же на 8.1 созданная сеть называется "Подключение по локальной сети"
В принципе, осталось отловить название всех адаптеров и тогда все будет хорошо, добавлен костыль на определение ос.

@BatyrbekAl · 07.07.2017, 10:56

Orlangur1991, Как получить этот параметр из vb.net ?

Новые блоги и статьи Все статьи Все блоги /
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ" Adler 06.10.2026 Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .

@Orlangur Лень — мое второе и 3231 / 2418 / 688 Регистрация: 28.11.2014 Сообщений: 3,603 Записей в блоге: 3
	17.05.2016, 10:28
	AlisherUser, нужны тесты, желательно с различных ос, я просто не в курсе в какой ос как называются адаптеры, но, вроде как, имена разные, это делал под windows 7, возможно нужна еще функция, которая будет определять тип ос и в зависимости от него, будет подсовывать в переменную adap нужную строку с названием 0

@BatyrbekAl 26 / 26 / 6 Регистрация: 09.09.2015 Сообщений: 155
	07.07.2017, 10:56
	Orlangur1991, Как получить этот параметр из vb.net ? Миниатюры 0