function create_keyword($phrase)
{
# $key_word = '"';
# $key_word .= $phrase . '"';
## I had to make it so there is no quotes around the phrases , otherwise
## it would make it break on micro$oft IE - bradley 03-14-02
$key_word = $phrase;
## this is to take out the quotes - it is messing up in IE - bradley -03-14-02
$key_word = eregi_replace('"', '', $key_word);
$key_word = eregi_replace(' ', '+', $key_word);
$key_word = htmlspecialchars($key_word);
return $key_word;
}
//
//this function takes an array of phrases or words passed through to make a link
//the first element '[0]' in the array is the title and name of the link
//the rest of the elements '[1] and on' are key_words or key_phrases
function create_keylink($key_links,$name)
{
global $QUERY_STRING;
global $SCRIPT_NAME;
$debug = 0;
if($debug!=0) { print "name passed through is $name
"; }
if($debug!=0) { print "name = $name
"; }
if($debug!=0) { print "query_string = $QUERY_STRING
"; }
$path_nav = $SCRIPT_NAME;
if($QUERY_STRING)
{
$path_nav .= "?" . $QUERY_STRING;
}
if($debug!=0) { print "path_nav = $path_nav
"; }
$nav_temp = split ("/",$path_nav);
$nav_count = count ($nav_temp);
$nav_part[0] = create_keyword($name);
if($debug!=0) { print "nav_part[0] = $nav_part[0]
"; }
for($k=1; $k<$nav_count; $k++)
{
$nav_part[$k] = $nav_temp[$k];
if($debug!=0) { print "nav_part[$k] = $nav_part[$k]
"; }
}
$j = 0;
for($i=1; $i< count($key_links); $i++)
{
$key_word[$j] = $key_links[$i];
$key_word[$j] = create_keyword($key_word[$j]);
$j++;
}
$key_link = $key_links[0];
$title = create_keyword($key_link);
echo "";
}
?>
function create_artkeyword($phrase)
{
$key_word = '"';
$key_word .= $phrase . '"';
$key_word = eregi_replace(' ', '+', $key_word);
$key_word = htmlspecialchars($key_word);
return $key_word;
}
//
//this function takes an array of phrases or words passed through to make a link
//the first element '[0]' in the array is the title and name of the link
//the rest of the elements '[1] and on' are key_words or key_phrases
function create_artkeylink($key_links,$name)
{
global $QUERY_STRING;
global $SCRIPT_NAME;
$debug = 0;
if($debug!=0) { print "name passed through is $name
"; }
if($debug!=0) { print "name = $name
"; }
if($debug!=0) { print "query_string = $QUERY_STRING
"; }
$path_nav = $SCRIPT_NAME;
if($QUERY_STRING)
{
$path_nav .= "?" . $QUERY_STRING;
}
if($debug!=0) { print "path_nav = $path_nav
"; }
$nav_temp = split ("/",$path_nav);
$nav_count = count ($nav_temp);
$nav_part[0] = create_keyword($name);
if($debug!=0) { print "nav_part[0] = $nav_part[0]
"; }
for($k=1; $k<$nav_count; $k++)
{
$nav_part[$k] = $nav_temp[$k];
if($debug!=0) { print "nav_part[$k] = $nav_part[$k]
"; }
}
$j = 0;
for($i=1; $i< count($key_links); $i++)
{
$key_word[$j] = $key_links[$i];
$key_word[$j] = create_artkeyword($key_word[$j]);
$j++;
}
$key_link = $key_links[0];
$title = create_artkeyword($key_link);
echo "";
}
?>
Our objective
is to explore prehistoric and historic water projects worldwide...without
taking ourselves too seriously. We are particularly interested in the effect
that water has on the quality of life.
Note: We are looking for and
.
|
| Website for International Water History Association: |
|
|
|
|