add to your admin_home.asp about line 147 underneath " " <p><b>Other Configuration Options and Features:</b>" & vbNewLine & _
" <UL>" & vbNewLine
add:
if strEmailVal = "1" then Response.Write(" <LI><span class=""spnMessageText""><a href=""admin_accounts_pending.asp"">Members Pending</a></span> <font size=""" & strFooterFontSize & """>(" & User_Count & ")</font></LI>" & vbNewLine)
it should be above
Response.Write " <LI><span class=""spnMessageText""><a href=""admin_moderators.asp"">Moderator Setup</a></span></LI>" & vbNewLine & _
" <LI><span class=""spnMessageText""><a href=""admin_emaillist.asp"">E-mail List</a></span></LI>" & vbNewLine & _