Avatar billede simtex Nybegynder
27. marts 2002 - 22:03 Der er 13 kommentarer og
1 løsning

Hvordan for man ASP til at læse fra en txt fil?

Hej

Jeg køre Win2k, med IIS 5.0 men jeg kan ikke finde ud af at få f.eks. følgende kode til at virke:
<html>
<title>Læse fra tekstfiler</title>
<head>
</head>
<body>
<%
Dim fso, f, filespec
Set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.Mappath("\games.txt")
Set f = fso.OpenTextFile(filespec,1)

' Læs linie for linie indtil slutningen af filen
Do While not f.AtEndOfStream
  Response.write f.ReadLine & "<br>"
Loop

f.Close
%>
</body>
</html>
Hvad skal jeg sætte op, for når jeg prøver siden søger den bare i en uendelighed....
Avatar billede sn0wflake Nybegynder
27. marts 2002 - 22:06 #1
Dette virker (har i det mindste virket i ca. 2 år nu hos mig :)

Set objTextStream = objFS.OpenTextFile(Server.MapPath(strTEMP))
Response.Write objTextStream.ReadAll
objTextStream.Close
Set objTextStream = Nothing
Avatar billede sn0wflake Nybegynder
27. marts 2002 - 22:07 #2
strTEMP = URL til tekstfilen. F.eks. "/log/readme.txt". Server.MapPath konverterer URL'en til et stinavn på serverens harddisk.
Avatar billede western-amigo Nybegynder
27. marts 2002 - 22:17 #3
du kan også læse den tutorial:

http://www.html.dk/tutorials/asp/lektion15.asp
Avatar billede simtex Nybegynder
27. marts 2002 - 22:22 #4
Virker aldrig en skid...
Avatar billede simtex Nybegynder
27. marts 2002 - 22:23 #5
kan man mangle et komponent der skal fortolke en txt fil?
Avatar billede sn0wflake Nybegynder
27. marts 2002 - 22:27 #6
Hvad melder ASP af fejl?
Avatar billede simtex Nybegynder
27. marts 2002 - 22:31 #7
til din kode: Set objTextStream = objFS.OpenTextFile(Server.MapPath("/log/games.txt")) siger den:
Error Type:
Microsoft VBScript runtime (0x800A01A8)
Object required: ''
/net/myfirst.asp, line 19
Avatar billede simtex Nybegynder
27. marts 2002 - 22:34 #8
og alle koder der indeholder FileSystemObejct fucker den op, med totalt lange load tider uden der sker noget...Og hvis jeg så stopper den efter lang tid siger den at der ikke er flere users connections
Avatar billede sn0wflake Nybegynder
28. marts 2002 - 05:55 #9
Den første linie manglede. Sorry <:)


Set objFS = CreateObject("Scripting.FileSystemObject")


Set objTextStream = objFS.OpenTextFile(Server.MapPath(strTEMP))
Response.Write objTextStream.ReadAll
objTextStream.Close
Set objTextStream = Nothing
Avatar billede Slettet bruger
28. marts 2002 - 10:46 #10
simtex: Bruger du Norton Antivirus? Den bruger nemlig "Script Blocking", hvilket får serveren til at "hænge" ved brug af FSO. Hvis du bruger Norton Antivirus, så slå "Script Blocking" fra og genstart din server - så skulle det virke.
Avatar billede simtex Nybegynder
28. marts 2002 - 13:11 #11
hmmmm, ja det kunne være et muligt problem...checker lige
Avatar billede coltau Juniormester
28. marts 2002 - 15:25 #12
Det er ikke så lidt Norton AntiVirus er skyld i. Prøv AVG i stedet for - den er pi .. nem - men til gængæld er den gratis. :-)

http://www.grisoft.com
Avatar billede simtex Nybegynder
30. marts 2002 - 18:48 #13
ok det er fikset og var netop Norton Antivirus' skyld...så hvis du vil have pointene magik så opret lige et svar!
Avatar billede Slettet bruger
30. marts 2002 - 18:49 #14
:)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester