---
title: "Adda 300 poster smidigt."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/54648-adda-300-poster-smidigt"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "SPinckney"
published: "2002-09-30T07:21:33.000Z"
updated: "2002-09-30T09:35:55.000Z"
replies: 5
views: 281
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/54648-adda-300-poster-smidigt"
---

# Adda 300 poster smidigt.

## #1 — SPinckney, 2002-09-30T07:21Z

Hej,

jag har ett txt dokument med 300 emailadresser. Nu vill jag lägga in alla dessa i databasen men inte en för en.

Hur gör jag detta på bästa sätt?

Lägger in dom med FSO?

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

## #2 — voigtann1, 2002-09-30T07:39Z

borde väll gå men en \<textarea\> eller att man tar varje rad som e-mail addressena i txt dokumentet... men jag har inte någon aning hur man ska kunna göra det :(

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

## #3 — icaaq, 2002-09-30T07:55Z

ligger dem kommaseparerade (,) eller en på varje rad?

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

## #4 — SPinckney, 2002-09-30T09:14Z

En på varje rad

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

## #5 — icaaq, 2002-09-30T09:29Z

helt taget ur huvudet :OO

```
[red]
<% 
Dim filesys, strEmail
Set filesys = CreateObject("Scripting.FileSystemObject")
Set strEmail= filesys.OpenTextFile("c:\somefile.txt", 8)
'diverse databaskopplingar
Do until  strEmail.AtEndOfStream = true
	strMail = strEmail.ReadLine
	strSQL = "INSERT INTO tabellen(email)VALUES('"&strMail&"')
	objCon.Execute(strSQL),,128
	strEmail.SkipLine
loop
testfile.Close
'Stäng databas kopplingarna 
%>[/red]
```

hoppas att det funkar

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

## #6 — SPinckney, 2002-09-30T09:35Z

Detta ser bra ut.
Tack icaaq

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/54648-adda-300-poster-smidigt