ASP Fractal

HTML Output

ASP Code


Dim depth,color,size

Call DrawFractal (depth)

Sub DrawFractal (depth)

<table border= "0" cellpadding= "0" cellspacing= "0"><tr><td>
<% Call Iterate (depth) %>
<% Call Iterate (depth) %>
<% Call Iterate (depth) %>

End Sub

Sub Iterate (depth)
    If depth > 0 Then
        Call DrawFractal (depth-1)
        Response.Write "<table cellpadding=""0"" cellspacing=""0"" " & _
            " border=""0"" height="""& size &""" width="""& size &""">" & _
            "<tr><td bgcolor="""& color &"""></td></tr></table>"
    End If
End Sub


You might also like...


Tawani Anyangwe


Why not write for us? Or you could submit an event or a user group in your area. Alternatively just tell us what you think!

Our tools

We've got automatic conversion tools to convert C# to VB.NET, VB.NET to C#. Also you can compress javascript and compress css and generate sql connection strings.

“Any fool can write code that a computer can understand. Good programmers write code that humans can understand.” - Martin Fowler