home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 January / CHIPCD1_98.iso / software / tipsy / zoc / install.fil / SCRIPT / ZOCXFER.ZRX < prev   
Text File  |  1996-08-26  |  2KB  |  55 lines
  1. /*********************************************************************** 
  2.  
  3.    PLEASE SEE ZOCXFER.DOC FOR A DESCRIPTION OF HOW TO USE THIS FILE
  4.  
  5. ***********************************************************************/
  6.  
  7. /* get the call parameters:  PRE/POST UPLOAD/DOWNLOAD <filename> */
  8. PARSE ARG WITH "'"prepost"' '"updownload"' '"file"'"
  9.  
  10. /* don't delete the following line !!! */
  11. newfile= file
  12.  
  13. /* get filepath, filename and extension from file */
  14. filepath= FILESPEC("Path", file);
  15. filename= FILESPEC("Name", file);
  16. PARSE VALUE filename WITH filestem"."fileext
  17.  
  18. SAY "ZOCXFER.CMD: "prepost"|"updownload"|"filepath"-"filestem"-"fileext 
  19.  
  20. IF prepost="PRE" THEN DO 
  21.     /******************************************************************/
  22.     /* Before file transfers                                          */
  23.     /******************************************************************/
  24.  
  25.     IF updownload="UPLOAD" THEN DO 
  26.         /***************************************************************/
  27.         /* Before uploads                                              */
  28.         /***************************************************************/
  29.     END
  30.     ELSE DO
  31.         /***************************************************************/
  32.         /* Before downloads                                            */
  33.         /***************************************************************/
  34.     END
  35. END
  36. ELSE DO 
  37.     /*******************************************************************/
  38.     /* After file transfers                                            */
  39.     /*******************************************************************/
  40.  
  41.     IF updownload="UPLOAD" THEN DO 
  42.         /***************************************************************/
  43.         /* After uploads                                               */
  44.         /***************************************************************/
  45.     END
  46.     ELSE DO
  47.         /***************************************************************/
  48.         /* After downloads                                             */
  49.         /***************************************************************/
  50.     END
  51. END
  52.  
  53. RETURN newfile
  54.  
  55.