%@ TRANSACTION=Required%>
<%
response.buffer=true
server.scripttimeout=40
%>
loop4.asp
<%
DO UNTIL counter=400
counter=counter+1
response.write counter & "
"
LOOP
response.flush
response.write "Script Exexuted without incident!"
%>
<%
Sub OnTransactionAbort()
response.clear
Response.Write "The Script Timed Out"
end sub
%>