27
Concatenate 10,000 strings: ASP
l
<%
l
Response.Write("Start "+CSTR(NOW())+"<br>")
l
DIM s,i,nStart
l
nStart=TIMER
l
s=""
l
FOR i=1 TO 20000
l
s=s+CSTR(i)
l
NEXT
l
Response.Write("Done "+CSTR(TIMER-nStart)+" "+CSTR(LEN(s))+"
20,000<br>")
l
%>
l
l
On 850 MHz PIII: 7.5 seconds