分解質因數（asp 分布遞歸法）

***start input.ASP***
<% thenum= request("num") %>
<style type="text/CSS">
<!--
.trees {  border-color: black black black #666666; padding-left: 12px; border-style: solid; border-top-width: 0px; border-right-width: 0px; border-bottom-width: 0px; border-left-width: 3px; margin-top: 2px; margin-bottom: 2px}
-->
</style>

<div class = "trees" id="tree<%=thenum%>"><%=thenum%><span id="follow<%=thenum%>"><iframe name = "agent<%=thenum%>" 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%>" src="prime_number.ASP?num=<%=k%>"></iframe></span></div>';
        parent.follow<%=thenum%>.innerHTML = Htmltext;
        </script>

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

算法應用：分布多線程樹讀取