- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
Can some take a look at this for me and tell me what I am doing wrong.
;;** Sets the Path for Pipes **
(setq pipecatpath1 (vla-registry-read "HKEY_CURRENT_USER\\Software\\Autodesk\\AutoCAD\\R19.1\\ACAD-D000:409\\Profiles\\<<C3D_Imperial>>\\Preferences\\AeccUiNetwork100\\16C49365-B844-484b-92CE-9A8ACE681B57))
(if (/= pipecatpath1 "C:\\ProgramData\\Autodesk\\C3D 2014\\enu\\Pipes Catalog\\US Imperial Pipes\\US Imperial Pipes.apc")
(vla-registry-write "HKEY_CURRENT_USER\\Software\\Autodesk\\AutoCAD\\R19.1\\ACAD-D000:409\\Profiles\\<<C3D_Imperial>>\\Preferences\\AeccUiNetwork100\\16C49365-B844-484b-92CE-9A8ACE681B57"
"pipecatpath1" "L:\\Resource Library\\Cad\STANDARDS\\Civ\\Pipes_Catalog\\US Imperial Pipes\\US Imperial Pipes.apc")
;;** Sets the Path for Structures **
(setq pipecatpath2 (vl-registry-read "HKEY_CURRENT_USER\\Software\\Autodesk\\AutoCAD\\R19.1\\ACAD-D000:409\\Profiles\\<<C3D_Imperial>>\\Preferences\\AeccUiNetwork100\\DCE203A2-D381-466f-A23E-08A9D9F8FDBD))
(if (/= pipecatpath2 "C:\\ProgramData\\Autodesk\\C3D 2014\\enu\\Pipes Catalog\\US Imperial Pipes\\US Imperial Structures.apc")
(vl-registry-write "HKEY_CURRENT_USER\\Software\\Autodesk\\AutoCAD\\R19.1\\ACAD-D000:409\\Profiles\\<<C3D_Imperial>>\\Preferences\\AeccUiNetwork100\\DCE203A2-D381-466f-A23E-08A9D9F8FDBD"
"pipecatpath2" "L:\\Resource Library\\Cad\STANDARDS\\Civ\\Pipes_Catalog\\US Imperial Pipes\\US Imperial Structures.apc")
Solved! Go to Solution.
