Library code snippets
ASP Fractal
HTML Output
ASP Code
<%
Dim depth,color,size
depth=5
size=1
color="blue"
Call DrawFractal (depth)
Sub DrawFractal (depth)
%>
<table border= "0" cellpadding= "0" cellspacing= "0"><tr><td>
<% Call Iterate (depth) %>
</td></tr><tr><td>
<% Call Iterate (depth) %>
</td><td>
<% Call Iterate (depth) %>
</td></tr></table>
<%
End Sub
Sub Iterate (depth)
If depth > 0 Then
Call DrawFractal (depth-1)
Else
Response.Write "<table cellpadding=""0"" cellspacing=""0"" " & _
" border=""0"" height="""& size &""" width="""& size &""">" & _
"<tr><td bgcolor="""& color &"""></td></tr></table>"
End If
End Sub
%>
Related articles
Related discussion
-
Binary Studio | software development outsourcing Ukraine
by Soft Industry (5 replies)
-
asp Request.QueryString("dir")
by realmeteo (1 replies)
-
Looking for Senior Web Designer
by lwsmedia (0 replies)
-
Read eMails from Outlook express using ASP
by kumaravelu (1 replies)
-
Help to Call ASP function from onclick event in HTML to pass an array
by vka (0 replies)
Related podcasts
-
Scott Guthrie
Scott catches up with Scott Guthrie in an interview covering Ajax, Asp 2.0, extender controls, CSS adapters and more.
This thread is for discussions of ASP Fractal.