After all this time, I thought I would revisit the problem, and with the kind help of Leatherlips, he has provided the answer. (Thank you)
inc_activeusers.asp line 72 reads
strActiveMemberList = strActiveMemberList & "<font color=""" & strDefaultFontColor & """>
Replace strDefaultFontColor with strDefaultLinkColor
strActiveMemberList = strActiveMemberList & "<font color=""" & strDefaultLinkColor & """>
regards andy<