[Lyrot]

Также в журнале после каждой загрузки Windows появляются следующие ошибки:
«Превышение времени ожидания (30000 мс) при ожидании подключения службы «vpn».»
«Сбой при запуске службы «vpn» из-за ошибки
Служба не ответила на запрос своевременно.»

[KOMMEHTATOP]

Вот не плохое Решение:
Автоматическое подключение при входе в систему 2:


1) Нам нужно чтобы имя интернет-подключения было на английском языке. Пример названия:VPN

2)Создаем Батник VPN.cmd (и помещаем его в Program Files)
Код:
@echo off
rasdial VPN LOGIN PASSWORD

2)Как скрыть исполнение файла CMD или BAT
2.1 Создаем Батник Internet.VBS и помещаем его в Program Files а ярлык в папку АВТОЗАГРУЗКА
Код:
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run chr(34) & "%ProgramFiles%\VPN.cmd" & Chr(34), 0
Set WshShell = Nothing

[Mancoffee]

Я делаю по-другому и скажем так, более качественно
Идём в "Просмотр событий --> Журналы приложений и служб --> Microsoft --> Windows"
Далее

смотрите скриншот

Ищем здесь по коду 10000 или 10001 подключение по локальной сети (там ещё будет ваше подключение к интернету), выделяем, внизу подсвечивается данные о нём, здесь же внизу переходим на вкладку "Подробности" и копируем Guid (далее советую вставить его в блокнот или как я в поле для ввода по Win+R и скопировать заново, так как он копируется из "Просмотр событий" не отформатированным в формате XML). Также, его (Guid) можно узнать в разделе реестра:
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\NetworkList\Profiles

Далее идём в "Планировщик заданий" и нажимаем справа "Создать задачу...", на вкладке "Триггер -> Начать задачу -> При событии -> Настраиваемое -> Создать фильтр события -> Журналы событий -> Журналы приложений и служб -> Microsoft -> Windows -> NetworkProfile -> Выполняется", ставим галочку.
Далее "Источники событий -> NetworkProfile".
В поле "<Все коды событий>" ставим 10000, редко бывает, что 10001, то бишь тот, который был в "Просмотр событий"
Далее переходим на вкладку XML, внизу ставим галочку на "Изменить запрос вручную", подтверждаем и после "(EventID=10000)]]" вставляем это

Код:

 and *[EventData[Data[@Name='Guid']='{Здесь Guid полученный из Просмотр событий}']]

Должно получится:

Код:

<QueryList>
  <Query Id="0" Path="Microsoft-Windows-NetworkProfile/Operational">
    <Select Path="Microsoft-Windows-NetworkProfile/Operational">*[System[Provider[@Name='Microsoft-Windows-NetworkProfile'] and (EventID=10000)]] and *[EventData[Data[@Name='Guid']='{Ваш Guid}']]</Select>
  </Query>
</QueryList>

То же, скриншотом

Далее советую "Отложить на" 5-7 секунд.
На вкладке "Действия" выбираем или
rasphone -d "Название вашего подключения из Сетевые поключения"
(если есть пробелы, то нужно взять название в кавычки) или
rasdial "Название вашего подключения из Сетевые поключения Логин Пароль"
(здесь также если есть пробелы, то нужно взять название в кавычки), логин и пароль которым вам дал провайдер для подключения к интернету.
В условиях (как подстраховка), поставить галочку "Запускать только при подключении к следующей сети:" и выбрать ваше "Подключение по локальной сети"
На вкладке "Параметры" я выставляю галочки на первых трёх верхних пунктах, на остальных снимаю все.
Готово. Теперь, если вы не подключены к сети, то ничего не произойдёт, если втыкнули кабель, идёт настройка и происходит автоматическое подключение к интернету.