CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

secher35 Nybegynder

28. juli 2009 - 10:27 Der er 8 kommentarer og
1 løsning

FSO Read from file

Hej
Jeg er stadig ret ny til FSO og har forsøgt i et par dage at få det her til at virke, det plejer at virke på denne måde.
Jeg skal ned i en txt fil og dele den op i arrays, men først vil jeg lige have den til at printe det hele ud til mig med dette script:

Dim fso, f, filespec
Set fso = Server.CreateObject("Scripting.FileSystemObject")
filespec = Server.Mappath("/ninki2/opgaver/1022.txt")
Set f = fso.OpenTextFile(filespec,1)

Response.Write "" & f.ReadAll & ""

f.Close

her ligger den fil den læser fra:
www.secher.me.uk/ninki2/opgaver/1022.txt

og her ligger scriptet:
www.secher.me.uk/ninki2/jobkort.asp

som i kan se på sidst nævnte adresse så skriver den kun det første nummer i filen.

Er her nogen der kan hjælpe så vil i bare redde min dag.. :)

Synes godt om

fennec Nybegynder

28. juli 2009 - 10:37 #1

Ja det burde ellers virke. Prøv med readline i stedet:

Set MyFile = fso.OpenTextFile(FileName, ForReading)

' Read from the file and display the results.
Do While MyFile.AtEndOfStream <> True
TextLine = MyFile.ReadLine
Document.Write TextLine & "<br />"
Loop

Synes godt om

keysersoze Guru

28. juli 2009 - 10:37 #2

http://web-dev.dk/post/2008/10/FileSystemObject---FSO.aspx

Synes godt om

secher35 Nybegynder

28. juli 2009 - 10:52 #3

Fennec: Den vil ikke godtage "Document.Wirte" men når jeg ændre til dig script og ellers laver Document om til Response, laver den samme fejl.

keysersoze: jeg har ændres mit script til:
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
'Definering af hvilken fil vi vil skrive i
Set FILE = FSO.OpenTextFile("../ninki2/opgaver/1022.txt", 1)
'Udskriv alt indhold fra filen
Response.Write FILE.ReadAll
FILE.Close
Set FILE = Nothing
Set FSO = Nothing

som vist i dit link. Den kommer stadig med samme fejl.. :/

Synes godt om

fennec Nybegynder

28. juli 2009 - 11:09 #4

Ahhh. Filen er gemt i unicode og ikke ascii. Du skal derfor åbne den i unicode (default er ascii):

false betyder at den ikke skal oprette filen hvis den ikke eksistere og -1 betyder unicode:

Set f = fso.OpenTextFile(filespec,1,false,-1)

Synes godt om

fennec Nybegynder

28. juli 2009 - 11:09 #5

http://msdn.microsoft.com/en-us/library/314cz14s%28VS.85%29.aspx

Synes godt om

secher35 Nybegynder

28. juli 2009 - 11:11 #6

åhh det var da fantastisk.. tusind tak.. :) hehe smid et svar

Synes godt om

softspot Forsker

28. juli 2009 - 11:14 #7

Prøv lige at dette:

Set FSO = Server.CreateObject("Scripting.FileSystemObject")
'Definering af hvilken fil vi vil skrive i
Set FILE = FSO.OpenTextFile("../ninki2/opgaver/1022.txt", 1)
'Udskriv alt indhold fra filen
altdethele = FILE.ReadAll
FILE.Close
Set FILE = Nothing
Set FSO = Nothing

response.write altdethele

Jeg har lige på fornemmelsen at det har noget at gøre med, at filen ikke er lukket og hele indholdet dermed ikke læst, idet du udskriver det... (lidt søgt, men man kan aldrig vide med ;D)

Synes godt om

softspot Forsker

28. juli 2009 - 11:15 #8

Hold da op! Det gik hurtigt med at få flere indlæg på denne tråd! :D

Synes godt om

fennec Nybegynder

28. juli 2009 - 11:20 #9

.o) <-- One Eyed Cack

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP	4	26/04/202417:16	26/04/202418:37
JSON Af ingeman i ASP	3	07/04/202417:53	08/04/202412:09
Vis detaljeret fejlkoder Af poulmadsen i ASP	6	09/03/202418:16	10/03/202417:59
IIS virker ikke på asp sider... Af bsn i ASP	10	15/10/202313:12	18/10/202308:48

Se alle spørgsmål i kategorien Opret spørgsmål

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

Alle kategorier på Eksperten

Seneste artiklerRSS