[ASP] Datein am Server erstellen

[Zerogiven]

Also manchmal muss man einfach Text-Datein oder ähnliches am Server erstellen. Rein theoretisch kann man jeden Datentyp zum speichern nehmen. Ich habe ein Beispiel geschrieben, welches eine Text-Datei erstellt:

Code:

<% dim filesys, filetxt, getname, path ' Ein Server Objekt wird erstellt Set filesys = CreateObject("Scripting.FileSystemObject") ' Nun wird eine Text Datei erstellt. Hier kann man einen Speicherpfad angeben Set filetxt = filesys.CreateTextFile("text_datei.txt", True) ' Der Pfad der Textdatei path = filesys.GetAbsolutePathName("text_datei.txt") ' Der Name der Text Datei wird in eine Variable gespeichert getname = filesys.GetFileName(path) ' Mit dieser Funktion schreiben wir einen Text in die Datei filetxt.WriteLine("Dieser Text steht in der Text-Datei") ' Wir schliessen das Objekt filetxt.Close ' Nun überprüfen wir ob die Datei auch erstellt wurde If filesys.FileExists(path) Then ' Falls die Datei erstellt wurde, wird dieser Text ausgegeben Response.Write ("Die Datei, '" & getname & "', wurde erfolgreich am Server erstellt.") End If %>

So nun will ich euch noch ein paar Begriffe erklären:

Code:

Set filetxt = filesys.CreateTextFile("text_datei.txt", True)

Hier kann man den Speicherpfad der Datei angeben. Dies muss keine TXT Datei sein. Mit dem Value true geben wir an, das die Datei erstellt werden muss. Wenn hier false stehen würde, müsste die Datei vorhanden sein.

Code:

If filesys.FileExists(path) Then

Hier wird abgefragt, ob die Datei vorhanden ist.

So, ich hoffe euch konnte das Tutorial helfen.

mfg
Zerogiven