Keskustelu: Ohjelmointikysymykset: QB: Rivien poisto tiedostosta

Miten tietystä kohtaa tiedostoa saa tietyn verran rivejä poistettua? Ja sen jälkeen pitäisi saada uudet tiedot tilalle. QB

huoh... näitä tällaisia kysytään kaksi kertaa päivässä. lataa tiedosto ekaksi taulukkoon ja sitten looppaat ne takaisin ja samalla katot mikä solu pitää irrottaa pois, jos pitää niin et laita sitä tiedostoon...

niin ja sitten vielä koodi jos haluat varmaan kyllä joo... kas tässä yksi suoraan hatustani:

dim rivit$(1000) 'maksimi määrä rivejä, muuta tarpeisiisi
open tiedosto$ for input as #1
do until eof(1)
    line input #1,rivit$(i)
    i=i+1
loop
close
open tiedosto$ for output as #1
for j=0 to i
    if (rivit$(i)<>"väärä")and(i<>rivinrojokaeisaatullatiedostoon) then print #1,rivit$(i)
next