⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 menu.php

📁 又一个WAP连接邮件服务器的例子
💻 PHP
字号:
<?php
/*
#######################################################################
# W-mail lite
#      - version 3.2.3
#      - Copyright (c) 2002-2003 Dominion Web Design
#      - http://www.dominion-web.com/products/w-mail/
#######################################################################
#
#        THIS SOFTWARE IS FREEWARE
#        Redistribution is permitted so long as the copyright notices
#        stay intact in the code and in the WML output
#
#######################################################################
*/
require ("./classes.php");

$u = $_GET['u'];
$p = $_GET['p'];
$uex = explode("@", $u);
$u = $uex[0];
$domain = $uex[1];

require ("./vars.php");

$MainSettings = new GlobalInit();
$TransIDEnabled = $MainSettings->INIGet('session.use_trans_sid');

session_start();
if ((!isset($_SESSION['sess_u'])) && (!isset($_SESSION['sess_p']))) {
	$newlogin = 1;
	$_SESSION['sess_u'] = $u;
	$_SESSION['sess_p'] = $p;
	$newsession['sess_u'] = $u;
	$newsession['sess_p'] = $p;
}
else {
	$newsession = $_SESSION;
}

$IMAPConnection = new WM_IMAPConnection(
	$newsession,
	$servertype,
	$IMAPPort,
	$defaultIMAP,
	$WAPimapserver
	);

$OutputWML = new SetWML();

echo ("<wml>
<head>\n");

$OutputWML->SetHead();

echo ("</head>\n");

$OutputWML->SetCard();

$mailbox = $IMAPConnection->WM_IMAPConnect();

if (!$mailbox) {
	$servererrors = implode("<br/>\n", $IMAPConnection->_mailboxerror);
	if (strstr($servererrors, "invalid remote specification")) {
		$servererrors .= "<br/><br/>It's possible that this server does not support this protocol";
	}

	echo ("<p>\n");
	echo ("Error: Sorry your login failed.  Your server reported: $servererrors</p>\n");
	echo ("</card></wml>\n");
	exit;
}

$numberofmessages = $IMAPConnection->WM_IMAPNumMessages2();

echo ("<p>W-mail lite<br/></p>\n");
echo ("<p><a href=\"mailbox.php");
$MainSettings->SessAppend($TransIDEnabled, 1);
echo ("\">INBOX</a> " . $numberofmessages->Nmsgs . " (" . $numberofmessages->Recent . " new)</p>\n");
echo ("<p><a href=\"index.php?do=logout");
$MainSettings->SessAppend($TransIDEnabled, 0);
echo ("\">Exit</a></p>\n");

$IMAPConnection->WM_IMAPClose();

echo ("</card>\n</wml>");
?>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -