Function not defined?

I have this user menu which displays the links for the user after they login.  Here is a plain html page that is inserted in the control:
<body>
    <script language="vb" runat="server">
        public function generateHtml(siteid)
        
        end function
    </script>
   
<table cellpadding="5" >
    <tr>
        <td>
            <a href="<%=AppPath%>/users/register_advance.aspx">Free lifetime upgrade </a> <span onmouseout="hidetooltip()"; onmouseover="tooltip('Click here to upgrade your site to advanced membership status. This will automate your link campa ...