Hjælp med at indsætte link

Hej eksperter hvordan vil i lave et link i denne kode, lige nu udskriver den kun navnet på mine link, hvis jeg laver en a href så kommer den med fejl.

                <%

foldout(oa.top_page.selected_child)

function foldout(page)
    dim i,tp
    for i=0 to page.child_page_count-1

        set tp=page.get_child_page(i)
        response.write "<span class=""mainmenu"" onclick=""showsub('sub" & tp.page_id & "');"" id=""main" & tp.page_id & """>" & tp.page_name & "<br /></span>"
        response.write "<span class=""submenu"" id=""sub" & tp.page_id  & """>" 
        foldchildren(tp)   
        response.write "</span>"
    next
end function

function foldchildren(page)
    dim i,tp
    for i=0 to page.child_page_count-1

        set tp=page.get_child_page(i)
        response.write "/&nbsp;&nbsp;&nbsp;" & tp.page_name & "&nbsp;&nbsp;&nbsp;"
        foldchildren(tp)
    next
end function


%>