Her er et eksempel på, hvordan du kan skrive til en tekstfil via asp gennem komponenten FileSystemObject.
<%
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
f.Write "Hello world!"
%>
Dette eksempel opretter en ny fil, hvis du istedet bare vil tilføje en tekst til en fil, skal du gøre det på følgende måde.
<%
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("c:\testfile.txt", ForAppending, True)
f.Write "Hello world!"
%>
>>E2000<<
|