topic Re: working directory in VBA Forum

working directory

Anonymous — Tue, 24 Sep 2002 09:32:22 GMT

how to I change the working directory value for autocad without a shortcut?

Re: working directory

Ed__Jobe — Tue, 24 Sep 2002 10:19:15 GMT

Use the vb CurDir function.

Re: working directory

Anonymous — Wed, 25 Sep 2002 14:04:42 GMT

that tells me what it is but does not seem to let me change it.

That is the value I want to change. The help file seems to indicate that I
can not change the value. I must be missing something

"Mike Daugird" wrote in message
news:f111a63.-1@WebX.maYIadrTaRb...
> how to I change the working directory value for autocad without a
shortcut?
>
>
>
>

Re: working directory

Anonymous — Wed, 25 Sep 2002 14:12:03 GMT

I tried the following
Public Sub cha()
Dim sysVarName As String
Dim sysVarData As Variant
sysVarName = "CURDIR"
sysVarData = "c:/temp"
ThisDrawing.SetVariable sysVarName, sysVarData

MsgBox CurDir
End Sub
it kind of came from the help file, I tried forward and back slashes in the
c:/temp line and it does not matter.

I need a way to change this freakin variable
also curdir("C:\Temp\") gives an error and forward or backslashes does not
matter here either.

thanks

"Mike Daugird" wrote in message
news:f111a63.-1@WebX.maYIadrTaRb...
> how to I change the working directory value for autocad without a
shortcut?
>
>
>
>

Re:

Ed__Jobe — Wed, 25 Sep 2002 14:22:40 GMT

Sorry, it's been awhile since I used it. Use ChDrive and ChDir to set them. However, if you are planning to use this with acad's file nav dialogs and REMEMBERFOLDERS is set to 1, then this won't work. Acad stores each dialog's previously used folder in the registry. Look under HKEY_CURRENT_USER\Software\Autodesk\AutoCAD\R15.0\ACAD-2:409\Profiles\ProfileName\Dialogs\OpenSaveAnavDialogs\InitialDirectory for an example.

Re:

Ed__Jobe — Wed, 25 Sep 2002 14:24:16 GMT

CurDir is not an acad sysvar, but a vb function.