<% Function FindNavne(s) Response.Write "Det virker med " & s End Function Set varFunc = GetRef("FindNavne") Call varFunc("ABC") %>