Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Смена IP / 7 сообщений из 7, страница 1 из 1
29.02.2008, 01:23
    #35162018
Haus
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смена IP
Народ помогите исходником прожки для смены IP адреса,очень надо.
...
Рейтинг: 0 / 0
29.02.2008, 10:39
    #35162425
Дмитрий77
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смена IP
/topic/389069&hl=
Из командной строки это делается без всяких проблем:
(Читайте описание Windows)
Соединиться
shell("rasdial Имя_соединения Login Password")
Разъединиться
shell("rasdial /D")
Это если у тебя динамический ip.

Ну а чтобы понять какой ip получился можешь через webbrowser прочитать напр.содержимое странички www.myip.ru

Ну, способов то много. Я напр., научился своим D-link роутером через web-интерфейс программно управлять, в частности менять IP. disconnect-connect
...
Рейтинг: 0 / 0
29.02.2008, 10:57
    #35162502
Haus
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смена IP
Мне необходимо изменить IP имено при помощи Visual Basic.
...
Рейтинг: 0 / 0
29.02.2008, 11:50
    #35162746
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смена IP
> Автор: Haus
> Мне необходимо изменить IP имено при помощи Visual Basic.

5 минут поиска ;-) , дали такую функцию:
EnableStatic Method in Class Win32_NetworkAdapterConfiguration
которая
The EnableStatic WMI class method enables static TCP/IP addressing for the
target network adapter. As a result, DHCP for this network adapter is
disabled.
[Visual Basic]
NetworkAdapterConfiguration.EnableStatic( _
IPAddress As String, _
SubnetMask As String _
) As Integer


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
29.02.2008, 15:20
    #35163598
Дмитрий77
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смена IP
HausМне необходимо изменить IP имено при помощи Visual Basic.
А shell это вам не vb что ли?
...
Рейтинг: 0 / 0
01.03.2008, 02:44
    #35164699
Haus
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смена IP
Я только учусь и не могу врубится про што идет реч.
...
Рейтинг: 0 / 0
01.03.2008, 06:42
    #35164732
Дмитрий77
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смена IP
msdn
Shell Function
Runs an executable program and returns a Variant (Double) representing the program's task ID if successful, otherwise it returns zero.

Syntax

Shell(pathname[,windowstyle])

The Shell function syntax has these named arguments:

Part Description
pathname Required; Variant (String). Name of the program to execute and any required arguments or command-line switches; may include directory or folder and drive.
windowstyle Optional. Variant (Integer) corresponding to the style of the window in which the program is to be run. If windowstyle is omitted, the program is started minimized with focus.


The windowstyle named argument has these values:

Constant Value Description
vbHide 0 Window is hidden and focus is passed to the hidden window.
vbNormalFocus 1 Window has focus and is restored to its original size and position.
vbMinimizedFocus 2 Window is displayed as an icon with focus.
vbMaximizedFocus 3 Window is maximized with focus.
vbNormalNoFocus 4 Window is restored to its most recent size and position. The currently active window remains active.
vbMinimizedNoFocus 6 Window is displayed as an icon. The currently active window remains active


Для понимания rasdial вам надо почитать help (поиск!) в вашем Windows.

Eсли вы учитесь, то конечно закопаться во всевозможные API интересней и познавательней, но если вам надо быстро решить ту задачу, что вы обозначили, предложенный мною вариант достаточно думаю хорош. Если очень надо, могу дать ф-цию ShellAndContinue, кот. использует Shell, но при этом ждет завершения внешнего процесса.

В принципе, согласен VB здесь даже не обязателен, можно все в Dos-овский bat-файл запихнуть.
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Смена IP / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]