function esfecha(cValor)
return iif(dtos(ctod(cValor))=space(8),.f.,.t.)
Cuando se le pasa una cadena de caranteres determina si la misma es una fecha o no.
Return to FiveWin para Harbour/xHarbour
Users browsing this forum: Cgallegoa, Google [Bot] and 58 guests