G Goober Medlem sedan apr. 2002 14 inlägg Frågan 17 apr. 2002 08:45 #1 Någon som kan hjälpa mig? jag har precis installerat IIS och jag har också börjat nyligen med ASP programmering.
Nu är det så att när jag kör asp scripten så får jag det här felmeddelandet:
Teknisk information (för supportpersonal)
Feltyp:
Körningsfel i Microsoft VBScript (0x800A0046)
Åtkomst nekad.
/skicka.asp, line 13
Hur ska jag göra för att man ska komma åt scripten?
Ni kan själva titta på sidan på: http://goober.no-ip.com/matain.asp
tack på förhand /Mathias
S skyman Medlem sedan juli 2001 2 450 inlägg Välkommen Goober :)
Vad står det på rad 13?
Vad använder du för db? Är det access, isf är den öppnad?
G Goober Medlem sedan apr. 2002 14 inlägg Nej, jag använder ingen databas överhuvudtaget än sålänge...
scriptet är gjort så den ska läsa och skriva till en txt fil.. bara för att jag ska lära mig från grunden.
hur gör jag om jag ska göra en textfil läs- och skrivbar?
S skyman Medlem sedan juli 2001 2 450 inlägg Ok.
Vad står det på rad 13?
G Goober Medlem sedan apr. 2002 14 inlägg det står:
Set TS = Obj.OpenTextFile("data.txt", 8)
hela koden:
<html>
<% Dim Obj, TS
Set Obj = CreateObject("Scripting.FileSystemObject")
If Obj.FileExists("data.txt") = False Then
Set TS = Obj.CreateTextFile("data.txt", 8)
Else
Set TS = Obj.OpenTextFile("c:\inetpub\wwwroot\asp\request\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 %>
Följande uppgifter har nu lagts till:<p>
Namn: <b><%=Request.Form("namn")%></b><br>
E-post: <b><%=Request.Form("e-post")%></b><br>
Hemsida: <b><%=Request.Form("hemsida")%></b><br>
Annonstext: <b><%=Request.Form("annons")%></b><p>
Ta en <a href="annonser.asp">titt på de andra annonserna</a>.
</html>
S skyman Medlem sedan juli 2001 2 450 inlägg chansning:
Set TS = Obj.OpenTextFile(Server.MapPath("data.txt"), 8)
S Sico Medlem sedan maj 2000 2 597 inlägg testa at skriva in sökvägen till vart textfilen ska lägga sig.. altså:
Set TS = Obj.CreateTextFile("c:\inetpub\wwwroot\asp\request\data.txt", 8)
samma vid If Obj.FileExists("data.txt") = False Then då att du lägger till sökvägen framför
Se åxå till att ha skrivrättigheter för IUSR_datornamn i den mappen du jobbar i
G Goober Medlem sedan apr. 2002 14 inlägg Hur gör jag för att fixa till skrivrättigheterna då? för hur jag än gör så fungerar det inte. jag har kryssat i skrivrättigheter i mappen men det fungerar ändå inte
SirPeter Medlem sedan feb. 2001 15 571 inlägg Du har satt rättigheterna på mappen från Utforskaren eller liknande va? Alltså _inte_ inne i IIS'en.
G Goober Medlem sedan apr. 2002 14 inlägg ja det har jag..
hur ska jag göra det i IIS då?
öppna iis:en
högerklicka på "default website" välj properties -> home directory
klicka sedan i rutan write.
nu kan vi skriva i hela mapp-trädet så om du vill att användrana enbart ska kunna skriva i en speciell mapp markerar du istället "default website" och bland mapparna du då ser till höger högerklickar och använder samma procedur jag beskrev ovan. (home directory heter nu directory och ska komma upp automatiskt. detta fungerar även på enskillda filer och kan va bra att veta till du börjar använda databaser).
sedan ska det vara klart.. :)