J0han
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.. :)
------------------
/ joh@n ...
@ndersMedlem sedan juni 200032 969 inlägg gissar på att iusr_xxx inte har skrivrättighet i mappen du försöker skriva till.
------------------
don't follow your friends -- inflate them
J0han
jo, mappen har alla rättigheter, jag kör på PWS 4.0... det måste vara nåt annat...
------------------
/ joh@n ...
ZaphodMedlem sedan maj 2000107 inlägg 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
Så får du reda på vilket som är fallet.
------------------
/Magnus aka Zaphod
www.designmodule.com.bi
J0han
Jag får upp "Kanon fett: objFso är ett objekt", så jag antar att det inte var felet...
------------------
/ joh@n ...
@ndersMedlem sedan juni 200032 969 inlägg hördudu, förresten, en liten idé:
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
J0han
jo, filen den finns... det måste vara nåt annat...
------------------
/ joh@n ...
PatrikBMedlem sedan mars 20002 836 inlägg Hello,
detta funkar:
<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
cya
PatrikB
------------------
=================================
** ZWGdesign **
=================================
[Redigerat av PatrikB den 18 jul 2000]
