Microsoft Access Programmierrezepte

R10.19 HTML-Export mittels SQL

Aufgabe

Mit dem Aufruf einer Access-Abfrage wollen Sie Tabellendaten im HTML-Format exportieren.

Lösung

Grundprinzip ist die SQL-Anweisung SELECT INTO unter Angabe des HTML-Exportfilters. Zwei kleine Beispiele zeigen wie es geht.

Quelltext (DAO)

Beispiel

Export der Tabelle Umsatzdaten in die Datei umsatz.htm

Sub Export_Umsatzdaten_HTML_Abfrage_DAO()
Dim db As DAO.Database

  Set db = CurrentDb()
  db.Execute ("SELECT jahr, umsatz INTO [Umsatz.htm] IN 'c:\' 'HTML Export;' FROM Umsatzdaten")
End Sub

Quelltext (ADO)

Beispiel

Export der Tabelle Umsatzdaten in die Datei umsatz.htm

Sub Export_Umsatzdaten_HTML_Abfrage_ADO() CurrentProject.Connection.Execute ("SELECT jahr, umsatz INTO [Umsatz.htm] IN 'c:\' 'HTML Export;' FROM Umsatzdaten") ...