<?
function f_atvaizdavimas(){
global $failas;
?><a href="/index.php?rasymas=1">Irasyti</a><br>
<form action=index.php>
<input type=text name=search value="<? echo $_GET['search'] ; ?>">
<input type=submit value=spausk>
</form>
<?
$f = fopen($failas,"r");
$x = 'bgcolor="#AAAAAA"';
$y = 'bgcolor="#FFFFFF"';
$search = $_GET['search'];
echo "<table width=50% border=1><tr><th> </th><th>vardas</th><th>nikas</th><th>pranesimas</th></tr>";
if (filesize($failas)>0){
while (!feof ($f)) {
$i++;
$tr_spec = ($i % 2) ? $x : $y;
$string = fgets ($f,1000);
$part = explode ( "|" , $string );
if ( @stristr($part[2] , $search) == false and $search) continue ;
echo "<tr $tr_spec ><td><a href = \"index.php?rasymas=2&id=$i\">Trinti</a></td><td>" . $part[0] . "</td><td>". $part[1]." </td><td>". $part[2] ."</td></tr>";
}
}
fclose ($f);
echo "</table>";
}//f_atvaizdavimas()
function f_irasymas(){
?><BR><a href="/index.php">atgal</a><br> <?
global $failas , $_GET;
$vardas = $_GET["vardas"];
$mkas = $_GET["mkas"];
$pranesimas = $_GET["pranesimas"];
$irasyti = $_GET["irasyti"];
$rasymas = $_GET["rasymas"];
if (!$irasyti){
?>
<form action="index.php" method="get">
<input type="text" name="vardas" maxlength="100" size="50" ><br />
<input type="text" name="mkas" maxlength="100" size="50" ><br />
<input type="text" name="pranesimas" maxlength="100" size="50" ><br />
<input type=submit value="SPAUSK">
<input type="hidden" name="rasymas" value="1">
<input type="hidden" name="irasyti" value="1">
<?
}else{
$f=fopen($failas,"a+");
rewind ($f);
while (!feof ($f)) {
$string = fgets ($f,1000);
$part = explode ( "|" , $string );
//echo "<br>lyginimas ".$pranesimas ." ir " . $part[2]. "<br>";
if ($pranesimas == trim($part[2])) die ("<br>pranesimas kartojasi<br>");
}
$vardas = strip_tags(strtr($vardas, "|", "_"),'<b><i><u>');
$mkas = strip_tags(strtr($mkas, "|", "_"),'<b><i><u>');
$pranesimas = strip_tags(strtr($pranesimas, "|", "_"),'<b><i><u>');
$info = $vardas ."|". $mkas ."|". $pranesimas;
if (filesize ($failas)==0){
fwrite ($f,"$info",100);
}else{
fwrite ($f, "\n$info",100);
}// if tdata.txt tikrinimas
fclose ($f);
?><span style="color: #ff9999;">irasymas pavyko</span><?
}// if irasyti
}//f_irasymas()
function f_trynimas(){
?><BR><a href="/index.php">atgal</a><br> <?
global $failas , $_GET;
$id = $_GET["id"];
$rasymas = $_GET["rasymas"];
$id = $id - 1;
echo "trinti $id elementa";
$data=file($failas);
$size=count($data);
echo "<br>dydis $size <br>";
echo "<pre>";
print_r($data);
echo "</pre>";
$file=fopen($failas,'w');
for($line=0;$line< $size ; $line++) {
if ($line == $id) continue ;
echo $data[$line] . "<br>";
fputs($file,$data[$line]);
}
fclose ($file);
}// f_trynimas
?>
<?
function f_atvaizdavimas(){
global $failas;
?><a href="/index.php?rasymas=1">Irasyti</a><br> <?
$f=fopen($failas,"r");
$x = 'bgcolor="#AAAAAA"';
$y = 'bgcolor="#FFFFFF"';
echo "<table width=50% border=1><tr><th>vardas</th><th>nikas</th><th>pranesimas</th></tr>";
if (filesize($failas)>0){
while (!feof ($f)) {
$i++;
$tr_spec = ($i % 2) ? $x : $y;
$string = fgets ($f,1000);
$part = explode ( "|" , $string );
echo "<tr $tr_spec ><td><a href = \"index.php?rasymas=2&id=$i\">Trinti</a></td><td>" . $part[0] . "</td><td>". $part[1]." </td><td>". $part[2] ."</td></tr>";
}
}
fclose ($f);
echo "</table>";
}//f_atvaizdavimas()
function f_irasymas(){
?><BR><a href="/index.php">atgal</a><br> <?
global $failas , $_GET;
$vardas = $_GET["vardas"];
$mkas = $_GET["mkas"];
$pranesimas = $_GET["pranesimas"];
$irasyti = $_GET["irasyti"];
$rasymas = $_GET["rasymas"];
if (!$irasyti){
?>
<form action="index.php" method="get">
<input type="text" name="vardas" maxlength="100" size="50" ><br />
<input type="text" name="mkas" maxlength="100" size="50" ><br />
<input type="text" name="pranesimas" maxlength="100" size="50" ><br />
<input type=submit value="SPAUSK">
<input type="hidden" name="rasymas" value="1">
<input type="hidden" name="irasyti" value="1">
<?
}else{
$f=fopen($failas,"a+");
rewind ($f);
while (!feof ($f)) {
$string = fgets ($f,1000);
$part = explode ( "|" , $string );
//echo "<br>lyginimas ".$pranesimas ." ir " . $part[2]. "<br>";
if ($pranesimas == trim($part[2])) die ("<br>pranesimas kartojasi<br>");
}
$vardas = strip_tags(strtr($vardas, "|", "_"),'<b><i><u>');
$mkas = strip_tags(strtr($mkas, "|", "_"),'<b><i><u>');
$pranesimas = strip_tags(strtr($pranesimas, "|", "_"),'<b><i><u>');
$info = $vardas ."|". $mkas ."|". $pranesimas;
if (filesize ($failas)==0){
fwrite ($f,"$info",100);
}else{
fwrite ($f, "\n$info",100);
}// if tdata.txt tikrinimas
fclose ($f);
?><span style="color: #ff9999;">irasymas pavyko</span><?
}// if irasyti
}//f_irasymas()
function f_trynimas(){
?><BR><a href="/index.php">atgal</a><br> <?
global $failas , $_GET;
$id = $_GET["id"];
$rasymas = $_GET["rasymas"];
$id = $id - 1;
echo "trinti $id elementa";
$data=file($failas);
$size=count($data);
echo "<br>dydis $size <br>";
echo "<pre>";
print_r($data);
echo "</pre>";
$file=fopen($failas,'w');
for($line=0;$line< $size ; $line++) {
if ($line == $id) continue ;
echo $data[$line] . "<br>";
fputs($file,$data[$line]);
}
fclose ($file);
}// f_trynimas
?>
