Transformaçao de texto para data

Fórum sobre a linguagem CA-Clipper.

Moderador: Moderadores

Avatar do usuário
matrix
Usuário Nível 3
Usuário Nível 3
Mensagens: 131
Registrado em: 06 Jul 2004 08:41
Localização: Paraná
Contato:

Transformaçao de texto para data

Mensagem por matrix »

pessoal, tive um branco mesmo, e estou com uma dúvida em:

importo de um txt, os dados em formato texto que é 20040331, e tenho que gravar em um campo com formato data, com set date british, como escrever esta rotina..?????

Agradeço.
"Ter Problemas é Inevitável, ser derrotado por eles é opcional.!!"
evolver
Membro Master
Membro Master
Mensagens: 189
Registrado em: 28 Ago 2004 01:02
Localização: Cruz Alta - RS
Contato:

Mensagem por evolver »

Simples assim serve?

function convertedata(data)
data=right(data,2)+"/"+substr(data,5,2)+"/"+left(data,4)
data=ctod(data)
return data
Sergio "Evolver" Fagundes

CURVE-SE DIANTE DE MIM SER INSIGNIFICANTE, POIS EU SOU ROOT
Só respondo em PVT perguntas relativas ao que eu faço. Qualquer outra dúvida favor postar no fórum.
Peço aos veteranos que antes de responder a uma pergunta repetida dêem uma pesquisada e instruam a quem perguntou a fazer o mesmo.
Responder