home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / CODIGO_1 / DAT_TIME / DATETIME.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1991-10-07  |  2.2 KB  |  39 lines
  1. Form1
  2. Date/Time Example
  3. Form1,
  4. Label1
  5. -Double Click a file to display it's date/time
  6. Drive1
  7. File1
  8. Drive1_Change
  9. drive1
  10.     listindex
  11. driveS
  12. list1
  13. dir1^
  14. file1
  15. Dir1_Change
  16. File1_DblClick
  17. OFSTRUCT
  18. OpenFile
  19. OF_EXIST
  20. fmonth
  21. fyear
  22. fhour
  23. fminute
  24. fsecond
  25. Drive1_Change
  26. Dir1_Change
  27. File1_DblClick
  28.  Double clicking on the file list box will display the files
  29.  full path, name, date, time and size in the pic1 controll
  30. === setup the full path to the desired file=
  31. === setup an OFSTRUCT data structure
  32. === call the OpenFile api call to get needed data=
  33. === construct the date/time stamp 
  34. === get the file size
  35. === display the data in pic1
  36.    "t
  37. ##,###,###
  38.  bytesu
  39.