[MMC Automation] Bestimmtes Snap-in automatisiert laden und öffnen

[Dalai]

Hallo :),

ich hab eine Frage zu einem etwas anders gelagerten Fall - abseits von Delphi - und hoffe, ihr könnt mir mit eurem Wissen auch diesmal behilflich sein.

Es geht um MMC Automation. Ich möchte ein bestimmtes Snap-in (konkret services.msc) laden und öffnen. Im verlinkten MSDN sind einige Funktionen aufgeführt, darunter auch Beispiele in einigen Sprachen (VB, VBS, C# usw). Also hab ich mir ein Beispiel genommen und an meine Bedürfnisse angepasst, um dann ziemlich schnell festzustellen, dass ich nicht weiterkomme. Ich hänge am Dialog zum Festlegen des Rechners, der mit dem Snap-in bearbeitet werden soll:
http://abload.de/image.php?img=servi...ninit04uez.png
(Bild auch nochmal im Anhang)

Inzwischen habe ich im MSDN gefunden, dass dieser Dialog eine spezielle PropertySheet ist, die auch Initialization Wizard genannt wird:

Zitat:

How-To Create an Initialization Wizard is a snap-in that creates a wizard page that pops up when the snap-in gets added to the MMC console. It brings up a dialog box that allows the user to enter a name which is then used in setting the display name for the root node.

Bei diesem Code bekomme ich die Meldung "pre" vor dem Initialization Wizard und erst nach Abschluss desselben die Meldung "post".

Code:

Option Explicit

Dim objMMC
Dim objsvc

' Create the MMC Application object.
Set objMMC = Wscript.CreateObject("MMC20.Application")

MsgBox("pre")

' Add the "Services" snap-in to the console.
set objsvc = objMMC.Document.SnapIns.Add("{58221C66-EA27-11CF-ADCF-00AA00A80033}")

MsgBox("post")

' Show the MMC application.
objMMC.Show

' Leave the MMC application in user control when this script ends.
objMMC.UserControl = 1

Hat jemand eine Ahnung, wie ich den Initialization Wizard umgehen oder besser gesagt automatisieren kann, d.h. die Daten für selbigen vorher festlegen kann, so dass der Dialog gar nicht erscheint? Ich möchte den gesamten Prozess automatisieren, und zwar für beliebige Rechner(namen).

MfG Dalai

PS: Ist das Absicht, dass kein IMG Tag mehr funktioniert, um externe Bilder einzubinden?

[Dalai]

Hat noch keiner mit der MMC in dieser Richtung zu tun gehabt? Mit welcher Sprache das letztlich gelöst wird, ist mir eigentlich egal (auch wenn ich abseits von Delphi und AutoIt ggf. etwas Nachhilfe brauche).

MfG Dalai

[hathor]

MMC.exe ist einfach: Es braucht ein XML-File zur Steuerung.
Die Endung der XML-Files ist üblicherweise MSC,
kann aber auch bei XML belassen werden.
/a öffnet im Autorenmodus, ermöglicht Änderungen, z.B. Maximized
.
Geänderte MSC-Files sollte man nicht im System32-Ordner speichern.
Im Beispiel müssen die MSC-Files im Programmordner sein, wenn kein Pfad angegeben wird.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);  // diskmgmt.msc
var FN: String;
begin
FN:= ExtractFilePath(Application.ExeName)+'diskmgmt.msc';  // XML-File !
ShellExecute(0,nil,PChar('mmc.exe'),PChar(' /a '+FN),'',SW_SHOWMAXIMIZED);
end;

procedure TForm1.Button1Click(Sender: TObject);  // services.msc
var FN: String;
begin
FN:= ExtractFilePath(Application.ExeName)+'services.msc';  // XML-File !
ShellExecute(0,nil,PChar('mmc.exe'),PChar(' /a '+FN),'',SW_SHOWMAXIMIZED);
end;

[Dalai]

Das ist mir klar. Es geht hier aber um komplett dynamisch geladene Daten. Letztlich möchte ich das Services-Snap-in mit einem bestimmten Rechner laden. Ich nahm an, dass hierfür die MMC Automation geeignet ist, aber momentan sehe ich nicht, wie mir selbige weiterhelfen soll, wenn ich schon beim Init Wizard steckenbleibe.

Fun fact: Schon die Beschreibung Add-Methode ist lustig, denn hier kann man entweder den Namen (natürlich sprachabhängig, sowas is klasse für "Automation" :roll:) oder eine CLSID angeben, aber gibt MS irgendwo eine Liste der CLSIDs für die mit Windows ausgelieferten Snap-ins? Nö, warum auch... :roll:.

Hast du mal geschaut, wo die MMC im MSC den Rechner hinterlegt? Im sprachabhängigen Beschreibungstext, der auch für die Anzeige verwendet wird. Fazit: hilft mir nicht weiter. Dazu kommt noch, dass ich nicht wegen dieser Kleinigkeit einen XML-Parser/-Writer in meine Software einbauen will, noch dazu da MS das Format der MSCs jederzeit ändern kann.

MfG Dalai

[Dalai]

Gestern bin ich durch Zufall in einem anderen Zusammenhang auf einen undokumentierten Parameter gestoßen, der für die meisten Snap-ins funktioniert: /computer. Es ist also möglich, dass ich das Gewünschte so erreiche:

Code:

%SystemRoot%\system32\mmc.exe %SystemRoot%\system32\services.msc /computer=<rechnername>

Das funktioniert zwar auf Win2k nicht, aber damit kann ich leben.

Fazit: Es ist immer wieder toll, zu sehen, dass es zwar Automatisierungsmöglichkeiten gibt, diese aber völlig überflüssigerweise torpediert werden durch irgendwelche Einschränkungen. Und wer braucht schon Dokumentation? Ist doch alles selbsterklärend und auch vollkommen logisch... Kopf -> Tisch :roll:.

Etwas OT, aber da es zum Thema des vorigen Absatzes passt: Hat schonmal jemand versucht, die Windows Firewall via netsh einzustellen, und zwar so, dass die Regelgruppen unabhängig von der Sprache des OS angegeben werden können? Ich hab bislang keinen Weg gefunden, nur sprachabhängige Namen sind möglich. Also auch hier eine sinnfreie Einschränkung, die Automatisierung derart behindert, dass man sie vergessen kann.

MfG Dalai