27
Concatenate 10,000 strings: ASP
l<%
lResponse.Write("Start "+CSTR(NOW())+"<br>")
lDIM s,i,nStart
lnStart=TIMER
ls=""
lFOR i=1 TO 20000
l  s=s+CSTR(i)
lNEXT
lResponse.Write("Done "+CSTR(TIMER-nStart)+" "+CSTR(LEN(s))+" 20,000<br>")
l%>
l
lOn 850 MHz PIII: 7.5 seconds