How can I add file to startup suite

[Sgear]

Hi

I was try to add file to startup suite

if I have one file there then this works I see the file I add but not if I add new file for first time then Autocad clear Regestry

when I open APPLOAD

is it not possible to add file to Regestry startup suite with VB.NET

I work on sample from https://www.theswamp.org

       Dim regKey As RegistryKey
       
        regKey = My.Computer.Registry.CurrentUser.OpenSubKey("Software\Autodesk\AutoCAD\R20.0\ACAD-E002:409\Profiles\", True)

        Dim Profiles() = regKey.GetSubKeyNames 

        For Each Profiles_subfolder In Profiles 

            Dim Profile_subfolder As RegistryKey = regKey.OpenSubKey(Profiles_subfolder + "\" + "Dialogs\Appload\Startup\", RegistryKeyPermissionCheck.ReadWriteSubTree)

            Dim NUMBER As String = Profile_subfolder.GetValue("NumStartup").ToString

            Profile_subfolder.SetValue("NumStartup", (CInt(NUMBER) + 1).ToString)
            Profile_subfolder.SetValue((CInt(NUMBER) + 1).ToString + "Startup", "C:\Users\Sigster_pc\Downloads\ConvertNet2\te.lsp")

        Next Profiles_subfolder

[Sgear]

Found out I need to exit Autocad then this is ok I can Add the file

are any change I can add the file when Autocad is running