<% Option Explicit %> <% Dim userId, user, fromUserId userId = Request("userId") fromUserId = Request("fromUserId") Set user = getUser(userId) If ( (userId = "") OR (fromUserId = "") OR (user Is Nothing) ) Then Response.Write("") End If %>

Statistics for <%= user.name %>

[ 1 2 ]

IP Address <%= user.ipAddress %> Logged On <%= user.loggedOn %> Last Action <%= user.lastAction %> Written Messages <%= user.sendMessages %>