Jag har ett formulär där användaren fyller i sitt namn. När detta är gjort vill jag skapa en .txt-fil som heter användarens namn. Alltså om jag fyller i att jag heter Nisse, ska filen heta Nisse.txt.
Hur ska jag skriva för att åstadkomma detta? Jag har spenderat de senaste två timmarna med att flytta runt citattecken i detta:
If Obj.FileExists(Server.MapPath("Request.Form("name").txt")) = False Then
Men det verkar inte fungera så himla bra. Har även försökt att plocka in värdet i en variabel och försöka döpa filen efter den, men det gick inte heller bra. Det känns som det inte är speciellt svårt att åstadkomma detta, men hur i hela friden ska man göra?
strFileName = Server.MapPath(Request.Form("name") & ".txt"))
If Obj.FileExists(strFileName) = False Then
Obj.CreateTextFile(strFileName ..........
End if
Kompileringsfel i Microsoft VBScript fel '800a0401'
Slut på programsats förväntas.
/asp/wishlist05/add_item.asp, rad 6
strFileName = Server.MapPath(Request.Form("name") & ".txt"))
-----------------------------------------------------------^
Jag skrev såhär, men det kanske var fel?
<%
Dim Obj, TS, strFileName
Set Obj = CreateObject("Scripting.FileSystemObject")
strFileName = Server.MapPath(Request.Form("name") & ".txt"))
If Obj.FileExists(strFileName) = False Then
Set TS = Obj.CreateTextFile(strFileName, 8)
Else
Set TS = Obj.OpenTextFile(strFileName, 8)
End If
TS.WriteLine Request.Form("name")
TS.Close
%>
