---
title: "Nyhetsbrev"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/94699-nyhetsbrev"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "ejick"
published: "2004-01-13T13:38:16.000Z"
updated: "2004-01-13T16:28:09.000Z"
replies: 5
views: 218
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/94699-nyhetsbrev"
---

# Nyhetsbrev

## #1 — ejick, 2004-01-13T13:38Z

Hej,

jag håller på med en site som skall ha en enklare version av en tilläggning av e-postadresser.

De adresser som läggs till skall haman i en textfil. Förljande kod är använd:

```
email = Request.Form("email")
filnamn = "dbs/emaillista.txt"

Set MittTxtObj = Server.CreateObject ("Scripting.FileSystemObject")
Set MinFil = MittTxtObj.OpenTextFile(filnamn,8,true)

MinFil.WriteLine(email & ", ")

MinFil.Close

Session("email") = true

Response.Redirect "default.asp"
```

 

Problemet verkar vara filnamn, hur skall jag ange sökvägen för att det skall bli rätt?

Sidan där jag postar e-mailadressen:

```
<% If Session("email") = true Then %>
    <strong>Din e-mail finns nu i vår databas.</strong>	
<% Else %>
    <form action="addemail.asp" method="post" name="nbrev">
    <input type="text" value="din@mail.com" name="email">
    <br>
    <input type="submit" value="GO">
</form>
<% End If%>
```

Hoppas någon förstår och har en smart lösning.

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

## #2 — Sebbe, 2004-01-13T14:12Z

Jag tror nog att det funkar bättre om du använder Server.MapPath():

```
email = Request.Form("email")
filnamn = "dbs/emaillista.txt"

Set MittTxtObj = Server.CreateObject ("Scripting.FileSystemObject")
Set MinFil = MittTxtObj.OpenTextFile(Server.MapPath(filnamn),8,true)

MinFil.WriteLine(email & ", ")

MinFil.Close

Session("email") = true

Response.Redirect "default.asp"
```

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

## #3 — ejick, 2004-01-13T14:53Z

Tack!

Det funkar utmärkt.

En fråga till.. Vad menas egentligen med ,8,true?

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

## #4 — Jesper T, 2004-01-13T15:32Z

ForAppending = 8 'Lägger till i en textfil
true/false = Opens the file as Unicode/Opens the file as ASCII

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

## #5 — Sebbe, 2004-01-13T15:33Z

8 = ForAppending = Lägg till i slutet av filen, istället för att skriva helt nytt.
True = Skapa en ny fil om filen inte finns (har jag för mig).

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

## #6 — ejick, 2004-01-13T16:28Z

Ahh okej. Tack så mycket, nu hänger tom jag med :)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/94699-nyhetsbrev