101 lines
3.4 KiB
PHP
101 lines
3.4 KiB
PHP
|
<?php
|
||
|
|
/* vim: set expandtab tabstop=4 shiftwidth=4: */
|
||
|
|
// +----------------------------------------------------------------------+
|
||
|
|
// | PHP version 4 |
|
||
|
|
// +----------------------------------------------------------------------+
|
||
|
|
// | Copyright (c) 1997-2003 The PHP Group |
|
||
|
|
// +----------------------------------------------------------------------+
|
||
|
|
// | This source file is subject to version 2.0 of the PHP license, |
|
||
|
|
// | that is bundled with this package in the file LICENSE, and is |
|
||
|
|
// | available through the world-wide-web at |
|
||
|
|
// | http://www.php.net/license/2_02.txt. |
|
||
|
|
// | If you did not receive a copy of the PHP license and are unable to |
|
||
|
|
// | obtain it through the world-wide-web, please send a note to |
|
||
|
|
// | license@php.net so we can mail you a copy immediately. |
|
||
|
|
// +----------------------------------------------------------------------+
|
||
|
|
// | Author: Marshall Roch <marshall@exclupen.com> |
|
||
|
|
// +----------------------------------------------------------------------+
|
||
|
|
//
|
||
|
|
// $Id: example.php,v 1.3 2005/06/23 08:10:19 cross Exp $
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Example using Services_ExchangeRates to create a form-based currency converter
|
||
|
|
*
|
||
|
|
* @package Services_ExchangeRates
|
||
|
|
*/
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Requires Services_ExchangeRates to function
|
||
|
|
*/
|
||
|
|
require_once 'Services/ExchangeRates.php';
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Creates new instance of currency converter
|
||
|
|
*
|
||
|
|
* @param string Choose where the exchange rates are coming from. In this case,
|
||
|
|
* it's the European Central Bank.
|
||
|
|
* @param string Choose where the currency rates are coming from. In this case,
|
||
|
|
* it's the United Nations.
|
||
|
|
*/
|
||
|
|
$conv = new Services_ExchangeRates('ECB', 'UN');
|
||
|
|
?>
|
||
|
|
|
||
|
|
<html>
|
||
|
|
<head>
|
||
|
|
<title>Currency Converter - PEAR::Services_ExchangeRates Example</title>
|
||
|
|
</head>
|
||
|
|
<body>
|
||
|
|
|
||
|
|
<h1>Currency Converter</h1>
|
||
|
|
|
||
|
|
<?php
|
||
|
|
|
||
|
|
if (!empty($_POST['amount'])) {
|
||
|
|
|
||
|
|
echo "<h1>";
|
||
|
|
echo $conv->format($_POST['amount']) . ' ' . $_POST['from'];
|
||
|
|
echo " = ";
|
||
|
|
echo $conv->convert($_POST['from'], $_POST['to'], $_POST['amount']) . ' ' . $_POST['to'];
|
||
|
|
echo "</h1>";
|
||
|
|
|
||
|
|
} else {
|
||
|
|
echo "<h1>Enter how much you want to convert!</h1>";
|
||
|
|
}
|
||
|
|
$options = array();
|
||
|
|
foreach ($conv->validCurrencies as $code => $label) {
|
||
|
|
$options .= '<option value="' . $code . '">' . $label . '</option>';
|
||
|
|
}
|
||
|
|
?>
|
||
|
|
|
||
|
|
<h2>I want to convert...</h2>
|
||
|
|
<form method="POST" action="<?php echo $_SERVER['PHP_SELF']; ?>">
|
||
|
|
<table style="border-collapse: separate; border-spacing: 1em;">
|
||
|
|
<tr style="text-align: center;">
|
||
|
|
<td>
|
||
|
|
<label for="amount">this amount</label><br />
|
||
|
|
<input type="text" name="amount" id="amount" value="1" />
|
||
|
|
</td>
|
||
|
|
<td>
|
||
|
|
<label for="from">of this type of currency</label><br />
|
||
|
|
<select name="from" id="from">
|
||
|
|
<?php echo $options; ?>
|
||
|
|
</select>
|
||
|
|
</td>
|
||
|
|
<td>
|
||
|
|
<label for="to">to this type of currency</label><br />
|
||
|
|
<select name="to" id="to">
|
||
|
|
<?php echo $options; ?>
|
||
|
|
</select>
|
||
|
|
</td>
|
||
|
|
</tr>
|
||
|
|
<tr style="text-align: center;">
|
||
|
|
<td colspan="3">
|
||
|
|
<input type="submit" value="Convert my money!" />
|
||
|
|
</td>
|
||
|
|
</tr>
|
||
|
|
</table>
|
||
|
|
</form>
|
||
|
|
|
||
|
|
</body>
|
||
|
|
</html>
|