<% Dim i Dim strTemp Function SayHello(nTimes) For i = 1 To nTimes strTemp = strTemp & i & ". Hello World!<BR>" Next SayHello = strTemp End Function strHello = SayHello(10) Response.Write strHello %>