---

<%
Const ForReading = 1
Randomize
intTipNummer = Int(Rnd*71)

Set objFile = Server.CreateObject("Scripting.FileSystemObject")
Set objInStream = objFile.OpenTextFile
(Server.MapPath("vidste_du_at.txt"), ForReading, False, False)
For num = 1 To intTipNummer -1
objInStream.SkipLine()
Next
strRandomTip = objInStream.ReadLine
objInStream.Close
Set objInStream = Nothing

Response.Write strRandomTip
%>

Hvad er der galt med det script?
Ved fejlmelding skriver den:
Microsoft VBScript compilation error '800a03f6'

Expected 'End'

/stats.asp, line 112

Linje 12 er der hvor der står:
Response.Write strRandomTip

hjælp venligst :)

mvh chp

--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

glem det.. :D

Fejlmeddelsen var lidt misvisende for mig, da det íkke var på
linje 12 fejlen lå... =)

--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials