Avatar billede idiotbarn Nybegynder
19. november 2002 - 20:41 Der er 11 kommentarer og
1 løsning

Gem i UTF-8 format med fileobjekt.

Ja...Hvordan gemmer man i UTF-8 format med asp når man gemmer ned i en tekstfil...Jeg har scriptet:
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("d:\webs\xxx\news.txt",1)
Do While not f.AtEndOfStream 
Response.write f.ReadLine & "<br>" 
Loop
Avatar billede hossein Nybegynder
19. november 2002 - 21:03 #1
prøv det:
Set a = fs.CreateTextFile("c:\testfile.asp", True)
Avatar billede idiotbarn Nybegynder
19. november 2002 - 21:18 #2
men det er når jeg gemmer...jeg har en txt fil i UTF-8 format...bliver teksten man skriver ned i den fil automatisk til samme format?
Avatar billede hossein Nybegynder
19. november 2002 - 21:25 #3
Ja, når du anvender CreateTextFile så gemmes som UTF-8 Automatisk hvis du sætter den til true.
I koreansk eller kinisisk er der nogle problemer med nogle bogstaver, da det er dansk text du har, tror jeg ikke at du får problemer.
Avatar billede hossein Nybegynder
19. november 2002 - 21:44 #4
Set a = fs.CreateTextFile("c:\testfile.asp", True, True)
den 1. true overwrite, den anden er til unicode
Avatar billede idiotbarn Nybegynder
19. november 2002 - 22:02 #5
Kan man også gøre det med:
Set f = fso.OpenTextFile("d:\webs\xxx\news.txt",1, true)
Avatar billede hossein Nybegynder
19. november 2002 - 22:19 #6
FileSystemObject.OpenTextFile(fname,mode,create,format)
mode:
1=ForReading - Open a file for reading. You cannot write to this file.
2=ForWriting - Open a file for writing.
8=ForAppending - Open a file and write to the end of the file.
create:
false er default, så true er rigtig
format:
0 åben filen som default (Ascii)
-1 åben some UniCode
-2 åben som system default
Avatar billede idiotbarn Nybegynder
19. november 2002 - 22:22 #7
Jeg skal jo ikke lave en tekstfil...den er der...jeg skal bare gemme i den...
Avatar billede hossein Nybegynder
19. november 2002 - 23:09 #8
Set f = fso.OpenTextFile("d:\webs\xxx\news.txt",1, true)
1 skal blive 2 hvis du vil overskrive
1 skal blive 8 hvis du vil skrive i bunden af filen
Avatar billede idiotbarn Nybegynder
19. november 2002 - 23:28 #9
ok...En sidste ting...er det ikke muligt at skrive i toppen af filen?
Avatar billede idiotbarn Nybegynder
19. november 2002 - 23:32 #10
Eller det er faktisk lige meget...tak
Avatar billede hossein Nybegynder
19. november 2002 - 23:36 #11
hehe :) ok!
Avatar billede idiotbarn Nybegynder
20. november 2002 - 11:22 #12
NU er det en sidste ting...
Skal det være sådan...(Jeg har nemlig ikke så mange muligheder for at prøve)
Set f = fso.OpenTextFile("d:\webs\xxx\news.txt",1, true, -2)
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