PowerPoint im Webbrowser mit VB.NET

In VB.NET ist es möglich eine PowerPoint darstellen zu lassen. Dafür sind auch nicht viele Dinge zu beachten. Am einfachsten ist es die PowerPoint im Webbrowser darstellen zu lassen. Sowas kann gebraucht werden, um beispielsweise ein Werbebildschirm zu schalten. Vielleicht von der neuen Speisekarte des Restaurants? 🙂 Wie funktioniert sowas? Was brauche ich für Voraussetzungen? Das erfahrt ihr bei uns!

PowerPoint im Webbrowser – Voraussetzungen

Um unser Vorhaben umsetzten zu können, brauchen wir einige Voraussetzungen. Naja, eigentlich brauchen wir nur zwei Dinge.

1. Microsoft Office (2010 oder höher) muss installiert und aktiviert sein (für PowerPoint)
2. Registry Einträge / Werte müssen geschrieben werden

Die Registry Einträge brauchen wir, damit die “.ppt” und “.pptx” Dateien nicht in selbst PowerPoint, sondern im Webbrowser (Internet Explorer) geöffnet werden. Diese Einträge sind mit großer Wahrscheinlichkeit nicht vorhanden. Also bitte anlegen 🙂

Current User:

[HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\Shell\AttachmentExecute\{0002DF01-0000-0000-C000-000000000046}]
"PowerPoint.Show"=hex:
"PowerPoint.Show.12"=hex:
"PowerPoint.Show.8"=hex:

Local Machine:

[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PowerPoint.Show.8]
"EditFlags"=hex:00,00,00,00
"BrowserFlags"=dword:800000a0

[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PowerPoint.Show.12]
"EditFlags"=hex:00,00,00,00
"BrowserFlags"=dword:800000a0

Zur Erklärung:

[one_half_first]PowerPoint.Show[/one_half_first][one_half_last]PowerPoint in Webbrowser darstellen[/one_half_last]

[one_half_first]PowerPoint.Show.8[/one_half_first][one_half_last].ppt – Dateien im Webbrowser öffnen[/one_half_last]

[one_half_first]PowerPoint.Show.12[/one_half_first][one_half_last].pptx – Dateien im Webbrowser öffnen[/one_half_last]

PowerPoint im Webbrowser – der Code in Visual Studio

Nun öffnen wir Visual Studio und erstellen ein neues Projekt. Die Windows Form öffnen wir und legen los:

Wir benötigen den Webbrowser in unserem Projekt:

In den Properties (Eigenschaften) legen wir folgende Werte fest:

[one_half_first]AllowWebBrowserDrop[/one_half_first][one_half_last]false[/one_half_last]

[one_half_first]ScriptErrorsSuppressed[/one_half_first][one_half_last]true[/one_half_last]

[one_half_first]ScrollBarsEnabled[/one_half_first][one_half_last]false[/one_half_last]

Um nun die Präsentation aufzurufen, brauchen wir nur folgendes Codeschnipsel:

WebBrowser1.Navigate(yourdirectory + "\slides\index.ppt")