G
Grüner Goblin
Ich möchte mir ein kleines Programm machen in das ich Namen mit Adressen speichern kann. Aber ich will nicht extra ne große DB dafür instalieren. Wie könte man das realisieren?
Folge dem Video um zu sehen, wie unsere Website als Web-App auf dem Startbildschirm installiert werden kann.
Anmerkung: Diese Funktion ist in einigen Browsern möglicherweise nicht verfügbar.
Dim Dateinummer as Integer 'Dateinummer deklarieren
Dateinummer = FreeFile 'freie Dateinummer finden
Open "F:\Test.txt" for Output as Dateinummer 'Output überschreibt vorhandene Dateien! Append fügt Inhalte an und erstellt die Dateien eventuell neu!
Write #Dateinummer, "Testinhalt", "Testinhalt2", "Testinhalt3" 'Write mit Anführungszeichen in Datei - Print ohne!
Close Dateinummer 'Datei wieder freigeben!
Dim Dateinummer as Integer
Dim Test1, Test2, Test3 'In diesen Variablen steht der Datei-Inhalt!
Dateinummer = FreeFile
Open "F:\Test.txt" for Input as Dateinummer 'Wenn die Datei nicht vorhanden ist, wird ein Fehler erzeugt!
Input #Dateinummer, Test1, Test2, Test3 'Datei mit Variablen einlesen
Close Dateinummer