25. november 2002 - 11:58Der er
11 kommentarer og 2 løsninger
script til skrivning i *.txt-fil
Dette script troede jeg der var til at skrive i en txt-fil!?!
<% Dim fso, f, filespec Set fso = CreateObject("Scripting.FileSystemObject") filespec = Server.Mappath("/ungdom/eksempel.txt") Set f = fso.OpenTextFile(filespec,2)
' Skriv tekst i en linie f.Write Request.Form("tekstblok")
' Åbn filen til læsning og Læs linie for linie Set f = fso.OpenTextFile(filespec,1) Do While not f.AtEndOfStream Response.write f.ReadLine & "<br>" Loop f.Close %>
Men jeg kan ikke få det til at virke! Er der nogen der kan hjælpe??
Jeg har samme problem, i windows Xp Pro. Jeg tror måske at problemet ligger i XP - jeg har hørt at det skulle være bedre med iis i win 2k
Synes godt om
Slettet bruger
25. november 2002 - 12:39#3
Hvad er problemet? Du skriver at det ikke virker, men får du en fejl?
Hvis serveren "hænger" skyldes det sandsynligvis at du har Norton Antivirus installeret. Gå ind under Options / Script Blocking og slå dette fra. Genstart derefter IIS.
Okey NU ved jeg det! Jeg har også selv lige bøvlet med det som sagt slå norton fra og gå ind under IIS højre klik og vælg properties > Directory Security og slå anonymouse access fra !
Så skulle det gerne virke... Ellers er der fejl i dit script
<% Dim fso, f, filespec Set fso = CreateObject("Scripting.FileSystemObject") filespec = Server.Mappath("Polle.txt") Set f = fso.OpenTextFile(filespec,2)
' Skriv tekst i en linie f.Write "Hej med dig "
' Åbn filen til læsning og Læs linie for linie Set f = fso.OpenTextFile(filespec,1) Do While not f.AtEndOfStream Response.write f.ReadLine & "<br>" Loop f.Close %>
Okey NU ved jeg det! Jeg har også selv lige bøvlet med det som sagt slå norton fra og gå ind under IIS højre klik og vælg properties > Directory Security og slå anonymouse access fra !
Så skulle det gerne virke... Ellers er der fejl i dit script
<% Dim fso, f, filespec Set fso = CreateObject("Scripting.FileSystemObject") filespec = Server.Mappath("Polle.txt") Set f = fso.OpenTextFile(filespec,2)
' Skriv tekst i en linie f.Write "Hej med dig "
' Åbn filen til læsning og Læs linie for linie Set f = fso.OpenTextFile(filespec,1) Do While not f.AtEndOfStream Response.write f.ReadLine & "<br>" Loop f.Close %>
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.