home *** CD-ROM | disk | FTP | other *** search
/ PC World 2002 May / PCWorld_2002-05_cd.bin / Komunik / sambar / sambar51p.exe / sysadmin / control / pop3mail / inbox.asp < prev    next >
Encoding:
Text File  |  2001-07-17  |  3.9 KB  |  146 lines
  1. <HTML>
  2. <HEAD><TITLE>Sambar Server POP3Mail</TITLE>
  3. <SCRIPT language="JavaScript">
  4. <!--
  5. agent = navigator.userAgent;
  6. browserOK = 0;
  7. if (navigator.appName == "Netscape" &&
  8.     navigator.appVersion.substring(0,1) >= 2)
  9. {
  10.     browserOK = 1
  11. }
  12. else
  13. {
  14.     if (navigator.appName == "Microsoft Internet Explorer" &&
  15.         navigator.appVersion.substring(0,1) >= 4)
  16.     {
  17.         browserOK = 1
  18.     }
  19. }
  20.  
  21. function checkUncheck(xxx)
  22. {
  23.     if (browserOK)
  24.     {
  25.         for (i = 0; i < document.forms["mform"].length; i++)
  26.         {
  27.             document.forms["mform"].elements[i].checked = xxx;
  28.         }
  29.     }
  30. }
  31.  
  32. //-->
  33. </SCRIPT>
  34. <% 
  35. #include "../header.asp"
  36. #include "../menu.asp"
  37. area = "inbox";
  38. #include "submenu.asp"
  39.  
  40. server = getParameter($params, "server");
  41. username = getParameter($params, "username");
  42. password = getParameter($params, "password");
  43. start = (int)getParameter($params, "start");
  44. if (start <= 0)
  45.     start = 1;
  46. stop = (int)getParameter($params, "stop");
  47. if (stop < 20)
  48.     stop = 20;
  49.  
  50. pop3 = POP3Connect(server, username, decrypt(password));
  51. stat = POP3Stat(pop3);
  52. messages = stat[0];
  53. size = stat[1];
  54. if (stop > messages)
  55.     stop = messages;
  56.  
  57. printf("<BR><center><table border=0 cellpadding=0><tr><td>\n");
  58. printf("<B>%s@%s</B><BR>\n", username, server);
  59.  
  60. printf("<FONT SIZE=-1 color=#0000ff>\n");
  61. printf("Mailbox contains %ld messages (total size %ld bytes)\n", 
  62.     messages, size);
  63. printf("</FONT><BR>\n");
  64. printf("<FORM METHOD=POST NAME=\"mform\" ACTION=\"pop3dele.asp\">\n");
  65.  
  66. /*
  67. ** Format the POPMail subject header.
  68. */
  69. printf("<TABLE border=0 cellpadding=2 cellspacing=0>");
  70. printf("<TR bgcolor=#0000bb><TD> </TD>\n");
  71. printf("<TD><font color=#ffffff><B>From</B></font></TD>");
  72. printf("<TD><font color=#ffffff><B>Date</B></font></TD>");
  73. printf("<TD><font color=#ffffff><B>Size</B></font></TD>\n");
  74. printf("<TD><font color=#ffffff><B>Subject</B></font></TD></TR>\n");
  75.  
  76. /*
  77. ** List the messages.
  78. */
  79. for (i = start; i <= stop; i++)
  80. {
  81.     msg = POP3Message(pop3, i);
  82.     msgno = msg[0];
  83.     size = msg[1];
  84.     to = msg[2];
  85.     from = msg[3];
  86.     subj = msg[4];
  87.     date = msg[5];
  88.  
  89.     /* Truncate the subject */
  90.     /* if (strlen(subj) > 40)
  91.     **    subj[40] = NULL;
  92.     */
  93.  
  94.     printf("<TR nowrap bgcolor=%s>", (msgno % 2==0) ? "#ffffff":"#ffff88");
  95.     printf("<TD nowrap><INPUT width=1%% type=checkbox name=d%d> %d</TD>\n",
  96.         msgno, msgno);
  97.  
  98.     /* 
  99.     ** FIX THIS sambar - scrub the from/date/subject fields before display     
  100.     */
  101.     printf("<TD nowrap><font size=-1>%s</font></TD>\n", from);
  102.     printf("<TD nowrap><font size=-1>%s</font></TD>\n", date);
  103.     if (size < 1024)
  104.     {
  105.         printf("<TD nowrap><font size=-1>1 KB</font></TD>");
  106.     }
  107.     else if (size < 1024 * 1024)
  108.     {
  109.         printf("<TD nowrap><font size=-1>%d KB</font></TD>\n", 
  110.             (int)(size / 1024));
  111.     }
  112.     else
  113.     {
  114.         printf("<TD nowrap><font size=-1>%d MB</font></TD>\n", 
  115.             (int)(size / (1024 * 1024)));
  116.     }
  117.  
  118.     /*
  119.     ** Setup link to actual message body.
  120.     */
  121.     printf("<TD nowrap><A HREF=\"pop3retr.asp?username=%s&password=%s&server=%s&",
  122.         username, password, server);
  123.     printf("msgno=%d&start=%d&stop=%d\">%s</A></TD></TR>\n", 
  124.         msgno, start, stop, subj);
  125. }
  126.  
  127. POP3Disconnect(pop3);
  128.  
  129. printf("</TABLE>\n");
  130. printf("<INPUT type=hidden name=start value=\"%d\">\n", start);
  131. printf("<INPUT type=hidden name=stop value=\"%d\">\n", stop);
  132. printf("<INPUT type=hidden name=username value=\"%s\">\n", username);
  133. printf("<INPUT type=hidden name=password value=\"%s\">\n", password);
  134. printf("<INPUT type=hidden name=server value=\"%s\">\n", server);
  135. printf("<A HREF=\"javascript:checkUncheck(true)\">");
  136. printf("<FONT SIZE=-1>Select All</FONT></A>");
  137. printf("<FONT COLOR=#ffffff> . . </FONT>");
  138. printf("<A HREF=\"javascript:checkUncheck(false)\">");
  139. printf("<FONT SIZE=-1>Deselect All</FONT></A>\n");
  140. printf("<BR><INPUT type=submit value=\"Delete Marked\"></FORM>\n");
  141. printf("</table></center>\n");
  142.  
  143. #include "../footer.asp"
  144. %>
  145. </BODY></HTML>
  146.