sætte tegn ind i en fil på bestemte pladser

Tekst = left(tekst,1545) & "E" & right(tekst,len(tekst)-1545)

hov det var kun i en tekst-streng, ikke i en fil

er Tekst og tekst det samme??

er det samme variabel?

Ja det er!

Kik på koden, det siger sig selv... Først tager man de første 1545 tegn - indsætter et E - og tager resten af tegnene, fra plads 1545

Du kan evt. læse hele filen ind i en variabel (string) ved navn Tekst således:

  Dim Filnummer as integer
  Dim Tekst as String
  Filnummer = FreeFile
  Open "C:\Min_fil.txt" For Input As #Filnummer
  Tekst = Input(LOF(1), 1)
  Close #Filnummer

Altsammen forudsætter, at du bruger almindelige tekstfiler (ikke binære)

Nu ved jeg ikke hvad det er for en mystisk fil du skal sætte et bogstav ind i, men i ovenstående skal du tage højde for linieskift, tabulatorer, mellemrum osv. i filen. Men det må du have overvejet, når du ved, at den plads du søger har et bestemt nummer :o)

Ellers kan du læse filen karakter for karakter, og skippe fx. linieskift, mellemrum osv. Står det hele derimod som een lang linie i en tekst-fil, er der ingen problemer what so ever...

det ser godt ud..., jeg har tænkt på linieskift etc. jeg har tænkt mig at replace dem, tak for hjælp

/jsc