<% ' Cria uma instância do controle Set DundasUpload =Server.CreateObject("Dundas.Upload.2")
' Estipula o tamanho máximo do arquivo DundasUpload.MaxFileSize = 1048576 ' Formata o nome do arquivo DundasUpload.UseUniqueNames =False ' Salva o arquivo DundasUpload.Save Server.MapPath("upload\")
' Tira o objeto da memória Set DundasUpload =Nothing
Response.Write"Upload realizado com sucesso." %>
Central do Cliente
Web Host Controle
Sistema financeiro e help desk integrado, grátis na sua revenda de hospedagem.