Pysslade lite med textfiler i ASP, tänkte göra en enkel sidan som man kunde lagra text i, jaja, hursomhelst, men jag får ett fel och jag vet inte vad jag ska göra för att åtgärda det. Här är lite kod:
spara.asp
<html>
<head>
</head>
<body>
<%
dim namn
namn = request.form("namn")
Set MittTxtObj = Server.CreateObject("Scripting.FileSystemObject")
Set MinFil = MittTxtObj.OpenTextFile("c:\Inetpub\wwwroot\fil.txt")
MinFil.WriteLine namn
MinFil.Close
%>
</body>
</html>
felmeddelandet
Serverobjekt fel 'ASP 0177 : 800a0036'
Server.CreateObject misslyckades
/spara.asp, rad 7
00000000
Det vore helnice om nån kunde berätta vad som e fel.. :)
Verkar snarare vara så att du inte har filesystemobject installerat(?!).
testa detta:
On Error Resume Next
dim objFso
set objFso = Server.CreateObject("Scripting.Filesystemobject")
If IsObject(objFso) Then
Response.Write "Kanon fett: objFso är ett objekt"
Else
Response.Write "Himmel å pannkaka: objFso kunde inte skapas"
End if
kan det vara så att filen du försöker skriva till inte finns? pröva i så fall med CreateTextFile istf OpenTextFile. (alternativt lägg till parametern som säger skapa om filen inte finns (minns dock inte vilket värde det ska vara...)
------------------
don't follow your friends -- inflate them
<html>
<head>
</head>
<body>
<%
dim namn
namn = Request.Form("namn")
Set MittTxtObj = Server.CreateObject("Scripting.FileSystemObject")
Set MinFil = MittTxtObj.OpenTextFile("c:\inetpub\wwwroot\fil.txt",8)
MinFil.WriteLine namn
MinFil.Close
Set MinFil = Nothing
Set MittTxtObj = Nothing
%>
</body>
</html>
8 efter sökvägen gör så att det lägger till namn efter namn.
byt till 1 om du vill skriva över
