<?
global $NOSORT;
$NOSORT=1;
echo $crlf;
echo `<!-- priority 0.4 -->`;
echo $crlf;
echo `<!-- changefreq weekly -->`;
echo $crlf;
echo `<html xmlns=~http://www.w3.org/1999/xhtml~ xml:lang=~en~ lang=~en~>`;
echo $crlf;
echo `<head>`;
echo $crlf;
echo `<title>LucasCo HTML Sitemap</title>`;
echo $crlf;
echo `<meta name=~description~ content=~HTML sitemap for non-XML web spiders~ >`;
echo $crlf;
echo `<meta name=~keywords~ content=~html sitemap~ >`;
echo $crlf;
echo `<meta http-equiv=~Content-Type~ content=~text/html charset=iso-8859-1~ >`;
echo $crlf;
echo `<link href=~http://www.LucasCo.info/~ rel=~index~ >`;
echo $crlf;
echo `</head>`;
echo $crlf;
echo `<body><center>`;
echo $crlf;
$sql=~select concat(`<a href=http://www.lucasco.info/ProjectManagement/Help.php?iprm=`,TabID,` target=_BLANK>`,TabName,`</a>`) as Title from Tabs where TabType in (`Sell`,`Blog`,`Proj`) order by TabName~;
ShowQueryResult($sql);
echo $crlf;
echo `</body>`;
echo $crlf;
echo `</html>`;

$sql=~select concat(`http://www.lucasco.info/ProjectManagement/Help.php?iprm=`,TabID,`~ . `&` . ~ttl=`,Title,`~ . `&` . ~kw=`,Keywords,`/`) as Title, substring(LastUpdate,1,10) as LastUpdate from Tabs where TabType in (`Sell`,`Blog`,`Proj`) and AuthorizedRoles=`` order by ProjectId, TabType, TabName~;
$res=GetResultset($sql);
if ($res)
  {
//echo `<br>records found`;
    $fp = fopen(`/var/www/html/SiteMap.txt`,`w`);
    fwrite($fp,`http://www.lucasco.info/`.~
~);
    fwrite($fp,`http://www.lucasco.info/Randy/`.~
~);
    fwrite($fp,`http://www.lucasco.info/static/`.~
~);
    while ($row = mysql_fetch_assoc($res))
      {
        fwrite($fp,strip_tags($row[`Title`]).~
~);
      }
    fclose($fp);
  }

?>