---
title: "FSO"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/55145-fso"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Asa"
published: "2002-10-04T21:24:45.000Z"
updated: "2002-10-04T22:02:34.000Z"
replies: 7
views: 252
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/55145-fso"
---

# FSO

## #1 — Asa, 2002-10-04T21:24Z

Hur skriver jag ut de 300 senaste raderna ifrån en txt fil?

Denna kod har jag nu:

```
   set fil = fso.OpenTextFile(Server.Mappath("chat.txt"), 1 )
   arrFsoLines = Split(fil.ReadAll, vbcrlf)

   For i = 1 To ubound(arrFsoLines)%>
     <%=arrFsoLines(i)%><br>
   <%Next

   fil.Close
```

Och hur får jag scrollen å komma längst ner efter varje messpostning eller reload?

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

## #2 — LarsG, 2002-10-04T21:29Z

På a svarar jag

```
set fil = fso.OpenTextFile(Server.Mappath("chat.txt"), 1 )
   arrFsoLines = Split(fil.ReadAll, vbcrlf)

   if ubound(arrFSOlines) >= 299 then s = ubound(arrFSOlines) - 299  else s = 0
   For i = s  To ubound(arrFsoLines)%>
     <%=arrFsoLines(i)%><br>
   <%Next

   fil.Close
```

på b svarar jag 

?

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

## #3 — Asa, 2002-10-04T21:31Z

så man slipper scrolla ner till senaste inlägget. Den ska automatiskt komma dit! Nån sa nåt om denna kodsnutt:

\<script\>
window.scrollTo( 0, 400000 );
\</script\>

Men den kommer inte ner längt ner :/

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

## #4 — LarsG, 2002-10-04T21:34Z

Det är nog bättre att ställa den frågan i Javascript-forumet.

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

## #5 — Asa, 2002-10-04T21:36Z

Ja - kanske det! Tackar för ditt svar på a :)

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

## #6 — Asa, 2002-10-04T21:51Z

Hur får jag \<br\> i min kod att inte printas ut efter sista messet?

```
   arrFsoLines = Split(fil.ReadAll, vbcrlf)

   if ubound(arrFSOlines) >= 300 then s = ubound(arrFSOlines) - 300 else s = 0
   For i = ubound(arrFsoLines) To s step -1)%>
     <%=arrFsoLines(i)%><br>
   <%Next

   fil.Close
```

I detta fall kommer det ett \<br\> längst upp som jag inte vill ha!

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

## #7 — LarsG, 2002-10-04T21:55Z

```
<%=arrFsoLines(i)%>
<%if s <> i then response.write "<br>"
```

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

## #8 — Asa, 2002-10-04T22:02Z

Hmm - blir ändå en \<br\> :(

Fick en javascriptkod om det jag skrev förut scrollTo så jag kör att de skrivs ut uppifrån å ner till en början!

Men om nån kommer på nåt så e jag tacksam!

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/55145-fso