Что нового

[Мышь, клавиатура] Нужен скрипт автоматического включения pppoe соединения и выключения

zeionline

Новичок
Сообщения
36
Репутация
1
Версия AutoIt: v3.3.6.1.

Описание:
Есть pppoe соединение нужно чтоб оно включалось а потом выключалось каждые х секунд.
Примечания:
Сложность состоит в том, что выключение и включение происходит в разных окнах. К тому же после выключения окно с которого проходил заход больше не появляется.
Спасибо.

436b4c6bef.png
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
zeionline,
Попробуйте так:
Код:
#include <Constants.au3>
#include <Encoding.au3>

$sConnectName = 'Название соединения'
$sLog = 'Логин'
$sPass = 'Пароль'
$sRead = ''
If StringInStr($sConnectName, ' ') Then
	$sConnectName = '"' & $sConnectName & '"'
EndIf
;Connect:
$iPID = Run('rasdial ' & $sConnectName & ' ' & $sLog & ' ' & $sPass, '', @SW_HIDE, $STDOUT_CHILD)
If $iPID Then
	While 1
		$sRead &= StdoutRead($iPID)
		If @error Then ExitLoop
		Sleep(20)
	WEnd
	$sRead = _Encoding_866To1251($sRead)
	ConsoleWrite('Connect: ' & $sRead & @CR)
Else
	ConsoleWrite('Connect: Error' & @CR)
EndIf
Sleep(5000)
;Disconnect:
$sRead = ''
$iPID = Run('rasdial ' & $sConnectName & ' /disconnect', '', @SW_HIDE, $STDOUT_CHILD)
If $iPID Then
	While 1
		$sRead &= StdoutRead($iPID)
		If @error Then ExitLoop
		Sleep(20)
	WEnd
	$sRead = _Encoding_866To1251($sRead)
	ConsoleWrite('Disconnect: ' & $sRead & @CR)
Else
	ConsoleWrite('Disconnect: Error' & @CR)
EndIf
 
Автор
Z

zeionline

Новичок
Сообщения
36
Репутация
1
Работает отлично. Только нужно чтоб скрипт все время включал и выключал соединение пока я его не остановлю.


Добавлено:
Сообщение автоматически объединено:

Спасибо. Доделал сам.
 

roon

Новичок
Сообщения
1
Репутация
0
данный скрипт вроде подключает интернет (появляется значок в области уведомлений), но иннет не пашет.
подскжите значение в строке $sRead =
 
Верх