[AlekseyPopovv]

Никогда не сталкивался с ограничением в 2 гига и вот опять, есть возможность обойти это без "Nsis7z"?

[iglezz]

AlekseyPopovv, nsisbi

[inco1]

iglezz, Доброго дня.
Возникла проблема.
Использую ваш метод добавления записей в реестр для всех имеющихся учетных записей. Всё отлично работает. Но как прописать, если в системе есть только одна активная учетная запись, то чтобы запись в реестр прописывалась только активной учетке?

Подробнее на примере:

Используется код:

Код:

Function SIDFilter_UsersOnly

    System::Store L
    Pop $0    
    StrCpy $1 $0 8
    StrCmp $1 "S-1-5-21" +3 0
    StrCpy $1 ""
    System::Store S
    Push $1
    
FunctionEnd
Function ProcUsers

    System::Store L
    Pop $0
    Pop $1
    ${EnumUsersRegEx_GetProfilePath} $3 $1
    ${If} $3 != ""

        WriteRegDWORD HKU "$0\SOFTWARE\test" "tt" 0x1

    ${EndIf}
    System::Store S
    
FunctionEnd

Потом в нужном месте вставляется вызов этих функций:

Код:

	${EnumUsersRegEx} ProcUsers SIDFilter_UsersOnly

Всё отлично работает и всем учеткам системы добавляется в реестр запись.

Как можно прописать, чтобы,если имеется только одна активная учетка, то прописывалось не вызов этих функций, а простая запись:

Код:

                WriteRegDWORD HKEY_CURRENT_USER "SOFTWARE\test" "tt" 0x1

Как это можно сделать? Неактивные и прочие учетки игнорировать.
Буду очень признателен за ваше пояснение.

[iglezz]

inco1, Можно посчитать в некую переменную число залогиненных учётных записей.
А потом что, если их больше одной?

[inco1]

iglezz,
Я, видимо не так объяснил.
Если такое возможно, то хотелось бы сделать так, чтобы было некое условие, что если число пользователей "S-1-5-21" более одного, то срабатывает этот код:

Код:

Function SIDFilter_UsersOnly

    System::Store L
    Pop $0    
    StrCpy $1 $0 8
    StrCmp $1 "S-1-5-21" +3 0
    StrCpy $1 ""
    System::Store S
    Push $1
    
FunctionEnd
Function ProcUsers

    System::Store L
    Pop $0
    Pop $1
    ${EnumUsersRegEx_GetProfilePath} $3 $1
    ${If} $3 != ""

        WriteRegDWORD HKU "$0\SOFTWARE\test" "tt" 0x1

    ${EndIf}
    System::Store S
    
FunctionEnd

Section

${EnumUsersRegEx} ProcUsers SIDFilter_UsersOnly

SectionEnd

А если пользователь "S-1-5-21" только один, то чтобы срабатывал этот код:

Код:

Section

WriteRegDWORD HKEY_CURRENT_USER "SOFTWARE\test" "tt" 0x1

SectionEnd

[iglezz]

Посчитать пользователей не сложно

Скрытый текст

Код:

!define CountOnlineUsers `!insertmacro CountOnlineUsers `
!macro  CountOnlineUsers outVar
  Push $0
  Push $1
  Push $2
  Push $3

  StrCpy $0 0
  StrCpy $1 -1
  ${Do}
    IntOp $1 $1 + 1
    EnumRegKey $2 HKU '' $1
    ${IfThen} $2 == '' ${|} ${ExitDo} ${|}

    StrCpy $3 $2 8
    ${If} $3 == 'S-1-5-21'
      StrCpy $3 $2 '' -8
      ${IfThen} $3 != '_Classes' ${|} IntOp $0 $0 + 1 ${|}
    ${EndIf}
  ${Loop}

  Pop $3
  Pop $2
  Pop $1
  Exch $0

  Pop ${outVar}
!macroend

Section OnlineUsers
  ${CountOnlineUsers} $0
  DetailPrint 'online users: [$0]'
SectionEnd

Но смысл в этом есть только для случая, когда выполняются разные действия для одного и нескольких пользователей.

[inco1]

iglezz,
Премного-премного благодарю. Это как раз тот счетчик, что я хотел.

[inco1]

iglezz, Доброго дня.
Рано обрадовался. Протестировал счетчик на практике. Как выяснилось, он видит только пользователей, которые вошли в систему. Если в систему вошел только один пользователь, то счетчик одного и видит.

[iglezz]

inco1, да, счётчик считает вошедших пользователей.
По какому критерию надо считать пользователей активными?

[inco1]

iglezz, тех, что записаны в реестре в S-1-5-21 и не считать S-1-5-21-.............._Classes