我在办公室里用它来确保外部参照可以在不同的子文件夹中找到。它还允许我将项目带回家,并为我的本地驱动器提供单独的路径,而不是试图模仿我的office服务器路径。
我为每个作业配置:
- (XYZ_SetProjectPath "ACME" "C:\\Data\\dla\\Dla-Projects\\COMPANY\\ACME\\Drawings;C:\\Data\\dla\\Dla-Projects\\COMPANY\\ACME\\Drawings\\Blocks;C:\\Data\\dla\\Dla-Projects\\COMPANY\\ACME\\Drawings\\Incoming\\Current;C:\\Data\\dla\\Dla-Projects\\COMPANY\\ACME\\Drawings\\Plot")
- ;;; from MP at theswamp.org
- (defun-q XYZ_SetProjectPath ( Name Path )
- ;; if it exists it overwrites the path,
- ;; otherwise it creates the entry
- ;; path is a semi colon delimited string
- ;; no hand holding, caller's responsibility
- ;; to use properly
- (vla-setprojectfilepath
- (vla-get-files
- (vla-get-preferences
- (vlax-get-acad-object)
- )
- )
- Name
- Path
- )
- )
|