Узнать запущена ли служба Windows

@Avazart · Регистрация: 10.12.2010

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

Как узнать запущена ли оперделенная служба Windows, если конкретно служба управления подключениями удаленного доступа.

Т.е моей программке находящейся в автозапуске нужно ждать покаместь служба не запустится, а затем затем она должна запустить rasdial.exe для установления соединения.

@-=ЮрА=- · 14.07.2012, 10:36

Avazart, Диспетчер подключений удаленного доступа запускается с помощью C:\WINDOWS\system32\svchost.exe -k netsvcs (запустить svchost с параметрами -k netsvcs)
Если служба не включена - програмно её включи и делай свой дайл

На счёт проверки запущен ли диспетчер - Можно получить список процессов и посмотреть присутсвует ли процесс svchost.exe с именем пользователя NEWORK SERVICE

@Avazart · 14.07.2012, 11:10 **[ТС]**

Ну запускать мне не надо он сам запустится мне надо лишь ждать.
Дело в том что винда после загрузки запускает сначала мою прогу и и где-то поле службу...

Т.е. задача проста -при включении компа автоматом подключить интернет.

Через процессы конечно можно, но по видимому не лучший вариант.

@-=ЮрА=- · 14.07.2012, 11:22

Не по теме:

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

Т.е. задача проста -при включении компа автоматом подключить интернет.

Ну вот бери и делай
system("C:\\WINDOWS\\system32\\svchost.e xe -k netsvcs");
затем запускай rasdial.exe. Зачем ждать или искать запущен ли диспетчер - програмно врубай и удалённый доступ будет работать в любом случае

@Avazart · 14.07.2012, 12:05 **[ТС]**

Ну так быстрее не будет, он ведь теоритически еще тупить может не известно сколько времени.
Так что ждать полюбому нужно.Да и подозреваю не хорошо это как то поперд батька в пекло

Добавлено через 38 минут
Нашел код делфи для телнета остается узнать как обзывается моя служба.

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
: procedure TForm1.Btn1Click(Sender: TObject); 
 const 
    cservname ='tlntsvr'; //telnet 
 var sStatus: SERVICE_STATUS; 
     schSCManager: SC_HANDLE; 
     schService: SC_HANDLE; 
 begin 
   schSCManager:=OpenSCManager(nil,nil,SC_MANAGER_ALL_ACCESS); 
   if schSCManager=0 then RaiseLastOSError; 
   schService:=OpenService(schSCManager,cservname,SERVICE_ALL_ACCESS); 
   if schService=0 then RaiseLastOSError; 
   if(QueryServiceStatus(schService,sStatus)) then begin 
     case sStatus.dwCurrentState of 
       SERVICE_STOPPED: Label1.Caption := 'Остановлен'; 
       SERVICE_RUNNING: Label1.Caption := 'Запущен'; 
     end; 
   end; 
 end;

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
const char cservname[] ="tlntsvr"; //telnet
SERVICE_STATUS sStatus ;
SC_HANDLE  schSCManager;
SC_HANDLE   schService;
 
schSCManager=OpenSCManager(NULL,NULL,SC_MANAGER_ALL_ACCESS);
 
if(schSCManager==0)  RaiseLastOSError();
 
schService=OpenService(schSCManager,cservname,SERVICE_ALL_ACCESS);
 
if (schService==0)  RaiseLastOSError();
 
if(QueryServiceStatus(schService,&sStatus))
 {
   switch(sStatus.dwCurrentState)
    {
     case SERVICE_STOPPED: Caption = "Остановлен";break;
     case SERVICE_RUNNING: Caption = "Запущен";break;
    }
 }
}
//---------------------------------------------------------------------------

@-=ЮрА=- · 14.07.2012, 12:16

Avazart, ты б сразу сказал что тебе телнет нужен

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

"tlntsvr"

просто получи список процессов (как вариант посмотри этот способ получения списка процессов https://www.cyberforum.ru/blogs/34326/blog244.html) и найди tlntsvr.exe

@Avazart · 14.07.2012, 12:17 **[ТС]**

Нашел код делфи для телнета остается узнать как обзывается моя служба.

Нужна служба управления подключениями удаленного доступа.

@-=ЮрА=- · 14.07.2012, 12:18

Не по теме:

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

Нужна служба управления подключениями удаленного доступа.

ищи службу RasMan

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

const char cservname[] ="RasMan";

хотя может и netsvcs надо, всё таки запуск диспетчера через это название идёт

Сообщение от -=ЮрА=-

C:\\WINDOWS\\system32\\svchost.exe -k netsvcs

@Avazart · 14.07.2012, 12:19 **[ТС]**

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

@-=ЮрА=- · 14.07.2012, 12:24

Не по теме:

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

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

дык уже ответил:)

Сообщение от -=ЮрА=-

ищи службу RasMan
const char cservname[] ="RasMan";
хотя может и netsvcs надо, всё таки запуск диспетчера через это название идёт
Сообщение от -=ЮрА=-
C:\\WINDOWS\\system32\\svchost.exe -k netsvcs

@Avazart · 14.07.2012, 12:32 **[ТС]**

Чет нет такого.

Список служб

Имя ИД*проц... Описание Состояние Группа
EFS 516 Шифрованная*файловая*система*(EFS) Работает
wuauserv 964 Центр*обновления*Windows Работает netsvcs
wscsvc Центр*обеспечения*безопасности Остановлено LocalServiceNetworkRe...
WcsPlugInService Цветовая*система*Windows*(WCS) Остановлено wcssvc
fdPHost 1080 Хост*поставщика*функции*обнаружения Работает LocalService
BITS 964 Фоновая*интеллектуальная*служба*передачи *(... Работает netsvcs
TrustedInstaller Установщик*модулей*Windows Остановлено Н/Д
msiserver Установщик*Windows Остановлено Н/Д
AxInstSV Установщик*ActiveX*(AxInstSV) Остановлено AxInstSVGroup
hkmsvc Управление*сертификатами*и*ключом*работо с... Остановлено netsvcs
upnphost Узел*универсальных*PNP*устройств Остановлено LocalServiceAndNoImp...
WdiServiceHost 1080 Узел*службы*диагностики Работает LocalService
WdiSystemHost Узел*системы*диагностики Остановлено LocalSystemNetworkRe...
AppIDSvc Удостоверение*приложения Остановлено LocalServiceAndNoImp...
RemoteRegistry Удаленный*реестр Остановлено regsvc
RpcSs 784 Удаленный*вызов*процедур*(RPC) Работает rpcss
lltdsvc Тополог*канального*уровня Остановлено LocalService
VSS Теневое*копирование*тома Остановлено Н/Д
Themes 964 Темы Работает netsvcs
TapiSrv 1248 Телефония Работает NetworkService
AudioEndpointBuilder 908 Средство*построения*конечных*точек*Windo ws... Работает LocalSystemNetworkRe...
RpcEptMapper 784 Сопоставитель*конечных*точек*RPC Работает RPCSS
SCardSvr Смарт*карта Остановлено LocalServiceAndNoImp...
TermService Службы*удаленных*рабочих*столов Остановлено NetworkService
CryptSvc 1248 Службы*криптографии Работает NetworkService
ALG Служба*шлюза*уровня*приложения Остановлено Н/Д
BDESVC Служба*шифрования*дисков*BitLocker Остановлено netsvcs
WinRM Служба*удаленного*управления*Windows*(WS *... Остановлено NetworkService
SENS 964 Служба*уведомления*о*системных*событиях Работает netsvcs
sppuinotify Служба*уведомления*SPP Остановлено LocalService
netprofm 1080 Служба*списка*сетей Работает LocalService
aspnet_state Служба*состояний*ASP.NET Остановлено Н/Д
NlaSvc 1248 Служба*сведений*о*подключенных*сетях Работает NetworkService
WerSvc Служба*регистрации*ошибок*Windows Остановлено WerSvcGroup
PNRPAutoReg Служба*публикации*имен*компьютеров*PNRP Остановлено LocalServicePeerNet
ProfSvc 964 Служба*профилей*пользователей Работает netsvcs
PcaSvc 908 Служба*помощника*по*совместимости*програ мм Работает LocalSystemNetworkRe...
DPS 1484 Служба*политики*диагностики Работает LocalServiceNoNetwork
bthserv Служба*поддержки*Bluetooth Остановлено bthsvcs
MSSQLServerADHel... Служба*поддержки*Active*Directory*сервер а*SQ... Остановлено Н/Д
WPDBusEnum Служба*перечислителя*переносных*устройст в Остановлено LocalSystemNetworkRe...
WMPNetworkSvc 3612 Служба*общих*сетевых*ресурсов*проигрыват е... Работает Н/Д
NetTcpPortSharing Служба*общего*доступа*к*портам*Net.Tcp Остановлено
wbengine Служба*модуля*архивации*на*уровне*блоков Остановлено Н/Д
FontCache 2884 Служба*кэша*шрифтов*Windows Работает LocalServiceAndNoImp...
nsi 1080 Служба*интерфейса*сохранения*сети Работает LocalService
MSiSCSI Служба*инициатора*Майкрософт*iSCSI Остановлено netsvcs
StiSvc Служба*загрузки*изображений*Windows*(WIA ) Остановлено Н/Д
W32Time Служба*времени*Windows Остановлено LocalService
TabletInputService Служба*ввода*планшетного*ПК Остановлено LocalSystemNetworkRe...
BFE 1484 Служба*базовой*фильтрации Работает LocalServiceNoNetwork
Wlansvc 908 Служба*автонастройки*WLAN Работает LocalSystemNetworkRe...
WinHttpAutoProxySvc Служба*автоматического*обнаружения*веб*п р... Остановлено LocalService
SstpSvc 1080 Служба*SSTP Работает LocalService
SNMP 2040 Служба*SNMP Работает Н/Д
COMSysApp Системное*приложение*COM+ Остановлено Н/Д
EventSystem 1080 Система*событий*COM+ Работает LocalService
Netman 908 Сетевые*подключения Работает LocalSystemNetworkRe...
Netlogon Сетевой*вход*в*систему Остановлено
THREADORDER Сервер*упорядочения*потоков Остановлено LocalService
LanmanServer 964 Сервер Работает netsvcs
Appinfo Сведения*о*приложении Остановлено netsvcs
Wecsvc Сборщик*событий*Windows Остановлено NetworkService
EapHost 964 Расширяемый*протокол*проверки*подлинност и*... Работает netsvcs
CertPropSvc Распространение*сертификата Остановлено netsvcs
LanmanWorkstation 1248 Рабочая*станция Работает NetworkService
FDResPub Публикация*ресурсов*обнаружения*функции Остановлено LocalServiceAndNoImp...
PNRPsvc Протокол*PNRP Остановлено LocalServicePeerNet
simptcp 1992 Простые*службы*TCP/IP Работает
HomeGroupListener Прослушиватель*домашней*группы Остановлено LocalSystemNetworkRe...
swprv Программный*поставщик*теневого*копирован и... Остановлено Н/Д
dot3svc Проводная*автонастройка Остановлено LocalSystemNetworkRe...
HomeGroupProvider Поставщик*домашней*группы Остановлено LocalServiceNetworkRe...
SCPolicySvc Политика*удаления*смарт*карт Остановлено netsvcs
wercplsupport Поддержка*элемента*панели*управления*"От ч... Остановлено netsvcs
MMCSS 964 Планировщик*классов*мультимедиа Работает netsvcs
Schedule 964 Планировщик*заданий Работает netsvcs
Power 684 Питание Работает DcomLaunch
IPBusEnum Перечислитель*IP*шин*PnP*X Остановлено LocalSystemNetworkRe...
TBS Основные*службы*доверенного*платформенно ... Остановлено LocalServiceAndNoImp...
ShellHWDetection 964 Определение*оборудования*оболочки Работает netsvcs
SharedAccess Общий*доступ*к*подключению*к*Интернету*( ICS) Остановлено netsvcs
UI0Detect Обнаружение*интерактивных*служб Остановлено Н/Д
SSDPSRV 2884 Обнаружение*SSDP Работает LocalServiceAndNoImp...
wcncsvc 2884 Немедленные*подключения*Windows***регист р... Работает LocalServiceAndNoImp...
SessionEnv Настройка*сервера*удаленных*рабочих*стол ов Остановлено netsvcs
lmhosts 836 Модуль*поддержки*NetBIOS*через*TCP/IP Работает LocalServiceNetworkRe...
DcomLaunch 684 Модуль*запуска*процессов*DCOM*сервера Работает DcomLaunch
IKEEXT 964 Модули*ключей*IPsec*для*обмена*ключами*в *И... Работает netsvcs
RemoteAccess Маршрутизация*и*удаленный*доступ Остановлено netsvcs
RpcLocator Локатор*удаленного*вызова*процедур*(RPC) Остановлено Н/Д
SNMPTRAP Ловушка*SNMP Остановлено Н/Д
FontCache3.0.0.0 Кэш*шрифтов*Windows*Presentation*Foundat ion*... Остановлено Н/Д
MSDTC Координатор*распределенных*транзакций Остановлено Н/Д
TrkWks 908 Клиент*отслеживания*изменившихся*связей Работает LocalSystemNetworkRe...
gpsvc 964 Клиент*групповой*политики Работает netsvcs
AeLookupSvc Информация*о*совместимости*приложений Остановлено netsvcs
Winmgmt 964 Инструментарий*управления*Windows Работает netsvcs
KeyIso 516 Изоляция*ключей*CNG Работает
ProtectedStorage Защищенное*хранилище Остановлено
WinDefend Защитник*Windows Остановлено secsvcs
sppsvc Защита*программного*обеспечения Остановлено Н/Д
pla Журналы*и*оповещения*производительности Остановлено LocalServiceNoNetwork
eventlog 836 Журнал*событий*Windows Работает LocalServiceNetworkRe...
hidserv Доступ*к*HID*устройствам Остановлено LocalSystemNetworkRe...
SamSs 516 Диспетчер*учетных*записей*безопасности Работает
VaultSvc Диспетчер*учетных*данных Остановлено
p2pimsvc Диспетчер*удостоверения*сетевых*участник ов Остановлено LocalServicePeerNet
UxSms 908 Диспетчер*сеансов*диспетчера*окон*рабоче го*... Работает LocalSystemNetworkRe...
RasMan 964 Диспетчер*подключений*удаленного*доступа Работает netsvcs
Spooler 1456 Диспетчер*печати Работает Н/Д
RasAuto Диспетчер*автоматических*подключений*уда л... Остановлено netsvcs
defragsvc Дефрагментация*диска Остановлено Н/Д
p2psvc Группировка*сетевых*участников Остановлено LocalServicePeerNet
seclogon Вторичный*вход*в*систему Остановлено netsvcs
iphlpsvc 964 Вспомогательная*служба*IP Работает NetSvcs
vds Виртуальный*диск Остановлено Н/Д
WebClient Веб*клиент Остановлено LocalService
Browser Браузер*компьютеров Остановлено netsvcs
MpsSvc 1484 Брандмауэр*Windows Работает LocalServiceNoNetwork
WbioSrvc Биометрическая*служба*Windows Остановлено WbioSvcGroup
SDRSVC Архивация*Windows Остановлено Н/Д
SensrSvc Адаптивная*регулировка*яркости Остановлено LocalServiceAndNoImp...
NetTcpActivator Адаптер*прослушивателя*Net.Tcp Остановлено
NetPipeActivator Адаптер*прослушивателя*Net.Pipe Остановлено
NetMsmqActivator Адаптер*прослушивателя*Net.Msmq Остановлено
PolicyAgent Агент*политики*IPsec Остановлено NetworkServiceNetwor...
napagent Агент*защиты*сетевого*доступа Остановлено NetworkService
SQLAgent$SQLEXPR... Агент*SQL*Server*(SQLEXPRESS) Остановлено Н/Д
WwanSvc Автонастройка*WWAN Остановлено LocalServiceNoNetwork
wmiApSrv WMI*Performance*Adapter Остановлено Н/Д
WSearch 3144 Windows*Search Работает Н/Д
wlidsvc 1140 Windows*Live*ID*Sign*in*Assistant Работает Н/Д
wudfsvc 908 Windows*Driver*Foundation***User*mode*Dr iver*Fr... Работает LocalSystemNetworkRe...
idsvc Windows*CardSpace Остановлено
Audiosrv 836 Windows*Audio Работает LocalServiceNetworkRe...
TlntSvr Telnet Остановлено Н/Д
SwitchBoard SwitchBoard Остановлено Н/Д
SysMain 908 Superfetch Работает LocalSystemNetworkRe...
StarWindServiceAE StarWind*AE*Service Остановлено Н/Д
srvF0C srvF0C Остановлено netsvcs
MSSQL$SQLEXPRESS 1736 SQL*Server*(SQLEXPRESS) Работает Н/Д
SkypeUpdate Skype*Updater Остановлено Н/Д
QWAVE Quality*Windows*Audio*Video*Experience Остановлено LocalServiceAndNoImp...
PlugPlay 684 Plug*and*Play Работает DcomLaunch
WPCSvc Parental*Controls Остановлено LocalServiceNetworkRe...
OracleXETNSListener 1952 OracleXETNSListener Работает Н/Д
OracleXEClrAgent OracleXEClrAgent Остановлено Н/Д
OracleServiceXE 1876 OracleServiceXE Работает Н/Д
OracleMTSRecovery... OracleMTSRecoveryService Остановлено Н/Д
OracleJobSchedulerXE OracleJobSchedulerXE Остановлено Н/Д
osppsvc Office*Software*Protection*Platform Остановлено Н/Д
ose Office**Source*Engine Остановлено Н/Д
nvsvc 744 NVIDIA*Display*Driver*Service Работает Н/Д
Nero*BackItUp*Sche... 1764 Nero*BackItUp*Scheduler*4.0 Работает Н/Д
MySQL 3000 MySQL Работает Н/Д
Microsoft*SharePoint... Microsoft*SharePoint*Workspace*Audit*Ser vice Остановлено Н/Д
odserv Microsoft*Office*Diagnostics*Service Остановлено Н/Д
clr_optimization_v4.... Microsoft*.NET*Framework*NGEN*v4.0.30319 _X86 Остановлено Н/Д
clr_optimization_v2.... Microsoft*.NET*Framework*NGEN*v2.0.50727 _X86 Остановлено Н/Д
MDM 1684 Machine*Debug*Manager Работает Н/Д
KtmRm KtmRm*для*координатора*распределенных*тр а... Остановлено NetworkServiceAndNoI...
InterBaseServer InterBase*Server Остановлено Н/Д
InterBaseGuardian InterBase*Guardian Остановлено Н/Д
IDriverT InstallDriver*Table*Manager Остановлено Н/Д
gusvc Google*Software*Updater Остановлено Н/Д
TestHandler 444 Fujitsu*Diagnostic*Testhandler Работает Н/Д
FLEXnet*Licensing*S... FLEXnet*Licensing*Service Остановлено Н/Д
ekrn 1632 ESET*Service Работает Н/Д
EhttpSrv ESET*HTTP*Server Остановлено Н/Д
SpeechCube*TTS ELAN*Sayso/Tempo*Telecom*Service Остановлено Н/Д
Dnscache 1248 DNS*клиент Работает NetworkService
Dhcp 836 DHCP*клиент Работает LocalServiceNetworkRe...
BlackfishSQL 1560 BlackfishSQL Работает Н/Д
2GISUpdateService 2GIS*UpdateService Остановлено Н/Д

Добавлено через 6 минут
А вот уже заметил, спасибо!

Code
1
RasMan  964 Диспетчер*подключений*удаленного*доступа   Работает    netsvcs

@-=ЮрА=- · 14.07.2012, 12:36

Avazart, надо искать RasMan как бонус поисковик служб на скорую руку

C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
#include <stdio.h>
#include <windows.h>
 
LPSTR StrWinError(int _err)
{
    LPSTR errString = NULL;  // will be allocated and filled by FormatMessage
    FormatMessage(
        FORMAT_MESSAGE_ALLOCATE_BUFFER |
        FORMAT_MESSAGE_FROM_SYSTEM, // use windows internal message table
        0,       // 0 since source is internal message table
        _err,    // this is the error code 
                          // Could just as well have been an error code from generic
                          // Windows errors from GetLastError()
        MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),       // auto-determine language to use
        (LPSTR)&errString,
        0,       // min size for buffer
        0);
    return errString;
}
 
int main()
{
    system("chcp 1251");
    SERVICE_STATUS sStatus ;
    SC_HANDLE  schSCManager;
    SC_HANDLE  schService  ;
 
    char szService[256]      = {0};
    schSCManager=OpenSCManager(NULL,NULL,SC_MANAGER_ALL_ACCESS);
    if(!schSCManager)  
        printf("ERROR : %s\n", StrWinError(GetLastError()));
    else
    {
        while(TRUE)
        {
            printf("Enter ServiceName : ");
            scanf("%[^\n]", szService);getchar();
            schService=OpenService(schSCManager,szService,SERVICE_ALL_ACCESS);
            if(!schService)  
                printf("ERROR : %s\n", StrWinError(GetLastError()));
            else
            {
                if(QueryServiceStatus(schService,&sStatus))
                {
                    switch(sStatus.dwCurrentState)
                    {
                     case SERVICE_STOPPED: 
                         printf("Îñòàíîâëåí\n");
                        break;
                     case SERVICE_RUNNING: 
                          printf("Çàïóùåí\n");
                         break;
                    }
                }
            }
        }
    }
    return 0;
}

@Avazart · 14.07.2012, 12:46 **[ТС]**

Итого:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
using namespace std;
 
int _tmain(int argc, _TCHAR* argv[])
{
system("chcp 1251");
 
const char cservname[] ="RasMan";
 
SERVICE_STATUS sStatus ;
SC_HANDLE  schSCManager;
SC_HANDLE  schService;
 
schSCManager= OpenSCManager(NULL,NULL,SC_MANAGER_ALL_ACCESS);
 
if(schSCManager==0) cerr<<"Error #"<<GetLastError()<<endl;
 
schService= OpenService(schSCManager,cservname,SERVICE_ALL_ACCESS);
 
if (schService==0)  cerr<<"Error #"<<GetLastError()<<endl;
 
if(QueryServiceStatus(schService,&sStatus))
 {
   switch(sStatus.dwCurrentState)
    {
     case SERVICE_STOPPED: cout<<"Остановлен"<<endl; break;
     case SERVICE_RUNNING: cout<<"Запущен"   <<endl; break;
    }
 }
 
CloseServiceHandle(schService);
CloseServiceHandle(schSCManager);
 
system("pause");
return 0;
}
//---------------------------------------------------------------------------

Добавлено через 1 минуту
Стоит правда еще коды ошибок обрабатывать, но это уже дело техники.

@-=ЮрА=- · 14.07.2012, 13:24

Не по теме:

Avazart, думаю ты это писал

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

стоит правда еще коды ошибок обрабатывать, но это уже дело техники.

до того как уувидел мой пост выше:)

@Avazart · 07.08.2012, 22:54 **[ТС]**

Походу не эта служба...

По крайней мере она остается не запущенной пока не вызовишь rasdial.exe ну либо вручную через гуи не подкключишь.

Поэтому сформулирую проблему снова при запуске системы при попытке подключить ( вручную или через ярлык или bat с запуском rasdial.exe) вылазиет такое окошечко

@Avazart · 04.10.2012, 19:48 **[ТС]**

Вообще пошел другим путем- добавил в автозагрузку батник

Bash
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
@echo off
chcp 1251> nul
set  count=1
rasdial /DISCONNECT > nul
echo Подключение... (%count%)
 
:begin
rasdial VPN-подключение *** *** > nul
if %errorlevel%==0 goto end
goto error 
 
:error
color 0C 
echo.
echo Ошибка!
set /A count= count+1
timeout /T 10
cls
color 0A 
echo Подключение... (%count%)
if %count%==10 goto stop
goto begin
 
:end
echo.
color 09
echo Успешно! 
timeout /T 5
exit
 
:stop
color 0A 
echo Превышено количество попыток 
pause

Добавлено через 12 минут
Но все же как проверить программно удачность выполнения rasdial?

@Eva Rosalene · 23.04.2015, 16:44

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

Как узнать запущена ли оперделенная служба Windows

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

добавил в автозагрузку батник

Ну раз батник, то вообще можно использовать

Windows Batch file
1
sc query RasMan

@Avazart · 23.04.2015, 16:48 **[ТС]**

Не по теме:

Подарили роутер, и забыл о проблеме с этим VPN.

Новые блоги и статьи Все статьи Все блоги /
PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Access VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .	Создание Single Page Application на фреймах krapotkin 16.11.2025 Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .

@Avazart 8484 / 6151 / 615 Регистрация: 10.12.2010 Сообщений: 28,683 Записей в блоге: 30

	Узнать запущена ли служба Windows 14.07.2012, 00:23. Показов 10949. Ответов 17 Метки нет (Все метки) Как узнать запущена ли оперделенная служба Windows, если конкретно служба управления подключениями удаленного доступа. Т.е моей программке находящейся в автозапуске нужно ждать покаместь служба не запустится, а затем затем она должна запустить rasdial.exe для установления соединения. 0

@-=ЮрА=- 6614 / 4256 / 401 Регистрация: 08.08.2009 Сообщений: 10,325 Записей в блоге: 24
	14.07.2012, 10:36
	Avazart, Диспетчер подключений удаленного доступа запускается с помощью C:\WINDOWS\system32\svchost.exe -k netsvcs (запустить svchost с параметрами -k netsvcs) Если служба не включена - програмно её включи и делай свой дайл На счёт проверки запущен ли диспетчер - Можно получить список процессов и посмотреть присутсвует ли процесс svchost.exe с именем пользователя NEWORK SERVICE Миниатюры 0

@Avazart 8484 / 6151 / 615 Регистрация: 10.12.2010 Сообщений: 28,683 Записей в блоге: 30
	14.07.2012, 11:10 [ТС]
	Ну запускать мне не надо он сам запустится мне надо лишь ждать. Дело в том что винда после загрузки запускает сначала мою прогу и и где-то поле службу... Т.е. задача проста -при включении компа автоматом подключить интернет. Через процессы конечно можно, но по видимому не лучший вариант. 0

@Avazart 8484 / 6151 / 615 Регистрация: 10.12.2010 Сообщений: 28,683 Записей в блоге: 30
	14.07.2012, 12:19 [ТС]
	Ну я ж нашел код, код рабочий, не знаю только название службы, тобиш сокращенное имя 0

@Avazart 8484 / 6151 / 615 Регистрация: 10.12.2010 Сообщений: 28,683 Записей в блоге: 30
	07.08.2012, 22:54 [ТС]
	Походу не эта служба... По крайней мере она остается не запущенной пока не вызовишь rasdial.exe ну либо вручную через гуи не подкключишь. Поэтому сформулирую проблему снова при запуске системы при попытке подключить ( вручную или через ярлык или bat с запуском rasdial.exe) вылазиет такое окошечко Миниатюры 0

@Avazart
	23.04.2015, 16:48 [ТС]
	Не по теме: Подарили роутер, и забыл о проблеме с этим VPN. 0