PX : code

Write direct html file by Patrik Hohl
Download this code


<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">

<html>
<head>
    <title>write direct file Protect file</title>
</head>

<!--- questions info@ticinonline.to .it .de .fr or bad .en --->
<body bgcolor="#FFFFD5">

<?php 
$adesso       
=  date"d M y"); 
echo
"<b>write direct</b><br>";
function 
write_file($filename$scrivinelfile) {   
 if (
$fp fopen($filename"w")) {
        
fwrite ($fpstripslashes($scrivinelfile));
        
fclose($fp);
        return 
1;
        }
 else { return 
0; }
        };
echO
"$adesso <br>";
if (
$submitButton == "done")
{
$poi=eregi_replace(" ","_",$titolo);
$filename=strtolower($poi);
$doc=nl2br($contents);
$scrivinelfile"<? include ('headerfooter.php3');  header ('$titolo -  / $curdate',' $titolo' ); ?>"//print file + header footer function
$scrivinelfile.= "<title>$titolo</title>";
$scrivinelfile.= "<?  include ('menu.php3');  ?>";
$scrivinelfile.= "<center><h2>$titolo</h2></center>";
$scrivinelfile.= "<blockquote>$doc</blockquote>";
$scrivinelfile.= "<br><br><div align='center'><a href='http://www.jazzascona.ch/' target='_top'>www.jazzascona.ch</a></div><? footer ( )  ?>\n";
write_file ("../$filename.html","$scrivinelfile");
$forumdb="../_menu1.txt"

$menu"<!--- inizio-$filename ---><?  if(ereg(\"$filename\", \$REQUEST_URI)) {\n"//print nav menu
$menu.= "print\"$adesso :<br><p class='nolink'>$titolo</p>\";\n";
$menu.= "}\n";
$menu.= "else {\n";
$menu.= "print\"$adesso :<br><a href='$filename.html'>$titolo</a><br>\";\n";
$menu.= "}\n";
$menu.= "?><!--- fine-$filename  --->\n";
$fpn=@fopen($forumdb.".tmp","w");
fputs($fpn,$menu);
  
$fp=@fopen($forumdb,"r");
  if(
$fp<=0) {
   echo
"Error";
  } 
  while(!
feof($fp)) {
   
$zeile=fgets($fp,32000);
   
fputs($fpn,$zeile);
  }
  
fclose($fp);
  
fclose($fpn); 
  
unlink($forumdb);
  
rename($forumdb.".tmp",$forumdb);
 }


?><br>
<form action="write.php3" method="POST">
<input type="Text" name="titolo" size="20" maxlength="20">&nbsp;TITLE<br>
<textarea name="contents" cols="55" rows="10" wrap="PHYSICAL">
</textarea>&nbsp;TEXT<br>
<input type="Submit" name="submitButton" value="done"></form>&nbsp;SAVE DIRECT (done)<br><br>
<?php echo"<a href='../$filename.html' target='_blank'>$filename</a>";  ?><br>
<a href="write.php3">new write</a><br>


Comments or questions?
PX is running PHP 5.2.17
Thanks to Miranda Productions for hosting and bandwidth.
Use of any code from PX is at your own risk.