---
title: "Filtrera en txtfill till excel/access för analys?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/databaser-sql/116744-filtrera-en-txtfill-till-excel-access-för-analys"
topic: "Databaser & SQL"
topic_url: "https://www.webforum.nu/amne/databaser-sql"
author: "Johanneshov"
published: "2004-11-26T14:56:04.000Z"
updated: "2004-11-26T18:04:27.000Z"
replies: 7
views: 488
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/databaser-sql/116744-filtrera-en-txtfill-till-excel-access-för-analys"
---

# Filtrera en txtfill till excel/access för analys?

## #1 — Johanneshov, 2004-11-26T14:56Z

Jag vil läsa en in en txtfil som lagrar data från ett webmailform till excel för att göra diverse beräkningar/databashanteringar. Jag vill bara få ut viss data samt lägga upp det i exel/access som enligt nedan:

Filen ser ut som följer:

xx-xx-xx sparade vi information från xxxx blablabl
namn:  xet1 xsson
emial:xet1@xetson.com
datum

xx-xx-xx sparade vi information från xxxx blablabl
namn:  xet2 xsson
emial:xet2@xetson.com
datum

xx-xx-xx sparade vi information från xxxx blablabl
namn:  xet3 xsson
emial:xet3@xetson.com
datum

Jag vill få det på följande form:

Namn		Email		Datum
xet1 xsson	<xet1@xetson.com> xx-xx-x1
xet2 xsson	<xet2@xetson.com> xx-xx-x2
xet3 xsson	<xet3@xetson.com> xx-xx-x3

Någon som kan tipsa mig hur jag skall göra, funderade på asp-script men det finns andra sätt, säkerligen. Någon liknande funktion i Excel kanske...???

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

## #2 — Johanneshov, 2004-11-26T15:07Z

Hmmmm... kanske skall köra det i asp trots allt... läsa in det som jag vill ha lagrat i en array och sedan pytsa ut det i en textfil som jag kan importera till excel...? Eller?

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

## #3 — clarkbones, 2004-11-26T15:16Z

Om filen är så strukturerad så du beskriver kan du köra det hela via excel/vba. Kan man vba så är det det enklaste sättet och snabbaste sättet att lösa problemet, om än kanske inte det snyggaste.

Annars kan man köra en vbs fil med, använda filesystemobject och läsa rad för rad och hugga upp strängarna med vbas strängfunktioner på önskat sätt.

Tycker inte du skall blanda in ASP i det hela, eftersom det känns onödigt att blanda in i IIS.

PS Det finns egentligen inga asp-script. DS ASp är en teknik som används med  antingen vbscript eller jscript.

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

## #4 — Johanneshov, 2004-11-26T15:19Z

ok

Hinta mig gärna ur jag gör... eller var jag hittar mer info om hur jag skall göra. Är "hyffsat" van enkel asp, databashantering, men inte läsa txtfiler med vb.

Please!

Lägge till: alltså mer info om hur jag gör detta:
"Annars kan man köra en vbs fil med, använda filesystemobject och läsa rad för rad och hugga upp strängarna med vbas strängfunktioner på önskat sätt"
\-vilka funktioner jag kan använda etcetera...

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

## #5 — clarkbones, 2004-11-26T15:36Z

Här har du om man ska läsa en textfil (exemplet avser ASP)
<http://www.codepedia.com/1/ASPFAQ_ReadTextFile>

I asp skriver man 
Server.CreateObject("Bla.Bla") 
när man vill skapa ett object men i övriga COM vb-varianter (vb6, vba, vbs) skriver man bara
CreateObject("Bla.Bla") 

Sedan kan du söka i microsofts vbahjälp (finns i excel)
på följande funktioner:
instr
mid
left
right
len

Du kan göra detta i notepad, men en en riktig utvecklingsmiljö är mycket lättare. Typ VS.NET, VS 6 eller excels VBA. Testa att starta excels vba via Tools\>Macro\>Visual Basic Editor.

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

## #6 — Johanneshov, 2004-11-26T16:16Z

Super, bra tack!

Har du liknande exempel som ovan asp-länk på hur man gör i VB-editorn i Excel så är det biff!

MVH
Johanneshov

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

## #7 — clarkbones, 2004-11-26T17:16Z

bara för att jag är snäll idag:

```
Public Sub ReadMyFileOrGoToHell()

Const ForReading = 1    'Open the file for reading only

Const TristateFalse = 0 'Open the file as ASCII
Dim fso, fil, Content, filename

'Create a FileSystemObject
Set fso = CreateObject("Scripting.FileSystemObject")

'Set the name of the file to read
filename = "c:\testfile.txt"

'Open the textfile for reading
Set fil = fso.OpenTextFile(filename, ForReading, False, TristateFalse)

'read the first line of the textfile
'OBS Det finns olika metoder för att läsa innehållet.
'Kolla i hjälpen, sök på "textstream"
Content = fil.readline

'Close the file
fil.Close

'Release the objects
Set fso = Nothing
Set fil = Nothing
End Sub
```

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

## #8 — Johanneshov, 2004-11-26T18:04Z

Tack!

Det duger... helt klart!

;-)

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

---

Tråden på webben: https://www.webforum.nu/amne/databaser-sql/116744-filtrera-en-txtfill-till-excel-access-för-analys
