[Offtopic] Автоконфигуратор PPPOE

[RusB1T]

Подскажите существует ли в природе софт (кроме как в windows server), который позволяет создавать автоматически pppoe соединение?

[~AsmodeuS~]

новый Amon

[ran]

Подскажите существует ли в природе софт (кроме как в windows server), который позволяет создавать автоматически pppoe соединение?

что значит "создавать автоматически"? Конфигурировать? Если клиентское - yast из дистра опенсюзи А ваще - чего там его конфигурировать-то?

[RusB1T]

что значит "создавать автоматически

Создать подключение по pppoe в XP на стороне клиента.

[RusB1T]

новый Amon

В amon'е данную функцию не нашел.
Или он только под заказ?

[ran]

что значит "создавать автоматически

Создать подключение по pppoe в XP на стороне клиента.

ну если сильно напряжно клацнуть несколько раз мышой в мастере сетевых подключений можно извратиться и написать батник

[~AsmodeuS~]

в ком версии Amon есть возможность автосоздания VPN/PPPoE

[Окаянный поросёнок]

Подскажите существует ли в природе софт (кроме как в windows server), который позволяет создавать автоматически pppoe соединение?

Можно, ничего и мудрить не стоит...я у себя в локалке делал авто-установщик всего-всего-всего...начиная с чата - оканчивая p2p клиентом на локальный хаб и VPN подключением к инэту

Вот например скрипт для настраивания клинтской тачки на использование DHCP:

Код: Выделить всё

strComputer = "."
Set objWMIService = GetObject(_
    "winmgmts:\" & strComputer & "\root\cimv2")
Set colNetAdapters = objWMIService.ExecQuery _
    ("Select * from Win32_NetworkAdapterConfiguration " _
        & "where IPEnabled=TRUE")
 
For Each objNetAdapter In colNetAdapters
    errEnable = objNetAdapter.EnableDHCP()
Next

А вот на ДНС:

Код: Выделить всё

On Error Resume Next
 
strComputer = "."
arrNewDNSServerSearchOrder = Array("ХХХ.ХХХ.ХХХ.ХХХ", "ХХХ.ХХХ.ХХХ.ХХХ")
 
Set objWMIService = GetObject("winmgmts:" _
 & "{impersonationLevel=impersonate}!\" & strComputer & "\root\cimv2")
Set colNicConfigs = objWMIService.ExecQuery _
 ("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True")
 
 
For Each objNicConfig In colNicConfigs
  If Not IsNull(objNicConfig.DNSServerSearchOrder) Then
    For Each strDNSServer In objNicConfig.DNSServerSearchOrder
    Next
  End If
  intSetDNSServers = _
   objNicConfig.SetDNSServerSearchOrder(arrNewDNSServerSearchOrder)
Next
 
 
Set colNicConfigs = objWMIService.ExecQuery _
 ("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True")
 
For Each objNicConfig In colNicConfigs
  If Not IsNull(objNicConfig.DNSServerSearchOrder) Then
    For Each strDNSServer In objNicConfig.DNSServerSearchOrder
    Next
  End If
Next

А с подключением так еще проще:
1. Создаем у себя подключение
2. выдергиваем у себя файлик:

Код: Выделить всё

%USERPROFILE%\Application Data\Microsoft\Network\Connections\Pbk\

3. создаем SFX архив который бы подсовывал в тихом режиме этот файлик на клиентскую тачку

вот и все:)дерзай!это самый простой способ без использования Amon

[NiTr0]

Я писал конфигуратор ВПН - пишется за вечер на с++; еще 2 дня заняла гламурная шкурка на него + создание ярлыка на рабочем столе. Сырцы, выполняющие каждое действие, есть в инете. Натолкнул меня на это топик на наге. Туда же я и ссылки кидал для жаждущих повторить...
Там же - и основные грабли описал...