---
title: "Visa en textfil baserat på datum som namn:"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/159103-visa-en-textfil-baserat-på-datum-som-namn"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Megaman"
published: "2007-04-10T17:57:20.000Z"
updated: "2007-04-11T17:06:35.000Z"
replies: 3
views: 413
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/159103-visa-en-textfil-baserat-på-datum-som-namn"
---

# Visa en textfil baserat på datum som namn:

## #1 — Megaman, 2007-04-10T17:57Z

Hej på er!!!!

Jag skulle vilja få veta hur man läser från en fil som har ett datum som namn t. ex. 2007-04-10.txt och skriva ut allt som finns i den textfilen finns det ingen fil så med dagens datum så skall den inte skriva ut något alls.

Alltså jag vill kolla med dagens datum, sedan kolla om det finns en textfil med det datumet.txt och visa den om det är dagens datum som filnamnet har och skriva ut den.

Via FSO

Jag vore mycket tacksam om någon har lust att göra ett exempel åt mig...

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

## #2 — @nders, 2007-04-10T18:17Z

```
set oFSO = Server.CreateObject("Scripting.FileSystemObject")
sFileName = Year(date) & "-" & right("0" & Month(date), 2) & "-" right("0" & Day(date), 2) & ".txt"
if oFSO.FileExists(Server.Mappath(sFileName) then
     ' Filen finns, skriv ut innehållet!
     set oFile = oFSO.OpenTextFile(Server.Mappath(sFileName))
     Response.write oFile.ReadAll
     oFile.Close : set oFile = Nothing
end if
set oFSO = Nothing
```

Skrivet helt otestat rätt ur huvet, men kanske något att börja med...

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

## #3 — Megaman, 2007-04-11T15:07Z

Det fungerade precis som det skulle fick bara ändra på 2 ställen annars så funkade det perfect @nders som vanligt när du gör något.

```
set oFSO = Server.CreateObject("Scripting.FileSystemObject")
sFileName = Year(date) & "-" & right("0" & Month(date), 2) & "-" [B]&[/B] right("0" & Day(date), 2) & ".txt"
if oFSO.FileExists(Server.Mappath(sFileName)[B])[/B] then
     ' Filen finns, skriv ut innehållet!
     set oFile = oFSO.OpenTextFile(Server.Mappath(sFileName))
     Response.write oFile.ReadAll
     oFile.Close : set oFile = Nothing
end if
set oFSO = Nothing
```

Fick bara lägga till ett & och ) vid det fetmarkerade annars så var det klockrent

Stort tack Anders

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

## #4 — @nders, 2007-04-11T17:06Z

Great! :)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/159103-visa-en-textfil-baserat-på-datum-som-namn