Versionsnr. tilføjes en fil

Versions nummeret findes i disse 3 variabler og kan til enhver tid læses fra programmet.

App.Major & "." & App.Minor & "." & App.Revision

Og hvis det ikke er programmets version du vil have ind, kan du jo indføre en linie:

Filnr = FreeFile
  Open Sti & Filnavn For Output As #Filnr
      Write #Filnr, myVersion
      Write #Filnr,    osv.

...og senere indlæse samme efter samme princip:

      input #Filnr, myVersion
      input #Filnr,    osv.

Hvis der er tale om et variabelt antal linier, skal myVersion-linien bare stå udenfor en eventuel løkke.

Du kan jo også bare give filen navnet <EtEllerAndet_ååmmddttmmss.abc>, dvs. bruge et tidsstempel - så kan du også se hvor gemmel filen er.
Tidsstemplet kan også skrives inde i selve filen.

Open Sti & "EtEllerAndet" + Cstr(format(Date(), "yymmdd")) + Cstr(format(Time, "hhmmss")) + ".abc" For Output As #Filnr

Du får point for dit svar fordi du ledte mig på sporet. Man kan jo bare lade første linie kun indeholde et ver. nr og efterfølgende kun åbne filen og læse første linie. derved undgår man fejl. Mange gange er løsningen mere simpel end godt er.  tak.