Dúvida String e Word

17/08/2004

0

Vejam a minha dúvida. Tenho um arquivo de backup q é feito da seguinte forma:
Qdo se vira o ano é criada uma pasta cujo nome é o ano corrente(2004)
Dentro desta pasta, são criadas outras 12(uma cada mês), cujos nomes são
referentes ao numeral q representa cada mês(Jan=01,fev=02 março=03 e etc..)
no nosso caso 08(Agosto) e o arquivo de backup leva o nome back, seguido do
dia mais extensão .zip, assim se fosse feito hoje(17/08/2004) seria:
back17.zip. Existe um programa q eu estou desenvolvendo, no qual, este forum
me ajudou e emuito a desenvolvê-lo, precisa fazer uns passos automaticamente.
O backup fica numa máquina da rede, onde eu pego descompacto e mando para
a pasta FTP onde será feito um UpLoad do mesmo. A dúvida é a seguinte:
Eu não tô conseguindo passar automaticamente a pasta mes e o arquivo de
backup, ou seja,o programa deve fazer tudo automaticamente. Criei um .ini para
configurar o path, até ai tudo. Dei um DecodeDate na data para adicionar o
nome da pasta onde esta o back, só que o Decodate vem 8 para agosto e não 08,
tentei transformar em string e acrscentar a string ´0´, mas mesmo assim nada.
Estes parâmetros devem ser passados em runtime. O mesmo está acontecendo com o arqui
vo de back, onde dou um copy no dia decodificado, e ´emendo´ a palavra back,
mas também não vai. Caso haja dúvida no q escrevi, fá-lo-ei pasa-a-passo.
Passar a dúvida pro texto é mais difícil q aprender delphi.


Paulo

Paulo

Responder

Posts

17/08/2004

Tatuweb

só que o Decodate vem 8 para agosto e não 08, tentei transformar em string e acrscentar a string ´0´

Se o problema é esse a função abaixo deve resolver:

ShowMessage (FormatDateTime (´mm´, Now); [color=blue:85f13833bc]// retorna ´08´[/color:85f13833bc]
ShowMessage (FormatDateTime (´m´, Now); [color=blue:85f13833bc]// retorna ´8´[/color:85f13833bc]
ShowMessage (FormatDateTime (´mmm´, Now); [color=blue:85f13833bc]//retorna ´ago´[/color:85f13833bc]
ShowMessage (FormatDateTime (´mmmm´, Now); [color=blue:85f13833bc]//retorna ´agosto´[/color:85f13833bc]


Responder

17/08/2004

Paulo

Resolvi a questão, realmente faltou paciência a mim e atenção. Valeu a todos!


Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

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

Aceitar