win 7 32. PB 12.1, ASA 9.0.2, ASA 12. ...
1. В автозагрузке имеется shortcut .lnk для старта сервера базы данных на ASA 9
2. После авто миграции базы с ASA 9 на ASA 12 меняю shortcut .lnk в автозагрузке:

// Change "Shopkeeper database.lnk" in Startup
oleobject lole_ws
oleobject lole_shortcut
string ls_lnk_file = "Shopkeeper Database.lnk"
string ls_startup
string ls_targetpath
string ls_workingdirectory
integer li_ret
try
lole_ws = create oleobject
li_ret = lole_ws.connecttonewobject("WScript.Shell")
ls_startup = lole_ws.SpecialFolders("Startup")

if fileexists(ls_startup + "\" + ls_lnk_file) then
filedelete(ls_startup + "\" + ls_lnk_file)
end if


lole_shortcut = lole_ws.CreateShortcut(ls_startup + "\" + ls_lnk_file)


ls_targetpath = is_asa12_folder_util
if right(ls_targetpath, 1) <> "\" then ls_targetpath = ls_targetpath + "\"
ls_targetpath = ls_targetpath + "dbsrv12.exe"
lole_shortcut.TargetPath = ls_targetpath
lole_shortcut.Arguments = " " + "C:\SU\DATABASE\SK_BASE.DB -n SK_199 -x TCPIP -c 20M"
ls_workingdirectory = is_asa12_folder_util
if right(ls_workingdirectory, 1) = "\" then
ls_workingdirectory = left(ls_workingdirectory, len(ls_workingdirectory) - 1)
end if
lole_shortcut.WorkingDirectory = ls_workingdirectory
lole_shortcut.WindowStyle = 1
lole_shortcut.Description = "Shopkeeper database after migration to ASA 12"
lole_shortcut.Save()
is_full_name_file_start_server_asa12_lnk = ls_startup + "\" + ls_lnk_file
return 1
catch(RuntimeError err)
return - 1
finally
if isvalid(lole_ws) then
lole_ws.disconnectobject( )
destroy lole_ws
end if
end try

3. Сразу после завершения миграции сервер стартует хорошо.
4. Проблема возникает когда перегрузить комп. Стартует сначала asa 9. Хотя в автозагрузке видно только один shortcut .lnk для старта ASA 12. А потом стартует ASA 12.
5. Если кликнуть в автозагрузке на shortcut .lnk то стартует ASA 12.
Буду благодарен за помощь в решение проблемы в 4 пункте.

там есть две строки разные

ls_startup = lole_ws.SpecialFolders("Startup")
я должен использовать ls_startup = lole_ws.SpecialFolders("AllUsersStartup")
а если у пользователя нет админ прав, наверное не получиться