Visual Basic 6 - Problema di lettura/scrittura records in modalità random

Sto lavorando su un programma gestionale tramite ausilio di archivi, l'utente finale ha la possibilità di visualizzare (tramite l'ausilio delle listbox) tutti i records messi e di ordinarli in base alle proprie necessità, proprio per questo motivo ho inserito in un frame le varie opzioni, esempio "ordina per codice" "ordina per titolo" ect, l'ordinamento viene effettuato leggendo in modalità sequenziale il file, per poi scrivere i dati in un file con accesso random, questi a loro volta vengono riletti e riordinati per poi esser riscritti in modo ordinato in un'altro file in modo sequenziale. Di seguito il codice:

App.Path & "\Archivi\" & comboCat & "-Random.temp" For Random As #2
  Scarto = N
  Do
     Scarto = Int(Scarto / 2)
     If Scarto < 1 Then Exit Do
     J = 1
     K = N - Scarto
     Do
       i = J
         Do
           m = i + Scarto
           Get #2, i, Cod, Tit, TitO, Naz, Gen1, Gen2, Regia, SitU, SocN, Prod, Distr, Trama, Copertina: Get #2, m, Cod2, Tit2, TitO2, Naz2, Gen12, Gen22, Regia2, SitU2, SocN2, Prod2, Distr2, Trama2, Copertina2
           If Cod <= Cod2 Then Exit Do

Il problema riscontrato è il seguente "Previsto: fine istruzione" precisamente in "Cod," nel primo "Get #2" (ovviamente anche nel secondo)

Consigli?! Soluzioni!?

Ma cosa è quella enorme Get con tutti quei parametri?

La Get prevede solamente il numero del file, il numero di record, e la variabile da leggere, vedi

msdn.microsoft.com/en-us/library/…(v=VS.60).aspx

La variabile è bene che sia strutturata.

Ok e se io volessi leggere i dati del file?

Esempio, in modo sequenziale uso "Input #1, Var1, Var2, Var3 ect.... in modo random invece cosa dovrei usare?

I dati in modalità random si scrivono con la

Put #

e si rileggono con la

Get #

Non mischiare le modalità random e sequenziali.

La Put e la Get devono usare una variabile strutturata.

si ok ma io non devo leggere una solo dato per immetterlo in una sola variabile, ne devo leggere più di uno... quindi come dovrei fare?

Mica ho detto che ne devi leggere/scrivere uno.

Si ma se io scrivo Get #2, Var1, Var2, Var3, Var4 ect mi da errore -.- qualcuno mi può fare un esempio?!

Allora non hai letto quello che ti ho scritto sulla Get ...

La Get accetta il numero di file, il numero di record e la variabile

Get #2, 12, Rec

vuol dire leggi il record 12 dal file 2 e mettilo in Rec (che è la variabile strutturata)