构建简单的Webmail系统

在辉煌中死去

在辉煌中死去

2016-01-29 14:27

构建简单的Webmail系统,构建简单的Webmail系统
  这是一段Web Mail的示范代码,功能不是很强,但是结构还比较完整,主要的功能如查看文件夹,查看信件,回复,写信都有。但是程序中没有考虑附件解读和发送的问题。 (原文在 这里)。仅推荐给希望了解Webmail编程的网友做个参考。更加完善的Webmail请大家到 这里查找。
请注意:程序中使用了http认证功能,此功能需配合apache服务器使用。




--------------------------------------------------------------------------------
将以下代码分别存为 index.php3, imapfuncs.phl
配置imapfuncs.phl文件中的$M_HOST = "localhost"; $M_MAILSERVER = "transit.fast.no";
然后浏览 index.php3 即可.  
--------------------------------------------------------------------------------
index.php3

<?PHP
/* $Id: index.php3,v 1.3 1999/04/14 12:12:32 borud Exp $ */

/* load the IMAP library functions we've written */
include("imapfuncs.phl");

m_login($m);

?
<HTML
<HEAD
<TITLE<?PHP echo "$M_SYSNAME"; ?</TITLE
</HEAD
<BODY bgcolor=#AAAAAA text=#000000 link=#440000 vlink=#440000 alink=#FF00FF
<H1 ALIGN=CENTER<?PHP echo "$M_SYSNAME"; ?</H1
<HR SIZE=1 NOSHADE

<P
<?PHP
if ($cmd == "delete") {
m_delete($marked, $m);
m_list($m);
}

elseif ($cmd == "display") {
m_display($n, $m);
}

elseif ($cmd == "compose" || $cmd == "reply") {
m_compose($n, $m);
}

elseif ($cmd == "send") {
m_send($to, $subject, $body);
m_list($m);
}

else {
m_list($m);
}
?

<P

<HR SIZE=1 NOSHADE
<?PHP echo "User: $PHP_AUTH_USER"; ?

</BODY
</HTML






--------------------------------------------------------------------------------
imapfuncs.phl

<?PHP /* -*-C++-*- */

/* $Id: imapfuncs.phl,v 1.4 1999/04/14 12:12:32 borud Exp $ */

/* configurable parameters */


$M_HOST = "localhost";
$M_MAILSERVER = "transit.fast.no";

$M_COLOR_ODD = "#CCCCCC";
$M_COLOR_EVEN = "#EEEEEE";
$M_COLOR_HEAD = "#AAAAFF";
$M_COLOR_BG = "#FFFFFF";


/* globals */
$M_PORT = 143;
$M_SERVICE = "imap";
$M_SYSNAME = "Simple PHP3 IMAP Interface 1.0";
$M_MBOX = "{$M_HOST:$M_PORT/$M_SERVICE}";
$M_REALM = "IMAP Interface";
$MBOX = false;

/* functions */

function m_login ($mailbox = '')
{
global $MBOX, $M_REALM;
global $PHP_AUTH_USER, $PHP_AUTH_PW;

if ($MBOX) {
return true;
}

if (! $PHP_AUTH_USER) {
m_reject($M_REALM);
}

$MBOX = @imap_open(m_mailbox_name($mailbox), $PHP_AUTH_USER, $PHP_AUTH_PW);

if (! $MBOX) {
m_reject($M_REALM);
}

return true;
}


function m_list($mailbox = '')
{
global $MBOX, $PHP_SELF;
global $M_COLOR_ODD, $M_COLOR_EVEN, $M_COLOR_HEAD, $M_COLOR_BG;

/* if not logged into server, do so */
if (! $MBOX) {
if (! m_login($mailbox)) {
return false;
}
}

$num = imap_num_msg($MBOX);

echo "<FORM ACTION=$PHP_SELF TYPE=POSTn";
echo "<CENTER<TABLE BORDER=0 CELLSPACING=0 CELLPADDING=1 WIDTH=90%n";

echo "<TR ALIGN=LEFT BGCOLOR=$M_COLOR_HEAD";
echo "<TH </TH<THFrom</TH<THSubject</TH<THDate</TH";
echo "</TRn";

for ($i=1; $i < ($num+1); $i++) {
$head = imap_header($MBOX, $i, 50, 50, 0);

$from = $head-fetchfrom;
$subj = $head-fetchsubject;
$date = m_date_format($head-date);

$bgcolor = ($i%2 == 0)?$M_COLOR_ODD:$M_COLOR_EVEN;

echo "<TR BGCOLOR="$bgcolor"n&q
展开更多 50%)
分享

猜你喜欢

构建简单的Webmail系统

PHP
构建简单的Webmail系统

使用JSP开发WebMail系统

Java JAVA基础
使用JSP开发WebMail系统

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

linux 9系统下构建小型入侵检测系统

Linux Linux命令 Linux安装 Linux编程 Linux桌面 Linux软件 Linux内核 Linux管理
linux 9系统下构建小型入侵检测系统

构建你的网站新闻自动发布系统之四

ASP
构建你的网站新闻自动发布系统之四

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

构建你的网站新闻自动发布系统之一

ASP
构建你的网站新闻自动发布系统之一

构建你的网站新闻自动发布系统之二

ASP
构建你的网站新闻自动发布系统之二

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

PHP+DBM的同学录程序(5)

PHP+DBM的同学录程序(5)

挑战最棒的留言本的源码(四)

挑战最棒的留言本的源码(四)
下拉加载更多内容 ↓