AutoIt-SQLite to HTML

PSblnkd

Da das unter "Projekte" wohl niemand gelesen hat - hier nochmal als Anfrage:

Zu meiner ansonsten problemlos funktionierenden Mediathek gibt es Zusatzwünsche.

So soll jetzt auf der HP des https://www.industriesalon.de/mediathek/ eine Übersichtstabelle der in der Mediathek vorhandenen Medien eingefügt werden. Die Tabelle an sich ist ja verfügbar - wird sie doch durch Aufruf des Mediathek-Programms (Mediathek.exe) auf dem großen Bildschirm angezeigt. Die Daten dazu sind in einer dbf-Datei abgelegt.

Nun war ich der Ansicht, daß man mit einem File-Converter DBF -> HTML diese einfach in eine HTML-Tabelle umwandeln kann. Leider kommt da nur Müll raus, oder der DBF2HTML-Converter verweigert ganz die Arbeit.

Kennt jemand die Ursache oder einen Ausweg?

Bei den Beschreibungen zur SQL-Light-Funktionalität habe ich auch nichts über das dbf-Datenbank-File gefunden, vielleicht auch was überlesen ...

Grüsse aus Berlin

PSblnkd

**Oscar**

Zitat von PSblnkd

Kennt jemand die Ursache oder einen Ausweg?

Wie soll da jemand helfen können?

Wo ist Dein Script?

Wo ist eine (Beispiel-) Datenbankdatei?

Welchen File-Converter meinst Du (Link)?

Was erwartest Du als Ergebnis?

Velted

Moin,

wenn Deine .dbf Datei eine SQLite Datenbank ist, schau Dir das mal an: Command Line Shell For SQLite

**AspirinJunkie**

dbf ist eine DBase-Datenbank (hornsalte Datenbank aus den 80ern...).

Es gibt Konverter um solche in sqlite zu konvertieren.

Ab da kommt man auch besser weiter.

Warum man eine Datenbank ausgerechnet in html konvertieren muss ist mir hingegen nicht klar. Daher gilt erstmal alles was Oscar sagte.

PSblnkd

Oscar

Es geht hier nicht um Probleme mit dem Skript - das tut seit Jahren problemlos das, was es soll. Sondern wollte ich wissen, ob schon mal jemand erfolgreich einen DBF to HTML-Converter eingesetzt hat im Zusammenhang mit der hier verwendeten sqlite-udf.
Ich habe verschiedene ausprobiert - online und auch Download-Versionen. Die meisten verweigern schlicht die Arbeit mit dem Hinweis: "Keine Datenbank-Datei". Auch speziell für SQL-Light gedachte Converter, z.B. https://tableconvert.com/sql-to-html versagen den Dienst, wobei mir die widersprüchlichen Extensions .dbf (hier) und .sql (dort) unklar sind.

Velted

Danke für den eigentlich hilfreichen Tip - ich wollte aber keinen Converter programmieren, sondern nur einen benutzen.

AspirinJunkie

Wenn das dbf-Ausgabeformat wirklich eine DBase-Datenbank ist, dann müßte das ja auch von einem DBF_to_xxx-Converter eingelesen werden können - tut es aber nicht. Man kann ja jeder x-beliebigen Datei das .dbf-Extension anhängen ...
Warum ich die Datenbank konvertieren wollte, habe ich im TO geschrieben:

"So soll jetzt auf der HP des https://www.industriesalon.de/mediathek/ eine Übersichtstabelle der in der Mediathek vorhandenen Medien eingefügt werden. Die Tabelle an sich ist ja verfügbar ..."

In der Zeit, die ich vergeblich im Internet rumgestochert und Verschiedenstes ausprobiert habe, hätte ich auch "händisch" den Inhalt der dbf-Datei in eine HTML einfügen können. Leider gibt es in der AutoIt-Hilfe keinerlei allgemeine Infos zu dem hier verwendeten SQL-Light. Wenn ich das richtig verstehe, basiert die gesamte SQL-Light-Funktionalität auf der integrierten SQLight.dll, zu deren Wirkungsweise (mir) nichts bekannt ist - z.B. wie ist wirklich das dbf-Ausgabeformat ...

Grüsse aus Berlin

PSblnkd

**AspirinJunkie**

Zitat von PSblnkd

In der Zeit, die ich vergeblich im Internet rumgestochert [...]

In der Zeit in der WIR vergeblich in dem Nebel deiner Informationen rumgestochert haben, hätten wir dir schon 20x einen entsprechenden Konverter geschrieben.

Machen wir es kurz: Wir können nicht wissen, welches Format die Datei hat, wenn du sie uns nicht zeigst. Ich zitiere dich daher mal:

Zitat von PSblnkd

Man kann ja jeder x-beliebigen Datei das .dbf-Extension anhängen ...

Und genau deswegen können wir dir schlicht nicht weiterhelfen ohne den Inhalt der Datei.

Zitat von PSblnkd

Leider gibt es in der AutoIt-Hilfe keinerlei allgemeine Infos zu dem hier verwendeten SQL-Light. Wenn ich das richtig verstehe, basiert die gesamte SQL-Light-Funktionalität auf der integrierten SQLight.dll, zu deren Wirkungsweise (mir) nichts bekannt ist - z.B. wie ist wirklich das dbf-Ausgabeformat ...

Die in AutoIt integrierte SQLite-UDF (nicht SQL-Light) ist für die Interaktion von AutoIt-Skripten mit SQLite-Datenbanken gedacht.
Wer das verwendet, sollte also wissen was SQLite macht und wie man es anwendet. Hierzu dient die umfangreiche Doku von sqlite.
Die Schnittstellenfunktionen die AutoIt hierfür mitliefert, sind alle korrekt und ausführlich in der AutoIt-Hilfe beschrieben.

SQLite ist ein bestimmtes Datenbankmanagementsystem mit einem eigenen Format zur Speicherung.
DBF hingegen ist das Dateiformat (wir können ja nur vermuten) des Datenbankmanagementsystems DBase.

Beide haben erst einmal nichts miteinander zu tun.
Es gibt lediglich externe Tools um Daten von einem DBMS in das jeweils andere zu konvertieren.
Für dbase gibt es keine in AutoIt mitgelieferte UDF, für SQLite hingegen schon.

Es gilt weiterhin alles das was Oscar dich fragte.

BananaJoe

Du kannst eine .dbf-Datei mit Excel öffnen (rechte Maustaste auf Datei -> Öffnen mit...)

Dann kannst Du sehen, ob die Daten tabellarisch vorliegen (dann ist es eine Datenbankdatei) oder ob Du Datenmüll bekommst bzw. Excel die Arbeit verweigert.

**BugFix**

Zitat von PSblnkd

Wenn das dbf-Ausgabeformat wirklich eine DBase-Datenbank ist,

Ich habe mal aus meinem Uralt-Programm die erforderlichen Parts zum dBase-Datei lesen zusammengefasst. Kannst ja mal damit testen. Die DBF wird hier in ein Array eingelesen.

AutoIt

;-- TIME_STAMP   2023-09-25 12:49:21

#include <Array.au3>
#include <GUIConstantsEx.au3>
#include <WinAPIHObj.au3>
#include <WinAPIInternals.au3>

;===================================================================================================
$DBF = "C:\PATH\ZU_DEINER.DBF"
;===================================================================================================

Global Const $tagField = "char name[11];" & _          ;  0-10   |  11 bytes         | field name
        "char type;" & _                            ;  11     |  1 byte           | field type in ASCII
        "uint memadress;" & _                        ;  12-15  |  32 bit number    | field data address
        "byte len;" & _                                ;  16     |  1 byte           | field length
        "byte deccount;" & _                        ;  17     |  1 byte           | field decimal count
        "byte reserved[14];"                         ;  18-31  |  14 bytes         | reserved bytes
Global Const $tagFileHeader = "byte ver;" & _       ;  0      |  1 byte           | dBASE III version number
        "byte date[3];" & _                            ;  1-3    |  3 bytes          | date of last update
        "uint reccount;" & _                        ;  4-7    |  32 bit number    | number of records in data file
        "ushort headerlength;" & _                    ;  8-9    |  16 bit number    | length of header structure
        "ushort reclength;" & _                        ;  10-11  |  16 bit number    | length of the record
        "byte reserved[20];"                         ;  12-31  |  20 bytes         | reserved bytes
;~                             $tagField & _           ;  32-n   |  32 bytes each    | field descriptor array
;~                             "byte terminate;"       ;  n+1    |  1 byte           | 0DH as the field terminator
Global $Header = DllStructCreate($tagFileHeader)
Global $DatabaseArray[1][2]
Global $databaseFieldInfos[1][5]

_ReadDBF($DBF)

_ArrayDisplay($databaseFieldInfos)
_ArrayDisplay($DatabaseArray)


Func _ReadDBF($inPathDBF)
    Local $DBFFile = _WinAPI_CreateFile($inPathDBF, 2, 2, 2)
    Local $ReadChars
    If _WinAPI_ReadFile($DBFFile, DllStructGetPtr($Header), DllStructGetSize($Header), $ReadChars) Then
        If DllStructGetData($Header, "ver") <> 3 Then ; Version muss
            MsgBox(16, 'Error', "No supportet dbase format (only dbase 3 without .DBT-files)")
            _WinAPI_CloseHandle($DBFFile)
            Exit
        EndIf
        ; $tagField erstellen
        Local $FieldDescriptor = DllStructCreate($tagField)
        ; Infos aus Header auslesen
        Local $HeaderLength = DllStructGetData($Header, "headerlength")
        Local $FieldsCount = Floor(($HeaderLength - DllStructGetSize($Header) - 1) / DllStructGetSize($FieldDescriptor))
        Local $RecordLength = DllStructGetData($Header, "reclength")
        Local $RecordsCount = DllStructGetData($Header, "reccount")
        ; Zahl der Felder: (Headergröße- Dateiheadergröße- terminator-byte) / Feldbeschreibungs-größe
        If $FieldsCount = 0 Then
            MsgBox(16, '', "No fields")
        Else
;~             Global $DatabaseArray[$RecordsCount + 1][$FieldsCount]
;~             Global $databaseFieldInfos[$FieldsCount][5]
            ReDim $DatabaseArray[$RecordsCount + 1][$FieldsCount]
            ReDim $databaseFieldInfos[$FieldsCount][5]
            For $i = 1 To $FieldsCount
                _WinAPI_ReadFile($DBFFile, DllStructGetPtr($FieldDescriptor), DllStructGetSize($FieldDescriptor), $ReadChars)
                $DatabaseArray[0][$i - 1] = DllStructGetData($FieldDescriptor, "name")
                For $s = 0 To 4
                    $databaseFieldInfos[$i - 1][$s] = DllStructGetData($FieldDescriptor, $s + 1)
                Next
            Next
            Local $CHECKREAD = DllStructCreate("byte terminate")
            _WinAPI_ReadFile($DBFFile, DllStructGetPtr($CHECKREAD), 1, $ReadChars)
            If DllStructGetData($CHECKREAD, 1) == 0x0D Then
                Local $RecordStruct = _CreateRecordStruct($databaseFieldInfos)
                For $i = 1 To $RecordsCount
                    _WinAPI_ReadFile($DBFFile, DllStructGetPtr($RecordStruct), DllStructGetSize($RecordStruct), $ReadChars)
                    If $ReadChars = 0 Then
                        ; keine Felder mehr (Fehler)
                        ReDim $DatabaseArray[$i][$FieldsCount]
                        ExitLoop
                    EndIf
                    For $j = 1 To $FieldsCount
                        $DatabaseArray[$i][$j - 1] = DllStructGetData($RecordStruct, "field" & $j)
                        #Region Datentypen konvertieren
                        Switch $databaseFieldInfos[$j - 1][1]
                            Case "C" ; characters: nothing
                                $DatabaseArray[$i][$j - 1] = OemToChar($DatabaseArray[$i][$j - 1])
                            Case "N" ; numeric
                                If StringInStr($DatabaseArray[$i][$j - 1], '.') Then
                                    $DatabaseArray[$i][$j - 1] = StringTrimRight(StringStripWS(StringReplace($DatabaseArray[$i][$j - 1], '.', ','), 1), 2)
                                Else
                                    $DatabaseArray[$i][$j - 1] = Number($DatabaseArray[$i][$j - 1])
                                EndIf
                            Case "L"
                                Switch $DatabaseArray[$i][$j - 1]
                                    Case "?"
                                        $DatabaseArray[$i][$j - 1] = "N/A"
                                    Case 'Y', 'y', 'T', 't'
                                        $DatabaseArray[$i][$j - 1] = True
                                    Case 'N', 'n', 'F', 'f'
                                        $DatabaseArray[$i][$j - 1] = False
                                EndSwitch
                            Case "D"
                                $DatabaseArray[$i][$j - 1] = StringRegExpReplace($DatabaseArray[$i][$j - 1], "\A(\d{4})(\d\d)(\d\d)\Z", "$1/$2/$3")
                            Case "M" ; not supportet
                        EndSwitch
                        #EndRegion Datentypen konvertieren
                    Next
                    Sleep(10)
                Next
            Else
                MsgBox(0, 'Error', "Wrong fielddescript_or_table")
            EndIf
        EndIf
        _WinAPI_CloseHandle($DBFFile)
    EndIf
    ; Spalten infos hizufügen zu Feld-Info array
    ReDim $databaseFieldInfos[UBound($databaseFieldInfos)+1][5]
    $databaseFieldInfos[UBound($databaseFieldInfos)-1][0] = "[[ NAME ]]"
    $databaseFieldInfos[UBound($databaseFieldInfos)-1][1] = "[[ TYP ]]"
    $databaseFieldInfos[UBound($databaseFieldInfos)-1][2] = "[[ ADRESSE ??? ]]"
    $databaseFieldInfos[UBound($databaseFieldInfos)-1][3] = "[[ Byte-Länge ]]"
    $databaseFieldInfos[UBound($databaseFieldInfos)-1][4] = "[[ Dezimalstellen ]]"
EndFunc

Func _CreateRecordStruct(ByRef $databaseFieldInfos)
    Local $sText = "char deleted;"
    For $i = 1 To UBound($databaseFieldInfos)
        $sText &= "char field" & $i & "[" & $databaseFieldInfos[$i - 1][3] & "];"
    Next
    Return DllStructCreate($sText)
EndFunc   ;==>_CreateRecordStruct

;===============================================================================
; Name:             OemToChar
; Description:      Wandelt einen ASCII- in einen ANSI-String
; Parameter(s):     $szSrc = String der umgewandelt werden soll
; Requirement(s):   keine
; Return Value(s):  bei Erfolg: umgewandelter String
;                   bei Fehler: "" und @error = 1
; Author(s):        bernd670
;===============================================================================
Func OemToChar($szSrc)
    Local $placeholder
    For $i = 0 To StringLen($szSrc)
        $placeholder &= "  "
    Next
    Local $lRetVal = DllCall("user32.dll", "long", "OemToChar", "str", $szSrc, "str",$placeholder)
    If IsArray($lRetVal) And $lRetVal[0] = 1 Then
        Return SetError(0,0,$lRetVal[2])
    EndIf
    Return SetError(1,0,"")
EndFunc   ;==>OemToChar

Alles anzeigen

Peter S. Taler · *Ab 19-10-22 ergänzt um:*

Als eines ist klar dbf Datenbanken <> Sql Datenbanken.

Aber vielleicht beschreibst Du was Du machen möchtest mal verständlich.

Eine DBF Datenbank als ganzes auslesen? Wieviele Datensätz, wieviele Spalten... wie soll das Endergebnis aussehen.

Es gibt für autoit diverse dbf tools.... z.B.

dBase udf and dll

hi forum peoples for people that are using dBaseIII and dBaseIV database files i want to share my dbase dll + udf that i wrote for one of my projects the dll…

www.autoitscript.com

Peter

Velted

Zum Begriff "SQLight" (ohne Bindestrich) habe ich im Netz mehrere Hinweise auf Anwendungen gefunden, die mit SQLite-Datenbanken arbeiten. Ob es eine 'einfache' SQLite-DB ist, kannst Du mit dem Tool aus meinem Link leicht herausfinden. Wenn ja, bietet Dir das Tool auch die Möglichkeit, die Datentabellen per CLI mit drei Anweisungen in ein HTML-Format auszugeben. Es gibt aber Erweiterungen für den professionellen Anwendungsbereich, die den Zugriff mit den frei verfügbaren Mitteln nicht zulassen.

Wenn es kein 'einfaches' SQLite ist, solltest Du zuerst einmal herausfinden, welches Format wirklich in der dbf. Datei enthalten ist.

Peter S. Taler · *Ab 19-10-22 ergänzt um:*

Im Anhang eine Mini DBF Datenbank

Peter

Peter S. Taler · *Ab 19-10-22 ergänzt um:*

Und hier noch der Link zu einem Portablen Freeware Tool für dbf Datenbanken.

Search results - The Portable Freeware Collection

Kopie Deiner Datenbank machen - öffnen - dann gehts bestimmt auch weiter

Peter

PSblnkd

BugFix

Danke für Dein Skript - werde ich mal testen, wenn Zeit ist. Das kann immerhin mal ein Ansatz sein so'n DBFtoHTML-Converter für/in AutoIt zu programmieren. Momentan habe ich dafür aber keine Zeit.

@'Velted'

Was meinst Du mit "die Datentabellen per CLI mit drei Anweisungen in ein HTML-Format auszugeben" ?

Peter S. Taler

Danke für Deine Bemühungen.

Dein Link Search results - The Portable Freeware Collection führt aber nicht zu einem DBFtoHTML-Converter.

Da ich mich offensichtlich immer noch nicht verständlich genug ausgedrückt habe - hier nochmal (zum Mitschreiben - Zitat aus meinem Entwicklungsbericht):

" ... wird die Datenbank "Mediathek.dbf" geöffnet, bzw. wenn diese noch nicht existiert, wird die Datei automatisch sofort neu erstellt mit:

$Db =_SQLite_Open("Mediathek.dbf", $SQLITE_OPEN_READWRITE + $SQLITE_OPEN_CREATE)

Die Datei ist solange im Zugriff, bis mit

_SQLite_Close($Db)

die Datenbank geschlossen wird. Bei einer Neuerstellung wird mit

_SQLite_Exec($Db, "CREATE TABLE Tabelle (LfdNr,Medienart,Titel,Inhalt,Laufzeit,LinkAdr);")

auch eine neue Tabelle angelegt ..."

Und so werden auch die anderen Funktionen der SQL-UDF zum Einfügen eines neuen Datensatzes, Auslesen in die auf dem Bildschirm dargestellte Tabelle benutzt. Die Abspeicherung der Daten erfolgt offensichtlich immer im Hintergrund in der Datei "Mediathek.dbf", ohne daß man dazu was tun muß.

Aber das alles ist eben nicht das Thema!

Ich wollte nur wissen, ob jemand schon mal erfolgreich aus eben so einer mit den AutoIt-Mitteln erstellten Datenbank eine Konversionsmöglichkeit in eine HTML-Tabelle gefunden hat.

Grüsse aus Berlin

PSblnkd

Velted

Zitat von PSblnkd

Da ich mich offensichtlich immer noch verständlich genug ausgedrückt habe - hier nochma (zum Mitschreiben - Zitat aus meinem Entwicklungsbericht)

Moin,

jetzt verschlägt es mir die Sprache. Du hast die Software, die die Datenbank erstellt, selbst geschrieben und lässt uns dann rätseln, welches Format sie hat?

Dann hätte Deine Frage doch lauten sollen:

Wie konvertiere ich die Tabellen einer mit AutoIt erstellten SQLite-Datenbank nach HTML?

Eine passende Antwort hättest Du mit Sicherheit bereits am Sonntag bekommen.

Mit CLI meine ich die Command Line Shell sqlite3.exe, für deren Beschreibung ich oben einen Link gesetzt habe.

Grüße aus Berlin

Velted

**BugFix**

Zitat von Velted

Dann hätte Deine Frage doch lauten sollen:
Wie konvertiere ich die Tabellen einer mit AutoIt erstellten SQLite-Datenbank nach HTML?

Die richtige Fragestellung - ein leidiges Problem.

@PSblnkd Ich empfehle mal, auch den Titel deines Threads dahingehend zu ändern. (SQLite-DB to HTML HowTo o.ä.)

Peter S. Taler · *Ab 19-10-22 ergänzt um:*

Und manchmal kommt mir vor nicht nur die leidige Fragestellung ist ein Problem...

PSblnkd

WO bitte habe ich geschrieben, dass es ein Link zu einem dbf zu HTMl Converter ist? Bis vor kurzem ging es daran zu erkennen welches Format deine Datenbank hat und ob *.dbf oder *SQL? Mein Link führt zu einem Werkzeug für DBF Datenbanken... sonst nix

PSblnkd

BugFix

Du hast Recht - bei dem heutigen Erkenntnisstand wäre eine andere Titelüberschrift sinnfälliger gewesen. Das kann ich aber leider nicht mehr ändern ...

Velted

Wenn Du den bereffenden Thread unter Projekte" gelesen hättes - dort steht incl. den auf meine HP verlinkten Infos eigentlich alles drin.

Peter S. Taler

Ja, das hatte ich gesehen - meine Anfrage ging aber nach einem diesbezüglichen Konverter.

Damit ist eigentlich alles gesagt. Ich bin um weitere Erkenntnisse zu AutoIt reicher, obwohl ein wenig einführende Erklärungen zur SQLite-UDF wären sicherlich hilfreich gewesen ...
Natürlich könnte ich mich mit einem Datenbank-Konverter für SQLite -> HTML beschäftigen, aber wie gesagt, dazu fehl mir momentan die Zeit - in Anbetracht dessen, wie lange ich damals für der Mediathek gebraucht habe.

Z.Zt. habe ich händisch bereits etwa die Hälfte der über 200 Einträge konvertiert. Wenn die HTML-Seite fertig und in der HP des Industriesalons eingebunden ist, könnt Ihr lesen, was dort in der Mediathek alles verfügbar ist.

Grüsse aus Berlin

PSblnkd

Velted

PSblnkd

Warum soll ich nach Informationen in dem "bereffenden Thread unter Projekte" suchen, wenn Du in "Hilfe & Unterstützung" sagst

Zitat von PSblnkd

... habe ich auch nichts über das dbf-Datenbank-File gefunden

Na ja, sei's drum!

Bist Du meinem Hinweis inzwischen nachgegangen? Um eine HTML-Tabelle mit den notwendigen <TR>, <TH> und <TD> Tags zu erstellen, braucht es nicht viel. Die musst Du dann nur noch in einen passenden HTML-Rahmen einfügen.

Zunächst brauchst Du die Sqlite3.exe von der SQLite Download Page. Sie steckt in sqlite-tools-win32-x86-3430100.zip. Wenn Du die per Doppelklick startest läuft es wie folgt:

Code

SQLite version 3.11.1 2016-03-03 16:17:53
Enter ".help" for usage hints.
Connected to a transient in-memory database.
Use ".open FILENAME" to reopen on a persistent database.
sqlite> .open NameDeinerDatenbankdatei
sqlite> .headers on
sqlite> .mode html
sqlite> .output NameDeinerHTMLDatei
sqlite> select * from NameDeinerDatenbanktabelle;
sqlite> .exit

Und das war's auch schon.

Grüße aus Johannisthal,

Velted

Peter S. Taler · *Ab 19-10-22 ergänzt um:*

So ganz erschließen sich mir die Probleme nicht.... wo ist z.B. das Problem etwas in einfachen html zu schreiben? Das sind doch nur Fingerübungen.....

---------------

Peter

Code

; HTML Anfang
Global $_fett_ein = '<b>'
Global $_fett_aus = '</b>'
Global $_neue_zeile_01 = '<br>'
Global $_neue_zeile_05 = '<br>' & '<br>'& '<br>'& '<br>' & '<br>'
Global $_neue_zeile_20 = '<br>' & '<br>' & '<br>' & '<br>' & '<br>' & '<br>' & '<br>' & '<br>' & '<br>' & '<br>' & '<br>' & '<br>' & '<br>' & '<br>' & '<br>' & '<br>' & '<br>' & '<br>' & '<br>' & '<br>'
Global $_Neue_seite = '<div style = "page-break-after:always;"></div>'

Global $_base_font_07 = '<basefont size=1>'         ;  bestimmt die Normalgröße der Schrift (basefont size = Basisschriftgröße). Sie können den Wert in Zahlen zwischen 1 und 7 angeben. Die voreingestellte Normalschriftgröße ist 3.
Global $_font_01 = '<FONT SIZE="1">'
Global $_font_02 = '<FONT SIZE="2">'
Global $_font_03 = '<FONT SIZE="3">'
Global $_font_04 = '<FONT SIZE="4">'
Global $_font_05 = '<FONT SIZE="5">'
Global $_font_06 = '<FONT SIZE="6">'
Global $_font_07 = '<FONT SIZE="7">'
Global $_font_20 = '<FONT SIZE=10pt>'
Global $_ende_font ='</font>'

Global $_schwarze_schrift = '<font color="black">'
Global $_weise_schrift = '<font color="white">'

Global $_rote_schrift = '<font color="#FF0000">'
Global $_gruene_schrift = '<font color="#228B22">'
Global $_blaue_schrift = '<font color="#00008B">'

Global $_center = '<p align="center">'
Global $_center_ende ='</p>'



$_file_open = FileOpen ('F:\TEMP\1.html', 18)                                ; 18 = 16 binary + 2 overwrite

Filewrite ($_file_open, $_font_20 & $_center & $_blaue_schrift & 'Überschrift' & $_neue_zeile_01 & $_font_02 & 'Version 200' & $_neue_zeile_01 & $_neue_zeile_01& $_font_04 & _
'Das finden Sie nur hier' & $_neue_zeile_01 & 'oder dort' & $_neue_zeile_01 & $_font_06 & $_rote_schrift & '_______________________________________________' & _
$_neue_zeile_01 & $_neue_zeile_01 & $_neue_zeile_01 & $_neue_zeile_01 & $_gruene_schrift & $_font_04)


FileClose ($_file_open)

Alles anzeigen

**water**

Zitat von PSblnkd

Du hast Recht - bei dem heutigen Erkenntnisstand wär eine andere Titelüberschrift sinnfälliger gewesen. Das kann ich aber leider nicht mehr ändern ...

Doch, geht. Am Beginn des Themas auf Thema bearbeiten > Erweitert und dann den Titel anpassen.

PSblnkd 29. September 2023 um 09:48