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, 5527 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
VB for Applications
VB.net Combobox databinding langsam (3)

Frage von ForgottenRealm zum Thema VB for Applications ...

Visual Studio
gelöst Vb.net: Word-Doc seitenweise durchsuchen nach Textmarke (7)

Frage von ahstax zum Thema Visual Studio ...

Cluster
Hilfe bei Einrichtung des MailTo Dienstes des heartbeat (4)

Frage von akadawa zum Thema Cluster ...

Neue Wissensbeiträge
Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(8)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Windows 10

Das Windows 10 Creators Update ist auf dem Weg

(6)

Anleitung von BassFishFox zum Thema Windows 10 ...

Heiß diskutierte Inhalte