home *** CD-ROM | disk | FTP | other *** search
/ Beter Homes & Gardens: Complete Guide to Gardening / GARDENS.BIN / gardens / pstdis / pstvarbl.fxp (.txt) < prev    next >
MS Visual FoxPro App  |  1994-04-02  |  3KB  |  50 lines
  1. d:\grdncd\gardens\pstdis\pstdis.dbf
  2. d:\grdncd\gardens\F
  3. \pstdis\
  4. pstdis.var
  5. filename
  6. @total
  7. @list
  8. d:\grdncd\gardens\F
  9. \pstdis\
  10. pstdis.var
  11. filename
  12. @name[
  13. @image[
  14. @dir[
  15. @total
  16. f not crNAME
  17.         INDEX
  18. le =HANDLE
  19. ileSAVSECTIONSECTION
  20. peLIST
  21. /writFILENAME
  22. STRPTR
  23. ONIMAGES
  24. TE(DIR
  25. )    &SAVNAME
  26. crSAVIMAGES
  27. SAVDIR
  28.             SAVSECT
  29. x AKA
  30. avWRITE_VAR
  31. d:\grdncd\gardens\F
  32. \pstdis\
  33. filename
  34. @name
  35. @image[
  36. @image[
  37. @images
  38. FILENAME
  39. rSAVSECT
  40.         SAVDIR
  41. e =HANDLE
  42. eSAVNAME
  43. peINDEX
  44. ritSTRPTR
  45. SAVIMAGES
  46. WRITE_VAR
  47. d:\grdncd\gardens\pstdis\
  48. pstvarbl.fxp
  49. d:\grdncd\gardens\pstdis\pstvarbl.prg
  50.