Passare un file ad una funzione

[gensole]

Ho trovato questa funzione che estrae da una stringa tutto quello che è compreso fra 2 caratteri o parti di stringa!
Ecco il mio problema è che a questa funzione non devo passare una stringa che ho preimpostato ma bensì un file!
Come si fa??????

<%
Function ExtractStr(s, strDa, strA, setTrim)
PosDa = InStr(s, strDa)
PosA = InStr(s, strA)
If PosA > 0 And PosDa > 0 Then
s = Mid(s, PosDa + Len(strDa), PosA - PosDa - Len(strDa))
If IsNull(setTrim) = False And setTrim = True Then
ExtractStr = LTrim(RTrim(s))
Else
ExtractStr = s
End If
Else
ExtractStr = ""
End If
End Function
%>