Results 1 to 3 of 3

Thread: zap.exe and robocopy.exe

  1. #1
    I could stop if I wanted to jgratton's Avatar
    Join Date
    2002-07
    Location
    Calgary, Canada
    Posts
    397
    Login to Give a bone
    0

    Question zap.exe and robocopy.exe

    Has anyone heard of this for use in bat files to clean/copy to user's workstations. Where can I get a copy?

  2. #2
    AUGI Addict
    Join Date
    2015-12
    Location
    Arizona
    Posts
    2,478
    Login to Give a bone
    0

    Default Re: zap.exe and robocopy.exe

    Here Janet...

    Try this robocopy

    Never used it.....

  3. #3
    Administrator richard.binning's Avatar
    Join Date
    2015-12
    Location
    In the foothills of the appalachians
    Posts
    2,261
    Login to Give a bone
    0

    Talking Re: zap.exe and robocopy.exe

    Quote Originally Posted by janetgratton
    Has anyone heard of this for use in bat files to clean/copy to user's workstations. Where can I get a copy?
    I prefer to do it all inside of AutoCAD. Drop the following into your acad.lsp file to copy missing files automatically to your users' pc.

    An Easy way to update Users Local files



    Do you want to always ensure that your users have the same custom files available for use in AutoCAD? An easy way to do this is to create a "seed file" folder on your network and then copy the following snippet of code into their acad.lsp file. Keep the acad.lsp file on the network and point each user to it and you can keep all your users up to date.

    Assumption for this example:


    • Custom lisp files needed by all users are available
      at the following location: x:\custom\lisp
    • Users will need the files in the following
      location: c:\custom\lisp
    Code:
    ;;; Check the following directory for standard seed files for users
    ;;; If they are not resident then copy them over.
    (setq SeedFiles "x:\\custom\\lisp" )
    (setq RootUser "c:\\custom\\lisp")
    ;;;Use the foreach to cycle through each file found and check for a local copy
    ;;;If not found then copy it over and report...
    (foreach n 
    	 (vl-directory-files SeedFiles nil 1)
    	 (if (/= 
    		 (vl-file-systime (strcat RootUser "\\" n)
    		 )
    	 nil)
    	 (princ) 
    	(progn (vl-file-copy
    				 (strcat SeedFiles "\\" n) 
    				 (strcat RootUser "\\" n)
    				  ) ;copy file 
    				 (prompt 
    					   (strcat "\nCopying " n " to User Personal folder on " RootUser)
    				  ) 
    	   );end progn file copy 
       );end for each
    );end macro
    (princ)

    Hope that was helpful.

Similar Threads

  1. Robocopy in Accaddoc.lsp
    By Mitch Mermel in forum AutoLISP
    Replies: 3
    Last Post: 2014-08-27, 06:10 PM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •