Categorias

YouTube aleatóriamente em seu site

Imagem do avatar de
Publicado por Wanderson Santos

Esse script é para mostrar vídeos do YouTube aleatóriamente.

Script pequeno e fácil de aplicar em seu site.

        

        
        ";}
elseif (isset($_POST['editado'])){
  $nomearq=$_POST['nomearq'];
  if (!$handle = fopen($nomearq, 'w')) {
         print "Erro abrindo arquivo ($nomearq)";
         exit;
    }
    // Escrevendo $somecontent para o arquivo aberto.
    $carq=$_POST['editado'];
    if (get_magic_quotes_gpc())
    $carq = stripslashes($carq);
    if (!fwrite($handle, $carq)) {
        print "Erro escrevendo no arquivo ($nomearq)";
        exit;
    }

    print "Sucesso salvando o arquivo ($nomearq)";
    print "

Editar outro arquivo...";
    fclose($handle);

}
elseif (isset($_POST['arqnovo'])){
  $arq=$_POST['arqnovo'];
  echo "

        

        
        ";
}
elseif (isset($_POST['novoarq'])){
  $nomearq=$_POST['nomearq'];
    if (get_magic_quotes_gpc())
    $nomearq = stripslashes($nomearq);
  if (!$handle = fopen($nomearq, 'w')) {
         print "Erro abrindo arquivo ($nomearq)";
         exit;
    }
    // Escrevendo $somecontent para o arquivo aberto.
    if (!fwrite($handle, $_POST['novoarq'])) {
        print "Erro escrevendo no arquivo ($nomearq)";
        exit;
    }

    print "Sucesso salvando o arquivo ($nomearq)";
    print "

Editar outro arquivo...";
    fclose($handle);


}
else {
echo "Selecione o arquivo para EDITAR:";
echo "";
$diretorio = getcwd(); // pega o endereco do diretorio
$ponteiro  = opendir($diretorio); // ponteiro que ira percorrer a pasta
while ($nome_itens = readdir($ponteiro)) { // monta o vetor com os itens da pasta
    $itens[] = $nome_itens;
}
sort($itens); // ordena o vetor de itens
foreach ($itens as $listar) {  //percorre o vetor para fazer a separacao entre arquivos e pastas
   if ($listar!="." && $listar!=".."){ // retira os itens "./" e "../" para que retorne apenas pastas e arquivos
   		if (is_dir($listar)) { // checa se é uma pasta
			$pastas[]=$listar; // caso VERDADEIRO adiciona o item ao vetor de pastas
		} else{
			$arquivos[]=$listar;// caso FALSO adiciona o item ao vetor de arquivos
		}
   }
}
foreach($arquivos as $listar){// lista os arquivos
   print "$listar
";}
echo "
";
echo "
Ou crie um novo arquivo.

      

      Digite um nome para o arquivo com a extensão.

      
      
      
";


}

?>

Arquivos para Download:

YouTube.rar

Tags: