Utilizando el nombre de función que mencionaste el codigo sería el siguiente:
Código PHP:
Function TraeFuente(URL)
Set Fuente = Server.CreateObject("Microsoft.XMLHTTP")
Page = "http://" & URL
Fuente.Open "GET", Page, False
Fuente.Send
TraeFuente = "<xmp>" & Fuente.responseText & "</xmp>"
Set Fuente = Nothing
End Function
SourceCode = TraeFuente("www.cnn.com")
Eso es todo.