<% Set rsMain = server.CreateObject ("ADODB.Recordset") fields=Array("id", "origin", "status", "priority", "subject", "xdate", "xtime") fieldlabels=Array(lg_id, lg_origin, lg_status, lg_priority, lg_subject, lg_date, lg_time) criteria=Array("xuser", "=", session("login"), " AND (", "status", "=", "open", " OR ", "status", "=", "hold", ")") list rsMain, "main.asp", 20, fields, fieldlabels, "requests", criteria, "", "", lg_unsolvedrequests, lg_nounsolvedrequests, "#d2cfbc", "#CCCCCC", "#F2F2F2", "title", "small", "xsmall", 0, "id", "viewrequest.asp", lg_view, 780 Response.Write "

" %>