ho risolto così:

codice:
Public Sub lang(riga)  frase= ""  ilfile=server.MapPath("/lang/" & session("lng")& "/matricola.lng")   Set file = CreateObject("Scripting.FileSystemObject")   If file.FileExists (ilfile) =true then   Set ilfile = file.OpenTextFile(ilfile, 1, False, False)   counter=0   do while not ilfile.AtEndOfStream   counter=counter+1   illine=ilfile.readline   if counter = riga then   frase=illine  response.write frase  ilfile.Close   set ilfile=nothing   set file=nothing   exit sub  end if  loop   ilfile.Close   end if  set ilfile=nothing   set file=nothing   end sub
e poi quando voglio richiamare una variabile:
codice:
Call lang(7)
7 è la riga del file
che ne pensi?