$contenido = '<?xml version="1.0" encoding="utf-8"?>
<playlist version="1" xmlns="http://xspf.org/ns/0/">
	<trackList>';
while($file=readdir($dp))
       {
        $extension=getExtension($file);
	      if($extension=="mp3")
	         {
                  $filenames[]=$file;
                }
       }
sort($filenames);
for($i=0;$i<count($filenames);$i++)
    {
     $ruta=$referer."/".$filenames[$i];
     $rolaname=substr($filenames[$i],0,-4);
     $se=sepcade($rolaname);
		 $contenido.='
<track>
<title>'.$se.'</title>
<creator></creator>
<location>'.$ruta.'</location>
</track>';
}

if (is_writable($archivo))
   {
    // En nuestro ejemplo estamos abriendo $nombre_archivo en modo de adición.
    // El apuntador de archivo se encuentra al final del archivo, asi que
    // alli es donde ira $contenido cuando llamemos fwrite().
    if (!$gestor = fopen($archivo, 'wb'))
		     {
          echo "No se puede abrir el archivo ($archivo)";
          exit;
         }
    // Escribir $contenido a nuestro arcivo abierto.
    if (fwrite($gestor, $contenido) === FALSE)
		    {
         echo "No se puede escribir al archivo ($archivo)";
         exit;
        }
		 fclose($gestor);
    }

switch($accion){
  case 'regi':
	  echo $nombre."  ".$fon;
		$consulta="INSERT INTO `agenda` (`nombre`, `fon`) VALUES('$nombre','$fon');";
		$resultado=mysql_query($consulta)or die ("error en la consulta". mysql_error());
	break;
	case 'leer':
	    $consulta="SELECT * FROM `agenda`;";
	    $resultado=mysql_query($consulta)or die ("error en la consulta". mysql_error());
	    $nfilas=mysql_num_rows($resultado);
	    echo "filas=".$nfilas;
	    echo "&registros=";
	    while($fila=mysql_fetch_row($resultado))
		    {
		     echo "<b>Nombre:</b> ".$fila[1].'<br />'."<b>Teléfono:</b> ".$fila[2].'<br<br /><br /><br />';
		    }
	break;
	case 'busca':
	     if($crite=="byname")
	        {
                   $consulta="SELECT * FROM `agenda` WHERE `nombre`='$valor';";
                }
	    if($crite=="byfon")
	        {
                  $consulta="SELECT * FROM `agenda` WHERE `fon`=$valor ;";
                }
	    $resultado=mysql_query($consulta)or die ("error en la consulta". mysql_error());
	    echo "&buscar=";
	    while($fila=mysql_fetch_row($resultado))
	            {
		      echo "<b>Nombre:</b> ".$fila[1].'<br />'."<b>Teléfono:</b> ".$fila[2].'<br<br />'
                    }
        break;
}

function leer()
       {
	  regis=new LoadVars;
          regis.load(_global.server+"phpf/agenda.php?accion=leer");
          regis.onLoad=function ()
		 {
                   registro.htmlText=this.registros;
                 }
      }

datos = new LoadVars();
datos.nombre = nom;
datos.fon = fo;
function registra()
       {
        datos.sendAndLoad(_global.server + "phpf/agenda.php?accion=regi", datos, "POST");
        datos.onLoad = function(success){
			if(success){
				nombre.text="";
				fon.text="";
				msg.text="Datos registrados";
				}
		      }
     }

<form action='una_page.php' method="post" onSubmit="return checkData()" name="forc">
<p>
   <label for="user">Usuario:</label><input name="user" type="text" size="20" />
</p>
<!--Campo falso-->
<p>
   <label for="pass">Password</label><input name="passwordmd5" type="password" size="20" />
</p>
<!--Campo oculto-->
<p>
   <input name="password" type="hidden"    size="40" />
</p>
<p align="center">
    <input type="submit" value="Entrar" class="enviar"/>
</p>
</form>

function checkData()
  {
    document.forc.password.value=hex_md5(document.forc.passwordmd5.value);
  }

function sepcade($cadena)
        $cade3="";
        $cade2=explode( "_", $cadena );
	      for($j=0;$j<count($cade2);$j++)
	        {
	         $cade3.=$cade2[$j]." ";
	        }
      	return $cade3;
       }

function playmovie(file)
     {
      var video = new SWFObject("http://erufenix.codesys.org/media/flvplayer.swf", "mymovie", "640", "480", "8", "#336699");
      var sep_file=file.split("/");
      var sep2_file=sep_file[5].split(".");
      var sep3_file=sep_file[5].split("_");
      video.addVariable("file",file);
      video.addVariable("autostart","true");
      video.addParam("wmode", "transparent");
      video.write("videos");
      var sej=cadesep(sep3_file);
      xInnerHtml('title2', "Estas viendo: " + "<a href='" + file + "'>" + sej + "<\/a>")
      document.title = ":: Videos de erufenix :: - "+sej;
     }