Si, l'idea di partenza è proprio quella, potresti aggiungere un replace:
codice:
Function Include(fileName)
    Dim strText
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set f = fso.OpenTextFile(fileName)
    strText = f.ReadAll()
    strText = Replace(strText,"<" & "%","")
    strText = Replace(strText,"%" & ">","")
    f.Close
    ExecuteGlobal strText
End Function

Include("Pagina.asp")
Naturalmente funziona solo con codice asp.

Dai un'occhiata alla classe che ho linkato.

Con quella puoi anche includere pagine asp e html e processa gli include interni alla pagina

E con un po' di fantasia puoi anche arrivare a creare nuove direttive, per esempio è supportato include url