09. december 2004 - 13:45Der er
10 kommentarer og 1 løsning
Konvertering af fil i ASCII-format
Hej Eksperter!
Jeg har en komma-separetet fil i ASCII-format. Yderligere har jeg en ASP-funktion, som viser indholdet af filen. Problemet med ASCII-formatet er tilsyneladende, at det ikke indeholder æ, ø og å.
Set objFSO = CreateObject("Scripting.FileSystemObject") Set F = objFSO.GetFile("wwwfil.dat") Set TextStream = F.OpenAsTextStream(ForReading, TristateFalse)
For each Vare in arrVarenumre Set objFSO = CreateObject("Scripting.FileSystemObject") Set f = objFSO.OpenTextFile(Server.MapPath("wwwfil.dat"), 1) strAll = f.readall strAll = Replace(strAll, """", "") lineARR = Split(strAll, vbCRLF)
For line = 0 to Ubound(lineARR) Dimser = split(lineARR(line) , ",")
'If line > 1 And arrVarenumre(i) = Dimser(0) Then intPris = Replace(Dimser(3), ".", ",") Response.Write Dimser(0) & " - " Response.Write Dimser(1) & " - " Response.Write Dimser(2) & " - " Response.Write FormatNumber(intPris, 2) & "<br>" & vbCRLF 'End If Next Next %>
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.