Fórum UpLoad de arquivos Delphi 2005 #287378
07/07/2005
0
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
Curtir tópico
+ 0Posts
07/07/2005
Cristiam
Gostei + 0
07/07/2005
Edineidaniel
Tentei de uma forma... mas ele corrompe os arquivos...!!!!
E ai o q vc me diz..?
t+
Edinei
Gostei + 0
08/07/2005
Sanses
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
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)