- Código Fonte
- Artigos e Tutoriais
- Vídeo Aulas
- Notícias
- Entrevistas
- Downloads
- Conteúdo MX
- Fórum
- Atividades
PUBLICIDADE
Este código tem nota
6
imprimir
indique
assine
retwiteAutor
Rodrigo Araujo
membro deste abril de 2007
Tags
Compartilhe e guarde
PUBLICIDADE
Enquete
O Facebook vai deslanchar no Brasil, assim como o Orkut?
Função para renomear arquivos no ASP com FSO
Com esta função é possível renomear arquivos no servidor utilizando o componente FileSystemObject (FSO).
O arquivo será renomeado de acordo com o tempo no servidor. Por exemplo se no servidor a data e hora for: 07/09/2007 22:38 hrs e o arquivo for do tipo JPG o nome do arquivo será "070920072238.jpg".
O arquivo será renomeado de acordo com o tempo no servidor. Por exemplo se no servidor a data e hora for: 07/09/2007 22:38 hrs e o arquivo for do tipo JPG o nome do arquivo será "070920072238.jpg".
<%
function renomear(nome)
Set ObjetoFSO = Server.CreateObject("Scripting.FileSystemObject")
extensao = ObjetoFSO.GetExtensionName(nome)
dia1 = now()
dia1 = replace(dia1,"/","")
dia1 = replace(dia1,":","")
dia1 = replace(dia1," ","")
renomear = dia1&"." & extensao
ObjetoFSO.close()
Set ObjetoFSO = nothing
end function
'Exemplo de chamada
call renomear("foto.jpg")
%>
Este código foi útil para você?
Regras:
Os comentários seguem as seguintes regras:
Os comentários seguem as seguintes regras:
- Todos os comentários são enviados por membros cadastrados no site.
- A pontuação de comentários de conteúdo do próprio membro não serão computados.
- Os comentários serão pré-aprovados, porém a equipe do site revisará o conteúdo de todos os comentários podendo ser invalidados (inclusive a pontuação).
- Os comentários precisam ter, obrigatóriamente, coerência sobre o conteúdo que será comentado.
- O membro que atingir 5 comentários invalidados não poderá mais comentar dentro do site. Com isso o membro não poderá mais ganhar pontos com comentários.
- Há um limite de 10 comentários por dia para cada membro.
- Qualquer comentário após ter sido publicado poderá ser retirado através da opção (
denunciar)
Comente
© 2006-2009 R&W Informática Ltda. - Todos os direitos reservados.