Fórum UpLoad de arquivos Delphi 2005 #287378

07/07/2005

0

Boa Tarde pessoal,

Preciso de ajuda para desenvolver um modulo onde tenho q fazer um upload de arquivos...!!!

Estou usando Delphi 2005, asp.NET

Agradecido..
Att,
Edinei


Edineidaniel

Edineidaniel

Responder

Posts

07/07/2005

Cristiam

Pesquisa sobre System.Io que vc vai encontrar o q deseja.... ;) é Fácil....


Responder

Gostei + 0

07/07/2005

Edineidaniel

Mas como vc implementa o código...

Tentei de uma forma... mas ele corrompe os arquivos...!!!!

E ai o q vc me diz..?

t+
Edinei


Responder

Gostei + 0

08/07/2005

Sanses

Olá

Faça assim:

Coloque um HtmlFileUpLoad, de um clique de direita nele e selecione run as a server. Depois adicione um botão e um label. No evento clique do botão digite o codigo:

var
  Arquivo : string;
begin
  if (file1.PostedFile.FileName = ´´) then
    label1.text := ´Selecione um arquivo !´
  else
  begin
   try
    Arquivo := ´.\´+ Path.getFileName(file1.PostedFile.FileName);
    file1.PostedFile.SaveAs(MapPath(´.´)+ Arquivo);
    label1.Text := ´Arquivo transferido com sucesso !´;
   except
    Label1.text := ´Arquivo não enviado corretamente !´;
   end; 
  end;
end;


[]´s
Sanses


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar