Konvertering af tekstfil

Jeg er ikke helt sikker på hvad du vil ... vil du bruger hver enkelt linie som een post ?

Du kan vel bare bruge

Line Input #1, strVar

så læser du hele linien ind i strVar

(var det det du spurgte om?)

Ahem, vil det sige at der KUN er linefeed (CHR$(10)), ikke Carriage Return (CHR$(13)) (eller CR LF)

Hvis ja, så kan du benytte følgende til at først at lave LF om til CRLF (vbCrLf) i filen, så du efterfølgende kan indlæse linievis til dine variable med Line Input:

http://www.planet-source-code.com/xq/ASP/txtCodeId.10931/lngWId.1/qx/vb/scripts/ShowCode.htm

cstern:> faktisk ER der jo så en feltseperator, nemlig CHR$(10) ..

Jo, nu havde jeg bare tankerne fixeret på Line Input som tilsyneladende kræver en CHR$(13)

*S* nemmerlig ..

->cstern

Hvordan var det nu lige at jeg kalder de procedurer som ligger i linket?

Dim strFilnavn As String, strError As String

strError = \"\"
strFilnavn = \"MinInptfil.txt\"

If ReadTheFile(strFilnavn, strError) Then
  MsgBox strFilnavn & \" er konverteret!\", vbOKOnly, \"Konverter\"
Else
  MsgBox strFilnavn & \" blev ikke konverteret\" & vbCrLf & _
        \"Fejlkoden var: \" & strError, vbOKOnly, \"Konverter\"
End If

Det kan jeg også godt få til at virke nu, men nu ligge landet så at dataene ligger horisontalt, og at disse data vil jeg gerne have til at ligge vertikalt i filen. Der er en endgroup efter hver post. Hvordan grejer jeg lige den?

Jeg tror det letteste er at lave en ny fil, hvor du udskriver posterne en af gangen med en print eller put kommando. Så kan du til sidst lave en backup af (omdøbe) input filen og omdøbe den nye til til at hedde det samme som inputfilen (husk at lave check, så du ikke overskriver inputfilen ved et uheld, f.eks hvis \"omdøb\" gik galt i backup delen).

Hvordan kan jeg få vb til at læse det som en enkelt post? En post hænger sammen med flere linier(horisontalt) posten starter med en group.. og slutter med en endGroup?

Det er svært at svare på når man ikke kender dine data konkret. Er der f.eks. altid det samme antal felter i posterne osv. Hvis du kunne opette en Type definition som kunne indeholde en post kan du udskrive denne på en gang til en ny fil, i binært format. Eller udskrive felterne linie for linie, eller hvad ved jeg. Det er som sagt svært uden at kende forholdene.

Men hvordan får jeg vba til at til at læse linie for linie? Og det er samme format hver gang!