Topic: How do I find the location of MyDocuments folder?

[Krushert]

Using lisp, what do I use to find the location of MyDocuments folder?

FindFile will not work here  because the users MyDocuments folders resides between the parallel universe of the server and client machine.  I am being a wise flower and it long story as to why I want Autocad to find and it and not me hard coding the path into my code.  One reason is that I want to see if really knows where the folder is and not it following my path blindly.

The path as seen in the options dialog is

Code: [Select]

\\cws-server\users\ted krush\my documents\

[alanjt]

Code: [Select]

(getvar 'MYDOCUMENTSPREFIX)

[Krushert]

Duhh!  "prefix"  I never thought of searching by prefix!   Thanks.

[alanjt]

Duhh!  "prefix"  I never thought of searching by prefix!   Thanks.

I opened SYSVDLG and typed in *doc*.

[ronjonp]

Doesn't answer you question but here's a peek to the "special" folders:

Code: [Select]

(defun c:test (/ n out sa sp)
  (and (setq sa (vlax-create-object "WScript.Shell"))
       (setq sp (vlax-get sa 'specialfolders))
       (setq n -1)
       (repeat (vlax-get sp 'length) (setq out (cons (vla-item sp (setq n (1+ n))) out)))
       (alert (vl-prin1-to-string out))
  )
)

[alanjt]

Very nice, Ron.

also...

Code: [Select]

Command: (findfile ".")
"C:\\Users\\athompson\\Documents"

[ronjonp]

Very nice, Ron.

also...

Code: [Select]

Command: (findfile ".")
"C:\\Users\\athompson\\Documents"

  What is (findfile ".") pointing to?
Mine prints "C:\\Program Files\\Aqua Engineering, Inc\\WatermarkID 2009"

[alanjt]

Very nice, Ron.

also...

Code: [Select]

Command: (findfile ".")
"C:\\Users\\athompson\\Documents"

  What is (findfile ".") pointing to?
Mine prints "C:\\Program Files\\Aqua Engineering, Inc\\WatermarkID 2009"

Sorry, I meant type out the question of what it returns for you.  :ugly:
I stumbled across that the other day and was quite puzzled by it - works with ".." also.

[Jeff_M]

I believe this returns the "Start in" folder specified in the shortcut used to start acad.

[alanjt]

I believe this returns the "Start in" folder specified in the shortcut used to start acad.

I'm using pinned shortcuts in Win7, so that's probably why I'm receiving my documents folder. Interesting.

[ronjonp]

I believe this returns the "Start in" folder specified in the shortcut used to start acad.

Looks to be the case here. Thanks Jeff.

[laidbacklarry]

(findfile ".") is interesting.

This goes back to the days of DOS. Every directory (folder) contains two "files" - A single dot represents the "current" directory (folder); two dots represents the parent of the current directory (folder), i.e., the part of the path returned by single dot with the current directory chopped off. And while that is initally the "Start in" folder listed in the ACAD shortcut, some commands, such as SAVEAS, can change the current directory to whatever directory is selected for the "Save to". This can be very bothersome when some user settings are predicated on the current directory always being the Start in folder.

[alanjt]

(findfile ".") is interesting.

This goes back to the days of DOS. Every directory (folder) contains two "files" - A single dot represents the "current" directory (folder); two dots represents the parent of the current directory (folder), i.e., the part of the path returned by single dot with the current directory chopped off. And while that is initally the "Start in" folder listed in the ACAD shortcut, some commands, such as SAVEAS, can change the current directory to whatever directory is selected for the "Save to". This can be very bothersome when some user settings are predicated on the current directory always being the Start in folder.

Very interesting. I never considered the days of running DOS and typing cd.. to back up one directory folder.

[Lee Mac]

I'd probably go with the SpecialFolders object, but for more cat-skinning:

Code: [Select]

(vl-registry-read "HKEY_CURRENT_USER\\Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Shell Folders" "Personal")

[JohnK]

What do you mean `dos days' (I sense some nostalgia). ...I still use those dots.

My entry.
(getstring "\nEnter the path to your \"My Documents\" folder: ")


:p