Application’s Date & Time

Posted on by vivaclipper

How I can obtain date and time of my application ?

PROC MAIN()
   * lib : hbct
   SETMODE( 25, 80 )
   CLS

   SET DATE GERM
   SET CENT ON
   ? "Date of this application :", FILEDATE( HB_PROGNAME() ) 
   ? "Time of this application :", FILETIME( HB_PROGNAME() )
   ? 
   WAIT "EOF AppDaTim.prg"

RETURN // MAIN ( AppDaTim.prg )

Leave a Reply

Fill in your details below or click an icon to log in:

Gravatar
WordPress.com Logo

You are commenting using your WordPress.com account. ( Log Out /  Change )

Google photo

You are commenting using your Google account. ( Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. ( Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. ( Log Out /  Change )

Cancel

Connecting to %s

This site uses Akismet to reduce spam. Learn how your comment data is processed.