WinServer 2012R2 ਵਿੱਚ RDP ਉਪਭੋਗਤਾ ਸੈਸ਼ਨਾਂ ਲਈ ਗੈਰ-ਪ੍ਰਬੰਧਕ ਦੇ ਮਨੁੱਖੀ ਸ਼ੈਡੋ ਕੁਨੈਕਸ਼ਨ ਲਈ ਉਪਯੋਗਤਾ

ਐਂਟਰਪ੍ਰਾਈਜ਼ ਦੀ ਕੁਆਰੰਟੀਨ ਪੀਰੀਅਡ ਦੌਰਾਨ ਸਮੱਸਿਆ ਹੇਠ ਲਿਖੀਆਂ ਬਣ ਗਈ: ਐਪਲੀਕੇਸ਼ਨ ਸੌਫਟਵੇਅਰ 'ਤੇ ਸੇਵਾ ਅਤੇ ਸਲਾਹ ਕਰਨ ਵਾਲੇ ਮਾਹਰਾਂ ਦੁਆਰਾ ਦਫਤਰਾਂ ਦੇ ਦੌਰੇ ਦੀ ਗਿਣਤੀ ਨੂੰ ਘਟਾਉਣਾ ਅਸਲ ਵਿੱਚ ਜ਼ਰੂਰੀ ਹੈ, ਅਤੇ ਸਪੱਸ਼ਟ ਤੌਰ 'ਤੇ, ਉਪਭੋਗਤਾ ਅਕਸਰ ਖੋਜ ਕਰਨ ਦੀ ਇੱਛਾ ਤੋਂ ਬਿਨਾਂ ਮਾਹਰਾਂ ਦੀ ਮਦਦ ਦੀ ਦੁਰਵਰਤੋਂ ਕਰਦੇ ਹਨ। ਮੁੱਦਾ ਖੁਦ, ਉਹ ਕਹਿੰਦੇ ਹਨ "ਉਹ ਆਉਣਗੇ - ਉਹ ਮਦਦ ਕਰਨਗੇ - ਉਹ ਇਹ ਕਰਨਗੇ, ਪਰ ਮੈਂ ਸਿਗਰਟ ਪੀਵਾਂਗਾ/ਪੀਵਾਂਗਾ, ਆਦਿ।" ਜੇਕਰ ਤੁਸੀਂ ਰਿਮੋਟ ਸਕ੍ਰੀਨ ਦੇਖਦੇ ਹੋ ਤਾਂ ਸਰਵਰ ਨੂੰ ਸਾਂਝਾ ਕਰਨ ਵੇਲੇ ਟੈਲੀਫ਼ੋਨ ਸਲਾਹ ਵਧੇਰੇ ਪ੍ਰਭਾਵਸ਼ਾਲੀ ਹੁੰਦੀ ਹੈ।

ਸਾਡੀ ਸਾਈਕਲ ਦੀ "ਕਾਢ" ਤੋਂ ਬਾਅਦ, ਲੇਖ ਦੇ ਵਿਸ਼ੇ 'ਤੇ ਸਮਝਦਾਰ ਜਾਣਕਾਰੀ ਸਾਹਮਣੇ ਆਈ: RDS ਸ਼ੈਡੋ - ਵਿੰਡੋਜ਼ ਸਰਵਰ 2012 R2 ਵਿੱਚ RDP ਉਪਭੋਗਤਾ ਸੈਸ਼ਨਾਂ ਲਈ ਸ਼ੈਡੋ ਕਨੈਕਸ਼ਨ ਜ ਵਿੰਡੋਜ਼ ਸਰਵਰ ਵਿੱਚ ਅਣਅਧਿਕਾਰਤ ਉਪਭੋਗਤਾ ਸ਼ੈਡੋ ਮੋਡ ਜ RDP ਸੈਸ਼ਨਾਂ ਦਾ ਪ੍ਰਬੰਧਨ ਸੌਂਪਣਾ. ਉਹਨਾਂ ਸਾਰਿਆਂ ਵਿੱਚ ਇੱਕ ਕੰਸੋਲ ਦੀ ਵਰਤੋਂ ਸ਼ਾਮਲ ਹੈ, ਇੱਥੋਂ ਤੱਕ ਕਿ ਇੱਕ ਸਧਾਰਨ ਸੰਵਾਦ ਦੇ ਤੱਤ ਦੇ ਨਾਲ.

ਹੇਠਾਂ ਦਿੱਤੀ ਸਾਰੀ ਜਾਣਕਾਰੀ ਉਹਨਾਂ ਲਈ ਹੈ ਜੋ ਆਮ ਤੌਰ 'ਤੇ ਅਸਧਾਰਨ ਵਿਗਾੜਾਂ ਨੂੰ ਬਰਦਾਸ਼ਤ ਕਰਦਾ ਹੈ ਲੋੜੀਂਦੇ ਨਤੀਜੇ ਪ੍ਰਾਪਤ ਕਰਨ ਲਈ, ਬੇਲੋੜੇ ਢੰਗਾਂ ਦੀ ਕਾਢ ਕੱਢਣਾ.
"ਪੂਛ ਦੁਆਰਾ ਬਿੱਲੀ ਨੂੰ ਖਿੱਚਣ" ਨਾ ਕਰਨ ਲਈ, ਮੈਂ ਆਖਰੀ ਨਾਲ ਸ਼ੁਰੂ ਕਰਾਂਗਾ: ਬਾਈਕ ਉਪਯੋਗਤਾ ਦੀ ਵਰਤੋਂ ਕਰਦੇ ਹੋਏ ਔਸਤ ਉਪਭੋਗਤਾ ਲਈ ਕੰਮ ਕਰਦੀ ਹੈ ਐਡਮੀਲਿੰਕ, ਜਿਸ ਲਈ ਇਸਦੇ ਲੇਖਕ ਦਾ ਧੰਨਵਾਦ.

I. ਕੰਸੋਲ ਅਤੇ ਸ਼ੈਡੋ RDP।

ਨਾਲ ਵਰਤਣ ਦੇ ਬਾਅਦ ਸਰਵਰ ਮੈਨੇਜਰ ਕੰਸੋਲ ਦੇ ਪ੍ਰਬੰਧਕ ਅਧਿਕਾਰ -> QuickSessionCollection -> ਦਿਲਚਸਪੀ ਵਾਲੇ ਉਪਭੋਗਤਾ ਦੇ ਸੈਸ਼ਨ 'ਤੇ ਕਲਿੱਕ ਕਰਕੇ, ਪ੍ਰਸੰਗ ਮੀਨੂ ਤੋਂ ਸ਼ੈਡੋ ਦੀ ਚੋਣ ਕਰਕੇ ਸਾਫਟਵੇਅਰ ਦੀ ਵਰਤੋਂ ਕਿਵੇਂ ਕਰਨੀ ਹੈ ਬਾਰੇ ਨਿਰਦੇਸ਼ ਦੇਣ ਵਾਲੇ ਕਰਮਚਾਰੀਆਂ ਲਈ, ਇੱਕ ਵਿਕਲਪ ਨਹੀਂ ਹੈ, ਇੱਕ ਹੋਰ "ਲੱਕੜੀ" ਵਿਧੀ ਮੰਨਿਆ ਗਿਆ ਸੀ, ਅਰਥਾਤ:

1. ਸੈਸ਼ਨ ਦੀ RDP id ਦਾ ਪਤਾ ਲਗਾਓ:

query user | findstr Administrator

ਜਾਂ:

qwinsta | findstr Administrator 

ਇਸ ਤੋਂ ਇਲਾਵਾ "| findstr ਪ੍ਰਸ਼ਾਸਕ“ਇਹ ਉਦੋਂ ਹੀ ਸੁਵਿਧਾਜਨਕ ਸੀ ਜਦੋਂ ਤੁਹਾਨੂੰ ਪਤਾ ਸੀ ਕਿ ਅਸਲ ਵਿੱਚ ਕੀ ਹੈ ਪਰਬੰਧਕ ਤੁਹਾਨੂੰ ਲੋੜ ਹੈ, ਜਾਂ ਸਰਵਰ ਵਿੱਚ ਲੌਗਇਨ ਕੀਤੇ ਹਰ ਕਿਸੇ ਨੂੰ ਦੇਖਣ ਲਈ ਸਿਰਫ਼ ਪਹਿਲੇ ਹਿੱਸੇ ਦੀ ਵਰਤੋਂ ਕਰੋ।

2. ਇਸ ਸੈਸ਼ਨ ਨਾਲ ਜੁੜੋ, ਬਸ਼ਰਤੇ ਕਿ ਡੋਮੇਨ ਵਿੱਚ ਹੋਵੇ ਸਮੂਹ ਨੀਤੀਆਂ "ਰਿਮੋਟ ਡੈਸਕਟੌਪ ਸੇਵਾਵਾਂ ਦੇ ਉਪਭੋਗਤਾ ਸੈਸ਼ਨਾਂ ਲਈ ਰਿਮੋਟ ਕੰਟਰੋਲ ਨਿਯਮ ਸੈਟ ਅਪ ਕਰੋ" ਵਿਕਲਪ ਨੂੰ ਘੱਟੋ-ਘੱਟ "ਉਪਭੋਗਤਾ ਅਨੁਮਤੀ ਨਾਲ ਮਾਨੀਟਰ ਸੈਸ਼ਨ" ਵਿਕਲਪ ਦੇ ਨਾਲ ਚੁਣਿਆ ਗਿਆ ਹੈ (ਹੋਰ ਜਾਣਕਾਰੀ):

mstsc /shadow:127

ਕਿਰਪਾ ਕਰਕੇ ਨੋਟ ਕਰੋ ਕਿ ਸੂਚੀ ਵਿੱਚ ਸਿਰਫ਼ ਉਪਭੋਗਤਾ ਲੌਗਇਨ ਸ਼ਾਮਲ ਹੋਣਗੇ।

ਮੈਂ ਦੁਹਰਾਉਂਦਾ ਹਾਂ ਕਿ ਬਿਨਾਂ ਐਡਮਿਨ ਅਧਿਕਾਰਾਂ ਦੇ ਤੁਹਾਨੂੰ ਹੇਠਾਂ ਦਿੱਤੇ ਪ੍ਰਾਪਤ ਹੋਣਗੇ:

ਪਰ ਪ੍ਰੋਗਰਾਮ ਦੀ ਸ਼ੁਰੂਆਤੀ ਡੀਬੱਗਿੰਗ ਲਈ ਜਿਸ ਬਾਰੇ ਚਰਚਾ ਕੀਤੀ ਜਾਵੇਗੀ, ਮੈਂ ਪ੍ਰਸ਼ਾਸਕ ਦੇ ਅਧਿਕਾਰਾਂ ਵਾਲਾ ਇੱਕ ਖਾਤਾ ਵਰਤਿਆ ਹੈ।

II. ਪ੍ਰੋਗਰਾਮ

ਇਸ ਲਈ ਸਮੱਸਿਆ ਬਿਆਨ: ਉਪਭੋਗਤਾ ਨੂੰ ਇੱਕ ਸੁਨੇਹਾ ਭੇਜਣਾ, ਉਸਦੀ ਇਜਾਜ਼ਤ ਨਾਲ ਉਪਭੋਗਤਾ ਦੇ ਸ਼ੈਡੋ ਭਾਵਨਾ ਨਾਲ ਜੁੜਨ ਲਈ ਕੁਝ ਸਧਾਰਨ ਗ੍ਰਾਫਿਕਲ ਇੰਟਰਫੇਸ ਬਣਾਉਣਾ. ਚੁਣਿਆ ਗਿਆ ਪ੍ਰੋਗਰਾਮਿੰਗ ਵਾਤਾਵਰਨ ਲਾਜ਼ਰਸ ਹੈ।

1. ਅਸੀਂ ਪ੍ਰਸ਼ਾਸਕ ਤੋਂ "ਲੌਗਇਨ" - "ਪੂਰਾ ਨਾਮ" ਉਪਭੋਗਤਾਵਾਂ ਦੀ ਪੂਰੀ ਡੋਮੇਨ ਸੂਚੀ ਪ੍ਰਾਪਤ ਕਰਦੇ ਹਾਂ, ਜਾਂ ਦੁਬਾਰਾ ਕੰਸੋਲ ਰਾਹੀਂ:

wmic useraccount get Name,FullName 

ਕੋਈ ਵੀ ਇਸ ਨੂੰ ਮਨ੍ਹਾ ਨਹੀਂ ਕਰਦਾ:

wmic useraccount get Name,FullName > c:testusername.txt

ਮੈਂ ਤੁਰੰਤ ਕਹਾਂਗਾ ਕਿ ਇਹ ਲਾਜ਼ਰ ਸੀ ਜਿਸਨੂੰ ਇਸ ਫਾਈਲ ਦੀ ਪ੍ਰਕਿਰਿਆ ਕਰਨ ਵਿੱਚ ਸਮੱਸਿਆ ਸੀ, ਕਿਉਂਕਿ ਮੂਲ ਰੂਪ ਵਿੱਚ ਇਸਦਾ ਏਨਕੋਡਿੰਗ UCS-2 ਹੈ, ਇਸਲਈ ਮੈਨੂੰ ਇਸਨੂੰ ਹੱਥੀਂ ਨਿਯਮਤ UTF-8 ਵਿੱਚ ਬਦਲਣਾ ਪਿਆ। ਫਾਈਲ ਢਾਂਚੇ ਵਿੱਚ ਬਹੁਤ ਸਾਰੀਆਂ ਟੈਬਾਂ ਹਨ, ਜਾਂ ਬਹੁਤ ਸਾਰੀਆਂ ਖਾਲੀ ਥਾਂਵਾਂ ਹਨ, ਜਿਨ੍ਹਾਂ ਨੂੰ ਪ੍ਰੋਗਰਾਮੇਟਿਕ ਤੌਰ 'ਤੇ ਪ੍ਰੋਸੈਸ ਕਰਨ ਦਾ ਫੈਸਲਾ ਕੀਤਾ ਗਿਆ ਸੀ; ਜਲਦੀ ਜਾਂ ਬਾਅਦ ਵਿੱਚ ਏਨਕੋਡਿੰਗ ਸਮੱਸਿਆ ਹੱਲ ਹੋ ਜਾਵੇਗੀ, ਅਤੇ ਫਾਈਲ ਨੂੰ ਪ੍ਰੋਗਰਾਮੇਟਿਕ ਤੌਰ 'ਤੇ ਅਪਡੇਟ ਕੀਤਾ ਜਾਵੇਗਾ।

ਇਸ ਲਈ, ਵਿਚਾਰ ਇਹ ਹੈ ਕਿ ਪ੍ਰੋਗਰਾਮ ਦੇ ਉਪਭੋਗਤਾਵਾਂ ਲਈ ਇੱਕ ਫੋਲਡਰ ਪਹੁੰਚਯੋਗ ਹੋਵੇ, ਉਦਾਹਰਨ ਲਈ c:test, ਜਿਸ ਵਿੱਚ 2 ਫਾਈਲਾਂ ਹੋਣਗੀਆਂ: ਪਹਿਲੀ ਲੌਗਿਨ ਅਤੇ ਪੂਰੇ ਨਾਮ ਨਾਲ, ਦੂਜੀ id_rdp ਅਤੇ ਉਪਭੋਗਤਾਵਾਂ ਦੇ ਲੌਗਇਨ ਨਾਲ। ਅੱਗੇ, ਅਸੀਂ ਇਸ ਡੇਟਾ ਨੂੰ ਸਭ ਤੋਂ ਵਧੀਆ ਢੰਗ ਨਾਲ ਪ੍ਰਕਿਰਿਆ ਕਰ ਸਕਦੇ ਹਾਂ :).

ਇਸ ਦੌਰਾਨ, ਸੈਸ਼ਨਾਂ ਦੀ ਸੂਚੀ ਨਾਲ ਜੋੜਨ ਲਈ, ਅਸੀਂ ਇਸ (ਲੌਗਇਨ ਅਤੇ ਪੂਰਾ ਨਾਮ) ਸਮੱਗਰੀ ਨੂੰ ਇੱਕ ਐਰੇ ਵਿੱਚ ਟ੍ਰਾਂਸਫਰ ਕਰਦੇ ਹਾਂ:

procedure Tf_rdp.UserF2Array;
var 
  F:TextFile;   i:integer;   f1, line1:String;   fL: TStringList;
begin //f_d глобальный путь к размещению файлов 
f1:=f_d+'user_name.txt';     //задача считать в массив содержимое файла
fL := TStringList.Create; // строку подвергнем метамарфозам с разделителями
fL.Delimiter := '|'; fL.StrictDelimiter := True;
AssignFile(F,f1); 
try // Открыть файл для чтения
  reset(F); ReadLn(F,line1);
  i:=0;
while not eof(F) do // Считываем строки, пока не закончится файл
begin
ReadLn(F,line1);
line1:= StringReplace(line1, '  ', '|',[]); //заменяем первый попавш.2пробела разделителем |
// удаляем все двойные пробелы
while pos('  ',line1)>0 do line1:= StringReplace(line1, '  ', ' ', [rfReplaceAll]);
begin
if (pos('|',line1)>0) then
begin //если разделитель существует заносим его в массив
fL.DelimitedText :=line1; // разбиваем на столбцы
if (fL[0]<>'') then //если учетка имеет имя
begin //вносим ее в массив
 inc(i); // избавляемся от возможных одиночных пробелов в логине
 fam[0,i]:=StringReplace(fL[1],' ','',[rfReplaceall, rfIgnoreCase]);
 fam[1,i]:=fL[0];
 end;end;end;end; // Готово. Закрываем файл.
 CloseFile(F);
 Fl.Free;
 except
 on E: EInOutError do  ShowMessage('Ошибка обработки файла. Детали: '+E.Message);
 end;end;

ਮੈਂ “ਬਹੁਤ ਸਾਰੇ ਕੋਡ” ਲਈ ਮੁਆਫੀ ਮੰਗਦਾ ਹਾਂ, ਹੇਠਾਂ ਦਿੱਤੇ ਨੁਕਤੇ ਵਧੇਰੇ ਸੰਖੇਪ ਹੋਣਗੇ।

2. ਪਿਛਲੇ ਪੈਰੇ ਤੋਂ ਉਸੇ ਵਿਧੀ ਦੀ ਵਰਤੋਂ ਕਰਦੇ ਹੋਏ, ਅਸੀਂ ਸੂਚੀ ਨੂੰ ਸਟ੍ਰਿੰਗਗ੍ਰਿਡ ਐਲੀਮੈਂਟ ਵਿੱਚ ਪ੍ਰੋਸੈਸ ਕਰਨ ਦੇ ਨਤੀਜੇ ਨੂੰ ਪੜ੍ਹਦੇ ਹਾਂ, ਜਦੋਂ ਕਿ ਮੈਂ ਕੋਡ ਦਾ ਇੱਕ "ਮਹੱਤਵਪੂਰਨ" ਟੁਕੜਾ ਦੇਵਾਂਗਾ:

2.1 ਸਾਨੂੰ ਇੱਕ ਫਾਈਲ ਵਿੱਚ RDP ਸੈਸ਼ਨਾਂ ਦੀ ਮੌਜੂਦਾ ਸੂਚੀ ਪ੍ਰਾਪਤ ਹੁੰਦੀ ਹੈ:

f1:=f_d+'user.txt';
cmdline:='/c query user >'+ f1;
if ShellExecute(0,nil, PChar('cmd'),PChar(cmdline),nil,1)=0 then;
Sleep(500); // можно и подольше ждать пока файл для чтения создается

2.2 ਫਾਈਲ ਦੀ ਪ੍ਰਕਿਰਿਆ ਕਰੋ (ਕੋਡ ਦੀਆਂ ਸਿਰਫ ਮਹੱਤਵਪੂਰਨ ਲਾਈਨਾਂ ਦਰਸਾਏ ਗਏ ਹਨ):

StringGrid1.Cells[0,i]:=fL[1]; StringGrid1.Cells[2,i]:=fL[3]; //кидаем в цикле в StringGrid1
login1:=StringReplace(fL[1],' ','',[rfReplaceall, rfIgnoreCase]); //убираем из логина пробелы
if (SearchArr(login1)>=0) then //ищем в массиве из п1. логин и записываем в таблицу ФИО
StringGrid1.Cells[1,i]:=fam[1,SearchArr(login1)]
else StringGrid1.Cells[1,i]:='+'; // либо записываем плюсик:)
.... //в зависимости от выбора пользователя сортируем и форматируем по данным
if (b_id.Checked=true) then SortGrid(0) else SortGrid(1);
StringGrid1.AutoSizeColumn(0);StringGrid1.AutoSizeColumn(1); StringGrid1.AutoSizeColumn(2);  

3. ਉਪਭੋਗਤਾ ਅਤੇ ਉਸਦੇ ਸੈਸ਼ਨ ਨੰਬਰ ਦੇ ਨਾਲ ਲਾਈਨ 'ਤੇ ਕਲਿੱਕ ਕਰਕੇ ਖੁਦ ਸਿੱਧਾ ਕੁਨੈਕਸ਼ਨ:

  id:=(StringGrid1.Row);// узнаем номер строки  IntToStr(StringGrid1.Row)
  ids:=StringGrid1.Cells[2,id]; //получаем идентификатор rdp
  cmdline:='/c mstsc /shadow:'+ ids; //и подключаемся....
 if (b_rdp.Checked=True) then  if ShellExecute(0,nil, PChar('cmd'),PChar(cmdline),nil,1) =0 then;       

4. ਕੁਝ ਹੋਰ ਸਜਾਵਟ ਬਣਾਏ ਗਏ ਹਨ, ਜਿਵੇਂ ਕਿ ਰੇਡੀਓ ਬਟਨ 'ਤੇ ਕਲਿੱਕ ਕਰਕੇ ਛਾਂਟਣਾ, ਅਤੇ ਉਪਭੋਗਤਾ ਜਾਂ ਸਾਰੇ ਉਪਭੋਗਤਾਵਾਂ ਨੂੰ ਸੰਦੇਸ਼।

→ ਪੂਰਾ ਸਰੋਤ ਕੋਡ ਦੇਖਿਆ ਜਾ ਸਕਦਾ ਹੈ ਇੱਥੇ

III. ਐਡਮਿਨਲਿੰਕ ਦੀ ਵਰਤੋਂ ਕਰਨਾ - ਮੈਂ ਕੀ ਦੇਖਿਆ:

ਐਡਮਿਨਲਿੰਕ ਇੱਕ ਸ਼ਾਰਟਕੱਟ ਤਿਆਰ ਕਰਦਾ ਹੈ ਜੋ ਉਪਯੋਗਤਾ ਦੇ ਸਥਾਨ ਦਾ ਹਵਾਲਾ ਦਿੰਦਾ ਹੈ admilaunch.exe, ਅਤੇ ਲਾਂਚ ਉਪਯੋਗਤਾ ਦੀ ਇੱਕ ਨਿੱਜੀ ਕਾਪੀ AdmiRun.Exe ਜੋ ਕਿ ਉਪਭੋਗਤਾ ਦੇ ਫੋਲਡਰ ਵਿੱਚ ਸਥਿਤ ਹੈ, ਉਦਾਹਰਨ ਲਈ ਵਸਿਆ, ਟਾਈਪ C:UservasyaWINDOWS. ਆਮ ਤੌਰ 'ਤੇ, ਸਭ ਕੁਝ ਇੰਨਾ ਬੁਰਾ ਨਹੀਂ ਹੈ: ਤੁਸੀਂ ਆਪਣੀ ਖੁਦ ਦੀ ਪ੍ਰਸ਼ਾਸਕ ਦੀ ਜ਼ਮੀਰ ਨੂੰ ਸਾਫ਼ ਕਰਨ ਲਈ ਸ਼ਾਰਟਕੱਟ ਫਾਈਲ ਅਤੇ ਹੋਰਾਂ ਤੱਕ ਪਹੁੰਚ ਦੇ ਅਧਿਕਾਰਾਂ ਨਾਲ ਖੇਡ ਸਕਦੇ ਹੋ।

ਸਰੋਤ: www.habr.com