Här
if obj.FileExists("data.txt") = False Then
kanske du skulle kunna tänka att lägga till katalognamnet också.
Frågan#1
Hej!
Först och främst ska vi göra det klart för oss att jag är helt blank vad det gäller ASP :h
Ok, då är det klart, och över till frågan.
Det är så att jag sitter och läser på https://www.idg.se/webstudio och gör även exemplen som visas. Dock så har jag fastnat på ett ställe, och det är att textfilen skrivs över trots att jag har lagt med en 8(ForAppending?) i OpenTextFile.
Hoppas att ni kan hjälpa mig att reda ut detta så att det fungerar =)
Koden är som följer:
**<%
Dim obj, TS
Set obj = CreateObject("Scripting.FileSystemObject")
if obj.FileExists("data.txt") = False Then
Set TS = obj.CreateTextFile("C:\Inetpub\wwwroot\Fredde\data.txt", 8)
Else
Set TS = obj.OpenTextFile("C:\Inetpub\wwwroot\Fredde\data.txt", 8)
End If
TS.WriteLine Request.Form("namn")
TS.WriteLine Request.Form("e-post")
TS.WriteLine Request.Form("hemsida")
TS.WriteLine Request.Form("annons")
TS.Close
%>**