I want to have a mathematical model on the internet. You can see the source code below (this one works, but read on-->). My problem is that I get the following error when I change the loopnumber of 100 to 10000000:<BR><BR>Microsoft VBScript runtime (0x800A0006)<BR>Overflow<BR><BR>The model needs to be run 10000000 times, so what can I do about it? The output will not be used to display a table like this example, but will be used to draw a graph using a component.<BR><BR><BR><%<BR>Option Explicit<BR><BR>// Start changing numbers. I use 100 here and it works, <BR>// but I want 10000000 !! Also change the Array numbers<BR>Dim times<BR>times = 100<BR>Dim N_one(100)<BR>Dim N_two(100)<BR>Dim N(100)<BR>Dim P_one(100)<BR>Dim P_two(100)<BR>Dim N_devide_N(100)<BR>Dim time(100)<BR><BR>// Stop changing numbers here<BR><BR>dim i<BR>dim pi<BR>dim mi<BR>dim fi<BR><BR><BR>dim n1 <BR>dim n2 <BR>Dim strValue<BR><BR><BR><BR>// Variables which can be altered from user input in later stage<BR> i = Array(0,1,2)<BR> Pi = Array(0.1,0.2,0)<BR> Mi = Array(0,5,30)<BR>Fi = Array(0.5,3)<BR>N1 = 10<BR>N2 = 10<BR>// End variabels<BR><BR>%><BR><HTML><BR>&# 060;BODY><BR><BR><table width="400" border="0" cellspacing="0" cellpadding="0"><BR> <tr><BR> <td>time</td><BR> <td>N1</td><BR> <td>N2</td><BR> <td>N</td><BR> <td>P1</td><BR> <td>P2</td><BR> <td>N'/N</td><BR> </tr><BR> <BR> <tr><BR> <td><% <BR> time(0) = 0<BR> Response.Write time(0) %></td><BR> <td><% <BR> <BR> N_one(0) = N1<BR> Response.Write N_one(0)<BR> <BR> %></td><BR> <td><% <BR> N_two(0) = N2<BR> Response.Write N_two(0)<BR> <BR> %></td><BR> <td><% <BR> N(0) = N_one(0) + N_two(0)<BR> Response.Write N(0)<BR> <BR> %></td><BR> <td><% P_one(0) = N_one(0)/N(0) <BR> Response.Write P_one(0)<BR> %></td><BR> <td><% P_one(0) = N_two(0)/N(0) <BR> Response.Write P_one(0)<BR> %></td><BR> <td>-</td><BR> </tr><BR> <BR> <BR> <BR> <% <BR>For i = 1 To times %><BR> <tr><BR> <td><% <BR> Time(i) = i<BR> Response.Write Time(i) %></td><BR> <td><% <BR> <BR> N_one(i) = N_one(i-1)*Fi(0)+N_two(i-1)*Fi(1)<BR> Response.Write N_one(i)<BR> <BR> %></td><BR> <td><% <BR> N_two(i) = N_one(i-1)*Pi(1)<BR> Response.Write N_two(i)<BR> <BR> %></td><BR> <td><% <BR> N(i) = N_one(i) + N_two(i)<BR> Response.Write N(i)<BR> <BR> %></td><BR> <td><% <BR> P_one(i) = N_one(i)/ N(i)<BR> Response.Write P_one(i)<BR> <BR> %></td><BR> <td><% <BR> P_two(i) = N_two(i)/ N(i)<BR> Response.Write P_two(i)<BR> <BR> %></td><BR> <td><% <BR> N_devide_N(i) = N(i)/ N(i-1)<BR> Response.Write N_devide_N(i)<BR> <BR> %></td><BR> </tr><BR> <% Next<BR>%><BR></table><BR></BODY><BR></HTML> <BR><BR>