Pdf underlay & Raster Image paths?

[muck]

AutoCAD 2010

 

Is there a way to change a pdf underlay path when drawing files are moved?

Is there a way to set the pdf path to match the drawing location so when a drawing

and pdf is moved and they have the same path the pdf will be linked to the drawing?

 

The same can be asked about raster image files & AutoCAD

Is there a way to set the raster image file to match the drawing location so when a drawing

and rastor image is moved and they have the same path the raster image will be linked to the drawing?

 

 

Thank you,

[SLW210]

Please read CODE POSTING GUIDELINES.

[JPD_1962]

[indent]; tested using AutoCAD 2011
; this is the list that is generated knowing the before and after paths of underlays
(setq UNDERLAYLIST (list 
(list "C:\\A-02.pdf" "C:\\PROJ1\\TEST\\A-02.pdf") 
(list "C:\\TEMP\\My Markups.dwfx" "C:\\PROJ1\\TEST\\My Markups.dwfx")
(list "C:\\TEMP\\Drawing2-Model.dwf" "C:\\PROJ1\\TEST\\Drawing2-Model.dwf")
(list "C:\\a001.dgn" "C:\\PROJ1\\TEST\\a001.dgn")
))
; this is the code that is run to process the list and change the path of all underlays in the list
(vl-load-com)
(vlax-for Blk (vla-get-Blocks (vla-get-activedocument (vlax-get-acad-object)))
(if (and (= (vla-get-IsXref Blk) :vlax-false)
(not (wcmatch (vla-get-name Blk) "*|*")))
(vlax-for Obj Blk
(if (and (vlax-write-enabled-p Obj)
(and ;_ UNDERLAY
(wcmatch (vla-get-ObjectName obj) "*Reference")
(vlax-property-available-p Obj "UnderlayName")
))
(progn
(if (setq UNDERLAY (assoc (vla-get-file Obj) UNDERLAYLIST))
(vla-put-file Obj (cadr UNDERLAY))
)
)
)
)
)
)
[/indent]

[cadvision]

XR at command prompt. Same dialog box for PDF, IMAGE etc and you can give new path