Topic: (vl-registry-read

[ronjonp]

How can I specify a wild card for this part of a registry key since it is different for each user?

(vl-registry-read "HKEY_USERS\\S-1-5-21-1645522239-861567501-725345543-1129\\......

Thanks,

Ron

[MP]

What application is generating it and what does it represent?

[Keith™]

Ok .. I'll throw you a bone ....

You will need to know a couple of things before you can do what you want ...

You need to know the computer name and user name ... these can be retrieved from the system environment ...
USERDOMAIN = computer name
USERNAME = current user

Once you have those, put the two together in this fashion ...
"USERDOMAIN_USERNAME"

Now that you have that, you need to look for this registry key:
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Syncmgr\ProgressState\USERDOMAIN_USERNAME\SID

The value will be the number you are looking for.

[ronjonp]

So what I'm trying to do here is make a company wide etransmit setup that will etransmit a zipped up project into the current drawing directory in a folder called "Submittal mm-dd-yyyy. I want to be able to write to the DestFolder key. Any ideas on this?

Here is the whole path:

(vl-registry-read "HKEY_USERS\\S-1-5-21-1645522239-861567501-725345543-1129\\Software\\Autodesk\\AutoCAD\\R16.1\\ACAD-301:409\\ETransmit\\setups" )

Thanks,

Ron

[Andrea]

So what I'm trying to do here is make a company wide etransmit setup that will etransmit a zipped up project into the current drawing directory in a folder called "Submittal mm-dd-yyyy. I want to be able to write to the DestFolder key. Any ideas on this?

Here is the whole path:

(vl-registry-read "HKEY_USERS\\S-1-5-21-1645522239-861567501-725345543-1129\\Software\\Autodesk\\AutoCAD\\R16.1\\ACAD-301:409\\ETransmit\\setups" )

Thanks,

Ron

if it's for all the same setting.....why not use the "C:\Documents and Settings\All Users\Desktop"  folder ?

[ronjonp]

How would one go about converting a string out of say ("testing") to "testing".

So I found listp kinda works but it give me this error:

(listp ("testing"))

; error: bad function: "testing"

thanks,

Ronl

[Andrea]

How would one go about converting a string out of say ("testing") to "testing".

So I found listp kinda works but it give me this error:

(listp ("testing"))

; error: bad function: "testing"

thanks,

Ronl

(car (list "testing"))

[ronjonp]

Muchos Gracias Andrea!

After further testng it still doesn't work  .

[Keith™]

What are you trying to do ... I provided you with the path to the session ID of the windows session currently active. You should be able to reach the path using that info ...

[Bob Wahr]

I've run into quite a few things that Autocad stores in the registry and loads into memory when the session starts so changes to the registry don't actually change until acad is closed and restarted.

[Bob Wahr]

With a little testing though, it looks to me like the key you want is

Code: [Select]

My Computer\HKEY_CURRENT_USER\Software\Autodesk\AutoCAD\R16.2\ACAD-4001:409\ETransmit\setups\{setupname (ie Standard)}\DestFoldermodified to match your computer of course..  Doing a manual change in the registry followed by an etransmit, worked on my maching.

[ronjonp]

Keith,

I did a search for the path you showed but it only went this far:

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Syncmgr\

Then the next folder was "Handlers"

Thanks,

Ron

[ronjonp]

Bob you are correct.......sometimes I make things much harder than they need to be

I was already using this code for xref startup folders:

Code: [Select]

      (setq dwgpath  (strcat (getvar 'dwgprefix))
              profile (strcat (getvar 'cprofile))
              hkeyver (strcat "HKEY_CURRENT_USER\\Software\\Autodesk\\AutoCAD\\" "R" (substr (getvar 'acadver) 1 4))
              version (vl-registry-read hkeyver "CurVer")
              hkeyver (strcat "HKEY_CURRENT_USER\\Software\\Autodesk\\AutoCAD\\" "R" (substr (getvar 'acadver) 1 4) "\\" version "\\Profiles\\" profile "\\Dialogs\\")
       ) 
Ron

[whdjr]

How would one go about converting a string out of say ("testing") to "testing".

So I found listp kinda works but it give me this error:

(listp ("testing"))

; error: bad function: "testing"

thanks,

Ronl

How about 'read'?

[Andrea]

How about 'read'?

Wh...

this is the result.

Code: [Select]

AutoCAD menu utilities loaded.
Command: (read "testing")
TESTING

Command: (read (list "testing"))
; error: bad argument type: stringp ("testing")

Command: (read "testing")
TESTING

Command: (read ("testing"))
; error: bad function: "testing"

Command: (read '("testing"))
; error: bad argument type: stringp ("testing")

Command: (car (list "testing"))
"testing"