Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Starttyp eines Dienstes per VB verändern

Frage Entwicklung

Mitglied: FISI84

FISI84 (Level 1) - Jetzt verbinden

10.09.2008, aktualisiert 12.09.2008, 5540 Aufrufe, 2 Kommentare

Konfiguration von Systemdiensten mittels Skripten zur einfachen Einrichtung von PCs

Hallo,

ich suche den Grundaufbau eines VB-Skripts (oder andere Skriptsprache) um den Starttyp eines Systemdienstes (z.B. der Nachrichtendienst) zu verändern (sowohl von Deaktiviert auf Automatisch, als auch in jede andere Richtung).
Die Suche in Google hat nicht wirklich auf Anhieb verständliches geliefert.

Der Grundlegende Aufbau für den Start/Stop/Neustart des entsprechenden Dienstes fehlt mir auch noch.

Danke und Gruß
Steffen
Mitglied: bastla
10.09.2008 um 12:42 Uhr
Hallo FISI84!

Das könnte (ungetestet) so gehen:
01.
strService = "Messenger" 
02.
strComputer = "." 
03.
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")  
04.
Set colItems = objWMIService.ExecQuery( _ 
05.
    "SELECT * FROM Win32_Service Where Name = '" & strService & "'")  
06.
For Each objItem in colItems  
07.
    objItem.StartMode = "Manual" 
08.
Next
Den aktuellen Zustand überprüfen kannst Du durch Auslesen der Eigenschaft ".Started".

Zum Starten/Stoppen:
01.
strService = "Messenger" 
02.
strComputer = "."  
03.
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")  
04.
Set objOutParams = objWMIService.ExecMethod("Win32_Service.Name='" & strService & "'", "StartService") 
05.
If objOutParams.ReturnValue = 0 Then WScript.Echo strService & " wird gestartet."
Analog dazu die Methode "StopService".

Grüße
bastla
Bitte warten ..
Mitglied: FISI84
12.09.2008 um 08:48 Uhr
Danke!
_________________________________________________
Gruß
Fisi84
Bitte warten ..
Ähnliche Inhalte
Visual Studio
gelöst VB: Batchprogramm: Resultat zurückgeben an VB Form (Textfeld) (7)

Frage von PixL86 zum Thema Visual Studio ...

VB for Applications
gelöst VB-Script per Aufgabenplanung (2)

Frage von S4kar97 zum Thema VB for Applications ...

VB for Applications
gelöst VB Skript für mehrere Batch Befehle (37)

Frage von freshman2017 zum Thema VB for Applications ...

Neue Wissensbeiträge
Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Viren und Trojaner

CNC-Fräsen von MECANUMERIC werden (ggf.) mit Viren, Trojanern, Würmern ausgeliefert

(4)

Erfahrungsbericht von anteNope zum Thema Viren und Trojaner ...

Windows 10

Windows 10: Erste Anmeldung Animation deaktivieren

(3)

Anleitung von alemanne21 zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Router & Routing
gelöst Linksys wrt1200ac v2 mit dd-wrt: keine vlan-einstellungen im GUI (15)

Frage von Pixi123 zum Thema Router & Routing ...

E-Business
Wo tragt ihr eure privaten Termine ein? (13)

Frage von honeybee zum Thema E-Business ...

Windows Server
Terminalserver starten willkürlich neu (12)

Frage von thaefliger zum Thema Windows Server ...