4
Brauche kleine Hilfestellung bei VBS Script
Hallo liebe Community,
bin FISI Azubi und wir müssen eine kleine Verwaltungssoftware schreiben, die unter anderem eine kleine Diensteverwaltung beherbergt.
Beim Script, welches mir ausgeben soll, welche Dienste gerade gestartet sind, bekomme ich als Ausgabe eine Liste, die allerdings ohne Scrollbar nicht einsehbar ist, da sie über den Bildschirmrand hinausragt, da die Liste einfach zu lang ist ...
Hier der Code:
Dim objWMIService, objService, colListOfServices, Computer
Computer = "."
Set objWMIService = GetObject("winmgmts:" &_
"{impersonationLevel=impersonate}!\\" & Computer &_
"\root\cimv2")
Set colListOfServices = objWMIService.ExecQuery _
("SELECT * FROM Win32_Service WHERE State=""Running""")
For Each objService in colListOfServices
Ausgabe = Ausgabe & vbcrlf & objService.Status & vbTab & objService.DisplayName
Next
WScript.Echo Ausgabe
Gibt eine Möglichkeit die Ausgabe schöner zu gestalten?
Danke, Leon
bin FISI Azubi und wir müssen eine kleine Verwaltungssoftware schreiben, die unter anderem eine kleine Diensteverwaltung beherbergt.
Beim Script, welches mir ausgeben soll, welche Dienste gerade gestartet sind, bekomme ich als Ausgabe eine Liste, die allerdings ohne Scrollbar nicht einsehbar ist, da sie über den Bildschirmrand hinausragt, da die Liste einfach zu lang ist ...
Hier der Code:
Dim objWMIService, objService, colListOfServices, Computer
Computer = "."
Set objWMIService = GetObject("winmgmts:" &_
"{impersonationLevel=impersonate}!\\" & Computer &_
"\root\cimv2")
Set colListOfServices = objWMIService.ExecQuery _
("SELECT * FROM Win32_Service WHERE State=""Running""")
For Each objService in colListOfServices
Ausgabe = Ausgabe & vbcrlf & objService.Status & vbTab & objService.DisplayName
Next
WScript.Echo Ausgabe
Gibt eine Möglichkeit die Ausgabe schöner zu gestalten?
Danke, Leon
Auf Facebook teilen
Auf X (Twitter) teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 220429
Url: https://administrator.de/forum/brauche-kleine-hilfestellung-bei-vbs-script-220429.html
Ausgedruckt am: 15.04.2025 um 10:04 Uhr
4 Kommentare
Neuester Kommentar
Hallo Bimmer1993 und willkommen im Forum!
Wozu soll diese Liste denn dienen?
"Schöner" wird's so zwar nicht, aber um alle Ausgaben lesen zu können, brauchst Du eigentlich nur Dein Script über "
... ansonsten wäre Dein Stichwort "HTA".
Grüße
bastla
Wozu soll diese Liste denn dienen?
"Schöner" wird's so zwar nicht, aber um alle Ausgaben lesen zu können, brauchst Du eigentlich nur Dein Script über "
cscript" zu starten. Du könntest die Ausgabe auch in eine Text- bzw CSV-Datei schreiben und mit dem Editor / mit Excel öffnen ...... ansonsten wäre Dein Stichwort "HTA".
Grüße
bastla
Ich "missbrauche" für sowas immer den IE indem ich den ohne Leisten über das Script öffne und dann die entsprechenden Infos ausgebe. HTA wie von Bastla schon erwähnt ist natürlich auch eine Idee und mehr oder weniger notwendig wenn anhand der Ausgaben wieder Eingaben vorgenommen werden sollen.
Ja, danke euch, der andere Thread ist von einem Mitschüler sehe ich gerade :D
Gibt schon zu denken wenn Schüler ihre Aufgaben und Fragen stellen, sollte dies nicht eine Aufgabe von Lehrkräften sein...
Gibt schon zu denken wenn Schüler ihre Aufgaben und Fragen stellen, sollte dies nicht eine Aufgabe von Lehrkräften sein...
