En liten test
Förord
testar lite nya script och funktioner för att se hur jag bäst kan hantera tabeller som används inne i admin-systemet. Likaså en automatgenererad innehållsförteckning på alla
Argument
- object
Required. Object is always the name of a FileSystemObject. - filename
Required. String expression that identifies the file to open. - iomode - Valfritt. Kan vara en av tre konstanter: ForReading, ForWriting, eller ForAppending.
- create - Valfritt. Booleanskt värde som indikerar om en ny fil tillåts skapas om inte den specificerade filen finns. Om värdet är True så skapas filen. Om värdet är False så skapas inte filen.
- format - Valfritt. En av tre värden används för att indikera formatet på den öppnade filen. Om
Optional. One of three Tristate values used to indicate the format of the opened file. If omitted, the file is opened as ASCII.
Argumentet iomode kan ha en av följande inställningar:
| Konstant | Värde | Färklaring |
|---|---|---|
| ForReading | 1 | Öppnar fil för läsning, du kan inte skriva till den.. |
| ForWriting | 2 | Öppnar fil för skrivning. |
| ForAppending | 8 | Öppnar fil för att skriva efter slutet av texten. |
Argumentet för format kan ha en av följande inställningar:
| Konstant | Värde | Förklaring |
|---|---|---|
| TristateUseDefault | -2 | Öppnar en fil på vanligt sätt (default ASCII). |
| TristateTrue | -1 | Öppnar filen i Unicode mode. |
| TristateFalse | 0 | Öppnar filen i ASCII mode. |
Säkerheten
Innan du kan göra detta så måste du få kontroll på den anonyma användare som tänker skapa, ändra eller uppdatera din fil. Som anonym användare räknas alla som kör denna sida och du kommer inte att kunna lyckas med dessa rutiner om du inte först ställer in skriv- och skapa rättigheter på den aktuella katalogen som du tillåts användas.
Skapa en ny fil på servern
Nedan ser du ett exempel på hur man kan skriva på en aspsida där du har en subrutin som använder FSO för att skapa en textfil på serverns c: och skriva till den. Om befintlig fil redan finns så skrivs den över, genom ditt True kommando. Observera även att vi lagt till konstanterna i koden. ASP förstår inte dessa om vi inte sätter värden på dessa.Exempel:
Sub AddTextFileTest
Const ForReading = 1
Const ForWriting = 2
Const ForAppending = 8
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
f.Write "Hej världen!"
f.Close
End Sub
Addera text till befintlig fil
Ett tänkbart exempel är om du skriver en loggfil eller liknande, då behöver du snabbt uppdatera filen och lägga till en post, därefter stänga igen och fortsätta. Nedan ser du ett sådant exempel.Exempel:
Sub AppendTextFileTest
Const ForReading = 1
Const ForWriting = 2
Const ForAppending = 8
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("c:\testfile.txt", ForAppending , True)
f.Write "Hälsningar Pelle"
f.Close
End Sub
Läsa innehållet i filen
Nu har du skapat en fil, lagt till ytterligare information och nu avslutar vi med att läsa innehållet i filen.
Sub AppendTextFileTest
Const ForReading = 1
Const ForWriting = 2
Const ForAppending = 8
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("c:\testfile.txt", ForReading)
f.ReadAll
f.Close
Response.Write f.ReadAll
End Sub
Ytterligare funktioner som du kan använda med FSO finns att läsa om i de relaterade artiklarna ovan.
0 Kommentarer