Non so' com'è strutturato il file SAM, ma per leggere e scrivere i files si fa' così:

Dim Percorso as String
Percorso = "C:\File.txt"
'Per scrivere:
Open Percorso for Output as 1
Print #1, "Testo aggiunto al file"
Close #1

'Per leggere:
Dim DatiLetti
Open Percorso for Input as 1
'Questo legge una riga:
Input #1, DatiLetti
'Questo legge tutto il file
DatiLetti = Input(1, Len(1))
Close #1

In questo modo avrai nella variabile DatiLetti il contenuto del file.
Ciao,
Berello