25
Benchmarks of Simple Web Pages:
Add #s to 10,000,000 - ASP and ASPX (VB)
l<%@ Page language="VB" debug="false" %>
l<%
lResponse.Write("Start <br>")
l'DIM i,j,nStart
lDIM i AS Integer,j AS Long,nStart AS Double
lnStart=TIMER
lj=0
lFOR i=1 TO 1000000
l  j=j+i
lNEXT
lResponse.Write("Done "+CSTR(TIMER-nStart)+" "+CSTR(j)+"<br>")
l%>
l
lFor ASP, omit first (<%@ …>) line and the DIM i AS … line.  FOR ASPX, include the
lfirst line and only one of the two DIM lines.
l
lOn 850 MHz PIII:
l ASP - 1.2 seconds;
l ASPX with DIM i,j,nStart - 1.2 sec;
l ASPX with DIM i AS Integer,j AS Long,nStart AS Double
l (no “variant” data types) - 0.010 sec.