File dates

[KDJ]

Templar

To extract date part from a timestamp you can use hb_TtoD function:
dCreate := hb_TtoD(tCreate)

[mustafa]

For the date to come out well --> dd.mm.yyyy
did this occur to me?
Greetings to Master KDJ

Code: Select all

 SET DATE GERMAN
 SET CENTURY ON
 SET CODEPAGE TO UNICODE
....
 IF ! oFolder:IsRootFolder
      tCreated := oFolder:DateCreated

     dCreate := hb_TtoD(tCreated)       // <---  KDJ solution

                Pro1DiaS   :=  SUBSTR( hb_TStoStr(tCreated) ,9,2 )  
                Pro1MESX  :=  SUBSTR( hb_TStoStr(tCreated) ,6,2 )  
		Pro1ANYO :=  SUBSTR( hb_TStoStr(tCreated) ,1,4 )            
		
		Atox1    :=   Pro1DiaS +"."+ Pro1MESX +"."+ Pro1ANYO    // Fecha Correctas 
                Atox2    :=   SUBSTR(  hb_TStoStr(tCreated) ,12,8 ) 
     
       MsgBox( dCreate )   //  <---  KDJ solution       
       MsgBox("Folder:" + CRLF + CRLF + cFolder + CRLF + CRLF + "has been created: "+ Atox1 + SPACE(1) + Atox2  , "Success")
  *    MsgBox("Folder:" + CRLF + cFolder + CRLF + CRLF + "has been created: " + hb_TStoStr(tCreated) , "Success")
    ELSE
.......

PD: Best solution: the contribution of the Master KDJ

Regards
Mustafa

[Templar]

Ah but where is " hb_TtoD" ? It's not in the standard library!

[edk]

Ah but where is " hb_TtoD" ? It's not in the standard library!

https://github.com/Petewg/harbour-core/ ... y-category
https://github.com/Petewg/harbour-core/wiki/Date-Time

[serge_girard]

Harbour is so extended, one cannot remember all !

[Templar]

Right, thanks for that; got it sorted finally!!
Templar