Jump to content


rackfel

Member Since 16/03/2010
Offline Last Active 13/04/2010, 13:22
-----

Topics I've Started

Listar / Deletar Arquivos De Um Diretorio

06/04/2010, 11:59

Bom dia, estou usando o ftp_nlist para listar os arquivos de um diretorio e criar um link para download deles
ele tah listando os arquivos de dentro de uma pasta que os usuarios farão o upload dos arquivos lá
até ai sem problemas
mas, tem um arquivo, "download.php" nessa pasta que força o download, eu queria que esse arquivo não fosse listado, eu tentei um monte de coisa, mas, ele num lista nenhum arquivo do diretorio
o codigo é assim:

remote_dir='webroot/ftp/usuario/ftp/'; // Caminho para o diretório remoto
$ftp_server = 'meudominio.net.br'; // FTP do destino
$ftp_user_name = 'usuario';
$ftp_user_pass = 'senha';


// Conexão
$conn_id = ftp_connect($ftp_server);

// login 
$login_result = ftp_login($conn_id, $ftp_user_name, $ftp_user_pass);

// listando arquivos do diretório
$contents = ftp_nlist($conn_id, $remote_dir);


// exibindo
echo '

      ';
	 
      foreach($contents as $file)
	  	    echo '<a href="/ftp/usuario/ftp/download.php?arquivo='.  (str_replace($remote_dir,"",$file)) . ' ">   <br>' . (basename($file)) .' </a>
      ';
      echo '
            ';
			


// fecha a conexão
ftp_close($conn_id); ?>

então, é isso, eu queria que ele não listasse o download.php, mas, no link ali depois do echo ele tem que ser assim para forçar o download...
isso é o primeiro
segundo, eu queria que, depois de cada link, ou em uma pagina diferente, desse para excluir o arquivo...
se fosse em uma pagina diferente, teria que ter um "exclua.php" ou algo assim, sabe?
é essas duas coisas, alguem sabe?

Formulario De Download

23/03/2010, 16:51

hoje meu problema é com PHP, eu preciso de um formulario que liste todos os arquivos que estão em uma pasta do FTP para que clientes possam baixá-las, me passaram o seguinte codigo.

<?php

// define some variables
$local_file = 'php://stdout';
$server_file = isset($_GET['arquivo'])?$_GET['arquivo']:NULL;
if($server_file!=NULL)
{

$remote_dir='\webroot'; // Caminho para o diretório remoto
$ftp_server = 'ftp.seudominio.net.br'; // FTP do destino
$ftp_user_name = 'usuario';
$ftp_user_pass = 'senha';

// conectando
$conn_id = ftp_connect($ftp_server);
// login 
$login_result = ftp_login($conn_id, $ftp_user_name, $ftp_user_pass);

// efetuando o download
if (!ftp_get($conn_id, $local_file, $server_file, FTP_BINARY)) {
   
    echo "Ocorreu um erro\n";
}

// fecha a conexão
ftp_close($conn_id);
exit;

?>

ele lista todos os arquivos da pasta, só que num da nenhuma opção de download...
era isso que queria saber

[Resolvido] Download Em Asp

16/03/2010, 17:50

Eu vou atualizar um site porque, na hora que os clientes da empresa clikam no download, ele abre a caixa normal, mas, é um arquivo .zip e ele coloca abrir com o Acrobat, a maioria dos clientes coloca abrir com direto, da ok sabe? Ai da erro e eles ligam reclamando, então, eu queria saber se tem como configurar essa janela de download com algum codigo ou sei lah, ou mudando o "abrir com" ou, ao invez de estar selecionado ele, vier selecionado o "download"
tem como ou nem rola?

o site é em flash, mas, quando a pessoa clicka no link, ele abre o codigo do asp que é esse daki:

<%
call Forca_Download()
'
'Força o Download
Public Sub Forca_Download()
	dim objArq	'Objeto Arquivo
	dim oArq	'Arquivo q sera aberto
	'	
	'Arquivo que será salvo
	strNome = request("arquivo")
	'
	'Adiciona o Content/Type
	Call Response.AddHeader("Content-Disposition","attachment; filename=""" & strNome & """")
	'
	'Força a Tela de Download
	Response.ContentType = "bad/type"		
	'
	'Cria o Objeto Arquivo
	set objArq = Server.CreateObject("Scripting.FileSystemObject")		
	'
	'Abre o Arquivo 
	Set oArq = objArq.GetFile(server.MapPath(request("arquivo"))).OpenAsTextStream(1,-1)	
	'
	'Escreve todo o arquivo em modo Binario
	Do While Not (oArq.AtEndOfStream)
		'
		'Escreve o Conteudo
		Response.BinaryWrite(oArq.Read(1))
		'
	Loop
	'
	'Fecha o Arquivo
	oArq.Close
	'
	'Limpa as Variaveis
	set oArq = nothing
	set objArq = nothing
	'
End Sub
 %>

agradeço desde já.

IPB Skin By Virteq