{"id":1605,"date":"2017-07-15T14:17:29","date_gmt":"2017-07-15T12:17:29","guid":{"rendered":"http:\/\/blog.langlitz-it.de\/?p=1605"},"modified":"2017-08-10T12:51:53","modified_gmt":"2017-08-10T10:51:53","slug":"powershell-steuerung-von-applikationen-uber-comobjekte","status":"publish","type":"post","link":"https:\/\/www.langlitz-it.de\/?p=1605","title":{"rendered":"PowerShell \u2013 Steuerung von Applikationen \u00fcber ComObjekte"},"content":{"rendered":"

Sie k\u00f6nnen Applikationen, dies das entsprechend unterst\u00fctzen, mit der PowerShell<\/em> \u00fcber ComObjekte<\/em> steuern. Ich stelle dies hier an Beispielen f\u00fcr Excel<\/em> und Outlook<\/em> dar. Diese Vorgehensweise l\u00e4sst sich aber auch f\u00fcr andere Applikation \u00e4hnlich nutzen.<\/p>\n

\n

Excel<\/h2>\n

Ich erstelle eine neue Excel Datei mit einer Liste von St\u00e4dten, deren Bundesland sowie deren Einwohnerzahl.<\/p>\n

Zun\u00e4chst muss ein ComObjekt<\/em> f\u00fcr Excel<\/em> erstellt werden. Voraussetzung ist nat\u00fcrlich, dass Excel<\/em> auch auf der Maschine, auf der ich arbeite, installiert ist.<\/p>\n

$Excel = New-Object -ComObject Excel.Application<\/em><\/p>\n

Die Methoden und Eigenschaften dieses Objektes k\u00f6nnen Sie sich \u00fcber die Get-Member<\/em> Funktion ansehen.<\/p>\n

$Excel |gm<\/em><\/p>\n

\u00dcber das Property<\/em> Visible<\/em> k\u00f6nnen Sie z.B. Excel<\/em> sichtbar machen, bzw. verstecken.<\/p>\n

$Excel.Visible = $True<\/em><\/p>\n

$Excel.Visible = $False<\/em><\/p>\n

Neue Arbeitsmappe<\/h3>\n

Als n\u00e4chstes wird eine neue Arbeitsmappe mit einer Tabelle erstellt.<\/p>\n

$Workbook = $Excel.Workbooks.Add()<\/em><\/p>\n

Zur leichteren Adressierung, lese ich die Tabelle in eine Variable ein.<\/p>\n

$Worksheet =$Workbook.Worksheets.Item(1)<\/em><\/p>\n

Wieder \u00fcber die Get-Member<\/em> Funktion k\u00f6nnen Sie auch hier alle Methoden und Eigenschaften einer Tabelle sehen.<\/p>\n

$Worksheet |gm<\/em><\/p>\n

Nun wird die Tabelle mit Daten gef\u00fcllt. Sie k\u00f6nnen dazu jede einzelne Zelle direkt adressieren und beschreiben.<\/p>\n

$worksheet.Cells.Item(1,1).value2=”Stadt”<\/em>
\n$worksheet.Cells.Item(1,2).value2=”Bundesland”<\/em>
\n$worksheet.Cells.Item(1,3).value2=”Einwohnerzahl”<\/em>
\n$worksheet.Cells.Item(2,1).value2=”Frankfurt”<\/em>
\n$worksheet.Cells.Item(2,2).value2=”Hessen”<\/em>
\n$worksheet.Cells.Item(2,3).value2=”700000″<\/em>
\n$worksheet.Cells.Item(3,1).value2=”Dresden”<\/em>
\n$worksheet.Cells.Item(3,2).value2=”Sachsen”<\/em>
\n$worksheet.Cells.Item(3,3).value2=”550000″<\/em>
\n$worksheet.Cells.Item(4,1).value2=”Hannover”<\/em>
\n$worksheet.Cells.Item(4,2).value2=”Niedersachsen”<\/em>
\n$worksheet.Cells.Item(4,3).value2=”520000″<\/em><\/p>\n

Wenn die Eingabe beendet ist, nat\u00fcrlich noch abspeichern.<\/p>\n

$FilePath = \u201eD:\\Town.xlsx\u201c<\/em><\/p>\n

$workbook.SaveAs($filepath)<\/em><\/p>\n

So sieht die Datei nun aus, wenn wir sie mit Excel \u00f6ffnen.<\/p>\n

\"excelol1\"<\/a><\/p>\n

Ein farbliches Hinterlegen der Zellen (sowie auch alle anderen Formatierungsoptionen) ist nat\u00fcrlich auch m\u00f6glich.<\/p>\n

$worksheet.Range(“A1:C1”).Interior.colorindex = 6<\/em><\/p>\n

Und wieder speichern.<\/p>\n

$workbook.Save()<\/em><\/p>\n

Nun mit gelber Kopfzeile<\/p>\n

\"excelol2\"<\/a><\/p>\n

So l\u00e4sst sich nat\u00fcrlich auch alles andere in der Tabelle \u00e4ndern. Im Prinzip ist damit die komplette Steuerung ohne GUI m\u00f6glich.<\/p>\n

\n

Outlook<\/h2>\n

Bei Outlook ist das alles ebenso m\u00f6glich. Es gibt aber einige wenige Besonderheiten. Sie m\u00fcssen ein Standardprofil<\/em> ausw\u00e4hlen und k\u00f6nnen dann \u00fcber MAPI<\/em> auch nur auf die eingerichtete Mailbox<\/em> zugreifen. Wenn Sie weitere Mailboxen<\/em> oder PST<\/em> Dateien in dem Profil<\/em> eingebunden haben, k\u00f6nnen Sie auf diese auch zugreifen.<\/p>\n

Auch hier muss zun\u00e4chst das entsprechende ComObject<\/em> erstellt werden.<\/p>\n

$Outlook = New-Object -ComObject Outlook.Application<\/em><\/p>\n

Den Namespace<\/em> des Outlook Profils<\/em> legen wir zur weiteren Verwendung separat ab<\/p>\n

$Namespace = $Outlook.GetNamespace(“MAPI”)<\/em><\/p>\n

In der definierten Session<\/em> suche ich nun den gew\u00fcnschten Ordner oder die gew\u00fcnschte Mailbox<\/em>.<\/p>\n

$Mailbox = $Namespace.Session.Folders |? {$_.name -match “info@langlitz-it.de”}<\/em><\/p>\n

Nun suche ich mir z.B. die letzte gesendete Mail aus dem Ordner \u201eSent Items<\/em>\u201c<\/p>\n

$Mailbox.Folders |? {$_.name -match “sent items”} |% {$_.items} |select ReceivedTime,Subject,Body -Last 1 |fl<\/em><\/p>\n

ReceivedTime : 05.10.2016 12:24:00
\nSubject \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 : Das ist eine Testmail
\nBody \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 : Hallo,
\nHier steht der Text.
\nGru\u00df<\/p>\n

Neue Mail<\/h3>\n

Um eine neue Mail zu erstellen, verwenden wir wieder das ComObject<\/em>.<\/p>\n

$Outlook = New-Object -ComObject Outlook.Application<\/em><\/p>\n

Und nun das neue Mail Object<\/em>.<\/p>\n

$Mail = $Outlook.CreateItem(0)<\/em><\/p>\n

Das Object $Mail<\/em> m\u00fcssen wir noch mit Leben f\u00fcllen.<\/p>\n

$Mail.Recipients.Add(“Blog@Langlitz-IT.de”) <\/em>
\n$Mail.Subject = “Das ist eine Testmail”<\/em>
\n$Mail.HTMLBody = “&lt;&gt;Mail als HMTL&lt;&gt;”<\/em><\/p>\n

Nun k\u00f6nnen Sie sich die Mail nochmal anzeigen lassen.<\/p>\n

$Mail.Display()<\/em><\/p>\n

\"excelol4\"<\/a><\/p>\n

Alles OK? Dann wird die Mail versendet.<\/p>\n

$Mail.Send()<\/em><\/p>\n

\u00dcber die angebotenen Methoden k\u00f6nnen Sie Ihr Outlook steuern. Sie k\u00f6nnen Termine, Erinnerungen, Kontakte, etc. bis hin zu Regeln und Abwesenheitsnachrichten dar\u00fcber konfigurieren.<\/p>\n

ComObject<\/h2>\n

Eine komplette Liste aller registrierten ComObjects k\u00f6nnen Sie \u00fcber die Registry auslesen.<\/p>\n

$ComObj = Get-ChildItem registry::HKEY_CLASSES_ROOT\\ -Include PROGID -Recurse |% {$_.GetValue(“”)}<\/em><\/p>\n

$ComObj | ? {$_ -match “outlook”}<\/em><\/p>\n

Oder<\/p>\n

$ComObj | ? {$_ -match “Application_Name”}<\/em><\/p>\n","protected":false},"excerpt":{"rendered":"

Sie k\u00f6nnen Applikationen, dies das entsprechend unterst\u00fctzen, mit der PowerShell \u00fcber ComObjekte steuern. Ich stelle dies hier an Beispielen f\u00fcr Excel und Outlook dar. Diese Vorgehensweise l\u00e4sst sich aber auch f\u00fcr andere Applikation \u00e4hnlich nutzen. Excel Ich erstelle eine neue … Continue reading →<\/span><\/a><\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[1],"tags":[642,641,643,18,644,553,647,645,646],"_links":{"self":[{"href":"https:\/\/www.langlitz-it.de\/index.php?rest_route=\/wp\/v2\/posts\/1605"}],"collection":[{"href":"https:\/\/www.langlitz-it.de\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.langlitz-it.de\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.langlitz-it.de\/index.php?rest_route=\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/www.langlitz-it.de\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=1605"}],"version-history":[{"count":14,"href":"https:\/\/www.langlitz-it.de\/index.php?rest_route=\/wp\/v2\/posts\/1605\/revisions"}],"predecessor-version":[{"id":2006,"href":"https:\/\/www.langlitz-it.de\/index.php?rest_route=\/wp\/v2\/posts\/1605\/revisions\/2006"}],"wp:attachment":[{"href":"https:\/\/www.langlitz-it.de\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=1605"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.langlitz-it.de\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=1605"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.langlitz-it.de\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=1605"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}