Topic: menu's and registries

[daron]

AutoCAD stores the name of the last loaded menu in the system registry.

Does anybody know what the name of the registry that handles this is and where it might be located? I'm having a problem with keeping custom menus loaded on restart.
 Thanks.

[Mark]

check under (vlax-product-key) for starters

[SMadsen]

Maybe ...

(setq username "whomever")
(setq str (strcat "HKEY_CURRENT_USER\\"
                  (vlax-product-key)
                  "\\Profiles\\"
                  username
                  "\\Menus"
          )
)

?

[Keith™]

HKLM/Software/Autodesk/AutoCAD/CurrentVersion/ ..../Profiles/....

The stuff in between is dependent upon what version(s) you have loaded

[Keith™]

Here use this code...
paste it into notepad and save it as AcadInfo.vbs

Code: [Select]


' AcadInfo.vbs
'
' ------------------------------------------------------------------------
'               Copyright (C) 2002-2004 BCI Computer Solutions
'
' This script is protected by copyright laws. You are granted the right to
' use this script only for the purposes of troubleshooting AutoCAD installations
' You may not copy, modify, reproduce or distribute this application
' (and/or any modified version) in any way. You agree that BCI Computer Solutions
' has no warranty, obligations or liability for the use of this Application.
' ------------------------------------------------------------------------
'
' This application will read the AutoCAD entries in the registry.

Dim CRLF

CRLF = Chr(13) & Chr(10)

L_Welcome_MsgBox_Message_Text   = "This application will read and display AutoCAD installation information"
L_Welcome_MsgBox_Title_Text     = "AutoCAD Registry Reader"
Call Welcome()


' ********************************************************************************
' *
' * Registry related methods.
' *

Dim WSHShell

Set WSHShell = WScript.CreateObject("WScript.Shell")
curver = WSHShell.RegRead ( "HKLM\Software\Autodesk\AutoCAD\curver")
locale = WSHShell.RegRead ( "HKLM\Software\Autodesk\AutoCAD\" & curver & "\curver")
serial = WSHShell.RegRead ( "HKLM\Software\Autodesk\AutoCAD\" & curver & "\" & locale & "\serialnumber")
cprofile = WSHShell.RegRead ( "HKCU\Software\Autodesk\AutoCAD\" & curver & "\" & locale & "\Profiles\")
MsgBox "Current Version: " & curver & CRLF & "Installation Code: " & locale & CRLF & "Serial Number: " & serial & CRLF & "Current

Profile: " & cprofile, vbInformation + vbOKOnly, "Installation Information"


' ******************
' *
' * Welcome
' *
Sub Welcome()
    Dim intDoIt

    intDoIt =  MsgBox(L_Welcome_MsgBox_Message_Text,    _  
                      vbOKCancel + vbInformation,       _  
                      L_Welcome_MsgBox_Title_Text )
    If intDoIt = vbCancel Then
        WScript.Quit
    End If
End Sub


[ronjonp]

Daron,

I have this same problem: I posted a lisp that should load the menu and place it for you but I cannot get it to work....any insight?

http://theswamp.org/phpBB2/viewtopic.php?p=16552#16552


Thanks,

Ron

[daron]

How's this for strange? I tried your suggestions and still couldn't find the registry, BUT, after enough persistence in menuloading it, it finally held. I think it might have something to do with the servers here. They've done some pretty strange things to it. This problem must be the reason that whomever "customized" things here, felt it necessary to "customize" the acad.mnu file instead of creating their own. Oh well. Problem seems to have fixed itself. Now I just need to find what it was so that other users don't have to keep typing menuload every time they open autocad. BTW, Thanks for your help everybody.