分解质因数（asp 分布递归法）

***start input.asp***
<% thenum= request("num") %>
<style type="text/css">

</style>

<div class = "trees" id="tree<%=thenum%>"><%=thenum%><span id="follow<%=thenum%>"><iframe name = "agent<%=thenum%>" style="display:none" src="prime_number.asp?num=<%=thenum%>"></iframe></span></div>
***end input.asp***

***start prime_number.asp***
<%
IsPrimeNumber = false
thenum = request("num")
if thenum = 2 or thenum = 1 then
    IsPrimeNumber = false
else
    for i = 2 to thenum -1
        if thenum / i = int(thenum / i) then IsPrimeNumber = true: m = i : exit for
    next
end if
if IsPrimeNumber = false then %>

    <script>
    var htmltext = '<div class = "trees"><%=thenum%>*</div>';
    parent.follow<%=thenum%>.innerHTML = htmltext;
    </script>

<%else%>
        <%k = thenum / m%>
        <script>
        var htmltext = '<div class = "trees"><%=m%>*</div><div class = "trees" id="tree<%=k%>"><%=k%><span id="follow<%=k%>"><iframe name = "agent<%=k%>" style="display:none" src="prime_number.asp?num=<%=k%>"></iframe></span></div>';
        parent.follow<%=thenum%>.innerHTML = htmltext;
        </script>

<%end if%>
***end prime_number.asp***

算法应用：分布多线程树读取