...okay, her er hele dynen ganske ukritisk, som den p.t. ser ud:
<html>
<title>Læse fra tekstfiler</title>
<head>
<link rel="stylesheet" type="text/css" href="brsnj-stylesheet.css">
<%
Set fso = CreateObject("Scripting.FileSystemObject")
for i = 1 to 9
varTxtSti = "tekster\brs\brs" & i & ".txt"
filespec = server.mappath(varTxtSti)
ReDim f(i)
Set myTextStream = fso.OpenTextFile( filespec, 1 )
Set f(i) = myTextStream
next
%>
</head>
<body>
<a name="top"> </a>
<ul class="menu">
<li><a href="om-brsnj.asp">Om Nordjylland</a></li>
<li><a href="forste-dag.asp">Dagen</a></li>
<li><a href="hverdagen.asp">Hverdagen</a></li>
<li><a href="uddannelser.asp">Uddannelser og kompetencer</a></li>
<li><a href="okonomi.asp">Løn og økonomi</a></li>
<li><a href="vejledning.asp">Råd og vejledning</a></li>
<li><a href="udvalg.asp">Udvalg</a></li>
<li><a href="fritiden.asp">Fritiden</a></li>
<li><a href="kontakt.asp">Kontakt</a></li>
<li><a href="links.asp">Links</a></li>
</ul>
<div id="indhold">
<br>
<div id="undermenu"> <a href="#brsnj">[Om BRSNJ]</a> <a href="#placering">[Placering
mv]</a> <a href="#vagtstyrken">[Vagtstyrken]</a> <a href="#internationale">[Internationale
indsatser]</a> <a href="#logo">[Afdelingsmærke/logo]</a> <a href="#organisering">[Organisering]</a> <a href="#historie">[Historie]</a>
</div>
<br>
<br>
<br>
<br>
<div id="overskrifter"><br>
<a name="brsnj">Om Nordjylland</a>
</div>
<br>
<%
Do While not f1.AtEndOfStream
Response.write f1.ReadLine & "<br>"
Loop
%>
<br>
<a href="#top">[gå til top - klik her...]</a>
<br>
</div>
<div id="foto-oppe"><img src="images/brsnj-tegning.jpg" width="300" height="182"></div>
<%
'for i=1 to 9
f1.Close
'next
%>
</p>
</body>
</html>
