Select from a series of radio boxes

Your results will appear here
05:52 to Swindon
07:45 to Swindon
13:35 to Swindon
17:02 to Swindon
21:33 to Swindon

By Graham Ellis, graham@wellho.net
Well House Consultants
Complete source code of this example:
<?php
if ($_SERVER["SERVER_PROTOCOL"] == "HTTP/1.0") {
    
http_response_code(426);
    include(
"/var/www/html/error/errorpage.php");
    exit();
}

# Let's retire wrapped demos  - 8th October 2020
if ($_SERVER["SERVER_PROTOCOL"] == "HTTP/1.0") {
    
http_response_code(410);
    include(
"/var/www/html/error/errorpage.php");
    exit();
}

ini_set("browscap","/home/wellho/include/browscap.ini");

// Everything via common booking script

include ("$_SERVER[DOCUMENT_ROOT]/../include/stdphp.v8");

$year date("Y");
$where $url "http://$_SERVER[SERVER_NAME]$_SERVER[REDIRECT_URL]";
$thispage preg_replace('!.*/!','',$where);
/* Can we find source file in trainee directories? */
$dh opendir("$_SERVER[DOCUMENT_ROOT]/../trainee");
$itsin "";
while (
$tdn readdir($dh) ) {
    if (! 
preg_match("/^[a-z]/",$tdn)) continue;
    
// $dlk .="$tdn - ";
    
$lookin = @opendir("$_SERVER[DOCUMENT_ROOT]/../trainee/$tdn");
    while (
$ldn = @readdir($lookin) ) {
        if (
$ldn == $thispage) {
            
$itsin $tdn;
            break;
        }
    if (
$itsin) break;
    }
}
$reggie strtoupper($itsin);
if (
$itsin) {
    
$upit =strtoupper($itsin);
    
$itsin "See source code <a href=/resources/ex.php?item=$itsin/$thispage target=pix>here</a> &bull; More examples - same topic <a href=/resources/$upit.html target=pix>here</a><br>";
    }

$topper 1;
$topperfrom "</head>";
$topperto = <<< BSECTYY
<style type=text/css>
        body {background-color: #FFFFDD;
                font-family: Arial;
                }
        table {
                background-color: ;
                table-layout: fixed ;
                word-wrap: break-word;
        }
</style>
</head>
BSECTYY;

$tailer 1;
$tailerfrom "</body>";
$tailerto = <<< BSECTZZ
<br clear=all /><hr>
<div style="background: #FFCCCC;color: black;font-family: Arial, Helvetica, sans-serif;">
<table width=100%><tr><td>
<center>Training sample &copy; 
$year, WELL HOUSE CONSULTANTS LTD<br />
This is <span style="font-style:italic;cursor: default;"><a href="
$url">$url</a></span> <br />
$itsin
Well House Manor &bull; 48 Spa Road &bull; Melksham, Wiltshire 
&bull; United Kingdom &bull; SN12 7NY<br />
Phone: +44 (0) 1225 708 225 &bull; 
EMAIL: <span style="font-style:italic;cursor: default;"><a
href="mailto:info@wellho.net">info@wellho.net</a></span> &bull;
WEB: <span style=";font-style:italic;cursor: default;"><a href="http://www.wellho.net">http://www.wellho.net</a></span> </center></div>
</td><td><img src=http://www.wellho.net/qr/img.php?server=www.wellho.net&page=
$_SERVER[REDIRECT_URL]></td></table>
BSECTZZ;

include (
"$_SERVER[DOCUMENT_ROOT]/../include/pagescript.v8");

@
$dbc mysqli_connect("127.0.0.1","wellho","4qash22m");
@
mysqli_select_db($dbc"wellho");

$weight 9;
$stx "";
if (
preg_match('/<title>(.*?)<\/title>/is',$inclusion,$gotted)) {
    
$stx .= " - $gotted[1]";
    
$weight += 20;
}
if (
preg_match('/#%%(.*)/',$inclusion,$gotted)) {
    
$stx .= " - $gotted[1]";
    
$weight += 4
}
$frd fopen("$_SERVER[DOCUMENT_ROOT]/resources/mtable.txt","r");
while (
$line fgets($frd)) {
    
$seg substr($line,0,4);
    if (
$seg == $reggie) {
        
$seg2 substr($line,5);
        
$stx .= " - " trim($seg2);
        
$weight += 3;
    }
}

include_once (
"$_SERVER[DOCUMENT_ROOT]/../include/register.inc");
        
$gob = new content($fileused);
        
$gob->setbody($inclusion,23);
        
$gob->settitle("Working Demonstration$stx");
        
$zones $reggie ? array($reggie) : array();
        
$gob->setareas($zones);
        
$gob->setweight($weight);
        
$gob->sethalflife(4000);
        
$gob->store();

?>


Training sample © 2022, WELL HOUSE CONSULTANTS LTD
This is http://www.wellho.net/demo/mcheck.php
See source code here • More examples - same topic here
Well House Manor • 48 Spa Road • Melksham, Wiltshire • United Kingdom • SN12 7NY
Phone: +44 (0) 1225 708 225 • EMAIL: info@wellho.net • WEB: http://www.wellho.net