---
title: "Funderingar runt textfiler"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/11923-funderingar-runt-textfiler"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "erka"
published: "2001-10-03T10:38:00.000Z"
updated: "2001-10-03T12:46:00.000Z"
replies: 8
views: 258
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/11923-funderingar-runt-textfiler"
---

# Funderingar runt textfiler

## #1 — erka, 2001-10-03T10:38Z

Jag har lite tankar om textfiler och asp.

Är det möjligt att tex ha en .txt fil som mall som ser ut så här

```
[rubrik]
Skriv rubriken här
[/rubrik]
[ingress]
Skriv ingressen här
[/ingress]
[brodtext]
Skriv brödtexten här
[/brodtext]
```

För att sedan hämta ut informationen som från en databas, hämta ut enbart det som står mellan \[brodtext\] och \[/brodtext\]. Vill undvika xml just nu, men det är ju ett användningsområde. Jag vet att i pearl är det enkelt och kraftfullt att söka igenom text filer hur är det med asp och textfiler?

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

## #2 — Janspeed, 2001-10-03T11:09Z

ASP är himla smidigt i textfilhantering enligt mig. 

Att skapa en liknande fil är inga problem. Jag har använt en liknande då jag inte hade tillgång till en databas.

/JANspeed

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

## #3 — erka, 2001-10-03T11:12Z

Tänkte göra ett artikel arkiv, och vill undvika db för att personer ska kunna skriva text filen på sin dator och sen bara ladda upp den, söka igenom katalogen och skriva ut artiklarna etc.

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

## #4 — Vide, 2001-10-03T11:28Z

Jag har byggt en liten parser för det där, ligger under script: <http://script.webforum.nu/wf/Forum1/HTML/000069.html>

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

## #5 — erka, 2001-10-03T12:34Z

Vide

Jag försöker att bygga om ditt script lite för att passa mig perfekt. Tack för scriptet föresten. Det är ju så att jag ska gå neråt i ett katalog träd och i första steget, lista kataloger som finns foldern "artiklar" Sen ska på nästa sida skriva ut de rubrikerna som finns i textfilerna i den valda katalogen, jag måste ju därför skicka med Pathen till din funktion. Men något blir fel

Nu ser sidorna ut på följande sätt
Artiklar.asp

```
<b>Kataloger:<br></b>
<%
folderspec = "c:\inetpub\wwwroot\newweb\tools\artiklar\"
Set ff = CreateObject("scripting.FileSystemObject")
Set fw = ff.GetFolder(folderspec)
Set fsf = fw.subfolders
For Each whatever in fsf
Response.write"<a href=""VisaKatalog.asp?KatalogNamn="& whatever.name & """>"& whatever.name&"<br>"
next
%>
```

VisaKatalog.asp

```
<!--#include virtual="/Tools/artiklar/backbone.asp" -->
<b>Innehåll:<br></b>
<%
strKatalogNamn = Request.Querystring("KatalogNamn")
strRootPath = Server.MapPath("\")
strFolder = "\tools\artiklar\"& strKatalogNamn &"\"
strFolderPath = strRootPath & strFolder

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder(strFolderPath)

'**Loopa igenom katalogen**'
	For Each File IN objFolder.Files
		strFileName = File.Name
'** Börja hämta ut de olika rubrikerna **'		
		strC = ReadFile(strFileName,strFolderPath)
		Response.Write br(getText(strC,"[rubrik]",true))&"<br>"
'** Hoppa till Nästa fil**'
	Next
%>
```

Backbone.asp (tar nu bara med funktionen för att få rätt katalog och fil att söka igenom)

```
Function ReadFile(file,strPath)	
Set fso = CreateObject("Scripting.FileSystemObject")	
strPath = strpath &""& file	
ReadFile = fso.OpenTextFile(strPath, 1).ReadAll	
Set fso = Nothing
End Function
```

Som du ser försöker jag på VisaKatalog.asp skicka med ett värde (sökvägen) till funktionen Readfile i backbone.asp för filerna som ska kollas igenom.

Men jag har ju tänkt fel någonstanns, vart ? Jag får 

```
Microsoft VBScript runtime error '800a0035' 

File not found 

/Tools/artiklar/backbone.asp, line 6
```

Jag får fram första rubriken men sen måste något gå snett när jag loopar.
Tackar så länge ;)

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

## #6 — Vide, 2001-10-03T12:42Z

Använd min funktion för att hämta filen, och skicka inte med hela pathen, bara det som kommer efter rooten.

\[R.\] Får du fel igen så kan du skriva ut sökvägen så att du ser vad du skall ändra.

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

## #7 — erka, 2001-10-03T12:43Z

Darn it, korkade mig löste det genom att skriva 

```
Function ReadFile(file,strPath)	
Set fso = CreateObject("Scripting.FileSystemObject")	
strArtikel = strpath &""& file	
ReadFile = fso.OpenTextFile(strArtikel, 1).ReadAll	
Set fso = Nothing
End Function
```

Fin fint script vide!

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

## #8 — erka, 2001-10-03T12:44Z

Vide, är det korkat att göra som jag gjorde nu, skicka med hela sökvägen ?

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

## #9 — Vide, 2001-10-03T12:46Z

Nja, jag anser att du skall försöka att hålla så mycket som möjligt inne i funktionen, och server.mappath ger dig ju alltid rooten (/), så den kan du ha i funktionen.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/11923-funderingar-runt-textfiler