mail.php.svn-base

来自「PHP 知识管理系统(基于树结构的知识管理系统), 英文原版的PHP源码。」· SVN-BASE 代码 · 共 72 行

SVN-BASE
72
字号
<?php// Allow users to see the source of this file even if PHP is not configured for itif ((isset($HTTP_GET_VARS['showSource']) && $HTTP_GET_VARS['showSource']) ||	(isset($_GET['showSource']) && $_GET['showSource']))	{ highlight_file(__FILE__); die(); }?><html><head><title>xmlrpc</title></head><body><h1>Mail demo</h1><p>This form enables you to send mail via an XML-RPC server. For public useonly the "Userland" server will work (see <a href="http://www.xmlrpc.com/discuss/msgReader$598">Dave Winer's message</a>).When you press <kbd>Send</kbd> this page will reload, showing you the XML-RPC request sent to the host server, the XML-RPC response received and the internal evaluation done by the PHP implementation.</p><p>You can find the source to this page here: <a href="mail.php?showSource=1">mail.php</a><br/>And the source to a functionally identical mail-by-XML-RPC server in the file <a href="../server/server.php?showSource=1">server.php</a> included with the library (look for the 'mail_send' method)</p><?phpinclude("xmlrpc.inc");// Play nice to PHP 5 installations with REGISTER_LONG_ARRAYS offif (!isset($HTTP_POST_VARS) && isset($_POST))	$HTTP_POST_VARS = $_POST;if (isset($HTTP_POST_VARS["server"]) && $HTTP_POST_VARS["server"]) {	if ($HTTP_POST_VARS["server"]=="Userland") {		$XP="/RPC2"; $XS="206.204.24.2";	} else {		$XP="/xmlrpc/server.php"; $XS="pingu.heddley.com";	}	$f=new xmlrpcmsg('mail.send');	$f->addParam(new xmlrpcval($HTTP_POST_VARS["mailto"]));	$f->addParam(new xmlrpcval($HTTP_POST_VARS["mailsub"]));	$f->addParam(new xmlrpcval($HTTP_POST_VARS["mailmsg"]));	$f->addParam(new xmlrpcval($HTTP_POST_VARS["mailfrom"]));	$f->addParam(new xmlrpcval($HTTP_POST_VARS["mailcc"]));	$f->addParam(new xmlrpcval($HTTP_POST_VARS["mailbcc"]));	$f->addParam(new xmlrpcval("text/plain"));	$c=new xmlrpc_client($XP, $XS, 80);	$c->setDebug(2);	$r=&$c->send($f);	if (!$r->faultCode()) {		print "Mail sent OK<br/>\n";	} else {		print "<fonr color=\"red\">";		print "Mail send failed<br/>\n";		print "Fault: ";		print "Code: " . htmlspecialchars($r->faultCode()) .	  " Reason: '" . htmlspecialchars($r->faultString()) . "'<br/>";		print "</font><br/>";	}}?><form method="POST">Server <select name="server"><option value="Userland">Userland</option><option value="UsefulInc">UsefulInc private server</option></select><hr/>From <input size="60" name="mailfrom" value=""/><br/><hr/>To <input size="60" name="mailto" value=""/><br/>Cc <input size="60" name="mailcc" value=""/><br/>Bcc <input size="60" name="mailbcc" value=""/><br/><hr/>Subject <input size="60" name="mailsub" value="A message from xmlrpc"/><hr/>Body <textarea rows="7" cols="60" name="mailmsg">Your message here</textarea><br/><input type="Submit" value="Send"/></form><hr/><em>$Id: mail.php,v 1.5 2006/02/05 17:05:27 ggiunta Exp $</em></body></html>

⌨️ 快捷键说明

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