---
title: "Gästbok?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/5550-gästbok"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "M@rtin"
published: "2000-04-08T13:47:00.000Z"
updated: "2000-04-11T18:02:00.000Z"
replies: 2
views: 256
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/5550-gästbok"
---

# Gästbok?

## #1 — M@rtin, 2000-04-08T13:47Z

Jag håller på med en gästbok som lagrar alla mess i en .txt fil.. Men jag har lite problem med att skriva samt läsa filen.. Nån som kan hitta några fel i min kod?

```
<% if Request.Form("namn")="" then
%>
<html>
<head>
<title>Min Gästbok!</title>
</head>
<body>
<center><h2>Skriv några rader i min gästbok!</h2><p>
<form name="guest" action="guestbook.asp" method="POST">
<table border=0 align="center" width="400" cellspacing="20">
<tr>
   <td>Namn: <input type="text" name="namn" size=20 maxlength=20>
   </td>
</tr>
<tr>
   <td>E-mail: <input type="text" name="epost" size=30 maxlength=40>
   </td>
</tr>
<tr>
   <td>Kommentar:
       <textarea name="kommentar" cols="40" rows="7"></textarea>
   </td>
</tr>
<tr>
   <td><input type="reset" value="Rensa">
       <input type="submit" value="Skicka">
   </td>
</tr>
</table>
</form>
<p>

<%
fil="guests.txt"
Set MittTxtObjekt=Server.CreateObject("Scripting.FileSystemObject")
Set MinFil=MittTxtObjekt.OpenTextFile(fil,8,true)
kommentaren=MinFil.ReadAll
%>

<%=kommentaren%>

</body>
</html>

<%
else
%>

<%
fil="guests.txt"
Set MittTxtObjekt=Server.CreateObject("Scripting.FileSystemObject")
Set MinFil=MittTxtObjekt.OpenTextFile(fil,8,true)

namn=Request.Form("namn")
email=Request.Form("email")
kommentar=Request.Form("kommentar")
MinFil.Write "<br>"
MinFil.Write "<a href='mailto:" & email &"'>" & namn & "</a>" & "Datum: " & Now & "<br>"
MinFil.Write "<table border=0 align=center width=400><tr><td>"
MinFil.Write kommentar
MinFil.Write "</td></tr></table>"
MinFil.Write "<hr width='99%'>"
MinFil.Close
 
%>

<html>
<head> 
<title>Tack!</title>
</head>
<body>
<center><h2>Tack, <%=Request.Form("namn")%>, för att du skrev in dig i min Gästbok!</h2></center>
</body>
</html>

<%
End If
%>
```

//M@rtin

Permalänk: https://www.webforum.nu/p/5550

## #2 — Vide, 2000-04-08T14:48Z

Hej!

... vore lättare att felsöka om du angav vad du har för problem, om du t.ex får nått felmeddelande...

Permalänk: https://www.webforum.nu/p/242490

## #3 — M@rtin, 2000-04-11T18:02Z

Jo det vore det säkert.. men jag kom på felet själv.. och med lite hjälp av dig ;)
Felet var att jag öppnade filen för skrivning när jag skulle läsa från den.. :)

//M@rtin

Permalänk: https://www.webforum.nu/p/242491

---

Tråden på webben: https://www.webforum.nu/amne/asp/5550-gästbok
