<% '################################################################################# '# Copyright (C) 2002 John Andersson '# '# This program is free software; you can redistribute it and/or '# modify it under the terms of the GNU General Public License '# as published by the Free Software Foundation; either version 2 '# of the License, or any later version. '# '# All copyright notices regarding ZIXForum '# must remain intact in the scripts and in the outputted HTML '# The "powered by" text/logo with a link back to '# http://www.zixforum.com in the footer of the pages MUST '# remain visible when the pages are viewed on the internet or intranet. '# '# This program is distributed in the hope that it will be useful, '# but WITHOUT ANY WARRANTY; without even the implied warranty of '# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the '# GNU General Public License for more details. '# '# '# Support can be obtained from support forums at: '# http://www.zixforum.com '# '# Correspondence and Marketing Questions can be sent to: '# zixforum@zixforum.com '################################################################################# ' Rev 1.12 checked 2002/02/26 %>

<% SQLStmt = "SELECT * from MessUsers WHERE ToUser = "& session("Userid")&" order by M_Date desc" RS.open SQLStmt, conn A = 0 DO while not rs.EOF M_ID = rs("M_ID") M_Dates = RS("M_Date") M_Date = FormatDateTime(M_Dates,2) & ", "& StrLan79 &" " & FormatDateTime(M_Dates,4) FromUser = rs("FromUser") FromUserName = rs("FromUserName") If A = 0 Then bgcolor = strColor1 If A = 1 Then bgcolor = strColor2 %> <% If A = 1 Then A = 0 Else A = 1 rs.movenext loop %>  Community |View old From Date Delete <%=FromUserName%> <%=M_Date%>

<%'DO NOT CHANGE THIS!!%>©ZIXForum <%=StrVersion%> by: ZixCom 2002