ឧបករណ៍ប្រើប្រាស់សម្រាប់ការតភ្ជាប់ស្រមោលរបស់មនុស្សនៃអ្នកមិនមែនជាអ្នកគ្រប់គ្រងទៅសម័យអ្នកប្រើប្រាស់ RDP នៅក្នុង WinServer 2012R2

បញ្ហាក្នុងអំឡុងពេលនៃការដាក់ឱ្យនៅដាច់ពីគេរបស់សហគ្រាសបានក្លាយទៅជាដូចខាងក្រោម៖ វាពិតជាចាំបាច់ក្នុងការកាត់បន្ថយចំនួននៃការចូលមកកាន់ការិយាល័យដោយអ្នកឯកទេសដែលផ្តល់សេវាកម្ម និងប្រឹក្សាលើកម្មវិធីកម្មវិធី ហើយនិយាយដោយត្រង់ទៅ អ្នកប្រើប្រាស់តែងតែបំពានជំនួយពីអ្នកឯកទេសដោយមិនចង់ស្វែងយល់អំពី បញ្ហាដោយខ្លួនឯងពួកគេនិយាយថា "ពួកគេនឹងមក - ពួកគេនឹងជួយ - ពួកគេនឹងធ្វើវាប៉ុន្តែខ្ញុំនឹងជក់បារី / ផឹកកាហ្វេ។ ការប្រឹក្សាតាមទូរស័ព្ទនៅពេលចែករំលែកម៉ាស៊ីនមេមានប្រសិទ្ធភាពជាងប្រសិនបើអ្នកមើលអេក្រង់ពីចម្ងាយ។

បន្ទាប់ពី "ការច្នៃប្រឌិត" នៃកង់របស់យើងព័ត៌មានល្អ ៗ លើប្រធានបទនៃអត្ថបទបានលេចចេញមក៖ RDS Shadow - ការតភ្ជាប់ស្រមោលទៅសម័យអ្នកប្រើប្រាស់ RDP នៅក្នុង Windows Server 2012 R2 ឬ របៀបស្រមោលអ្នកប្រើប្រាស់ដែលមិនមានសិទ្ធិនៅក្នុងម៉ាស៊ីនមេវីនដូ ឬ ការផ្ទេរសិទ្ធិគ្រប់គ្រងវគ្គ RDP. ពួកគេទាំងអស់ពាក់ព័ន្ធនឹងការប្រើប្រាស់កុងសូល ទោះបីជាមានធាតុផ្សំនៃការសន្ទនាសាមញ្ញក៏ដោយ។

ព័ត៌មានទាំងអស់ខាងក្រោមគឺមានបំណងសម្រាប់អ្នកដែល អត់ធ្មត់នឹងការបង្វែរមិនធម្មតាជាធម្មតា ដើម្បីទទួលបានលទ្ធផលដែលចង់បាន បង្កើតវិធីសាស្រ្តដែលមិនចាំបាច់។
ដើម្បីកុំឱ្យ "ទាញឆ្មាដោយកន្ទុយ" ខ្ញុំនឹងចាប់ផ្តើមជាមួយចុងក្រោយ: កង់ដំណើរការសម្រាប់អ្នកប្រើប្រាស់ជាមធ្យមដោយប្រើឧបករណ៍ប្រើប្រាស់ AdmiLinkដែលអរគុណដល់អ្នកនិពន្ធរបស់វា។

I. កុងសូល និងស្រមោល RDP ។

ចាប់តាំងពីប្រើជាមួយ សិទ្ធិអ្នកគ្រប់គ្រងនៃកុងសូលគ្រប់គ្រងម៉ាស៊ីនមេ -> QuickSessionCollection -> ដោយ​ចុច​លើ​វគ្គ​នៃ​អ្នក​ប្រើ​ដែល​មាន​ចំណាប់​អារម្មណ៍ ដោយ​ជ្រើស​រើស Shadow ពី​ម៉ឺនុយ​បរិបទ សម្រាប់បុគ្គលិកបង្រៀនពីរបៀបប្រើប្រាស់កម្មវិធីមិនមែនជាជម្រើសទេវិធីសាស្ត្រ "ឈើ" ផ្សេងទៀតត្រូវបានគេពិចារណាគឺ:

1. ស្វែងរកលេខសម្គាល់ RDP នៃវគ្គ៖

query user | findstr Administrator

ឬ៖

qwinsta | findstr Administrator 

លើសពីនេះទៅទៀត "| findstr អ្នកគ្រប់គ្រង"វាងាយស្រួលនៅពេលដែលអ្នកដឹងពីអ្វីដែលពិតប្រាកដ អ្នកគ្រប់គ្រង អ្នក​ត្រូវ​ការ ឬ​ប្រើ​តែ​ផ្នែក​ដំបូង​ប៉ុណ្ណោះ​ដើម្បី​មើល​ឃើញ​អ្នក​រាល់​គ្នា​ចូល​ក្នុង​ម៉ាស៊ីន​មេ។

2. ភ្ជាប់ទៅវគ្គនេះ ដោយបានផ្តល់ថានៅក្នុងដែន គោលនយោបាយក្រុម ជម្រើស "កំណត់​ច្បាប់​បញ្ជា​ពី​ចម្ងាយ​សម្រាប់​វគ្គ​អ្នក​ប្រើ​នៃ​សេវា​ផ្ទៃតុ​ពី​ចម្ងាយ" ត្រូវ​បាន​ជ្រើសរើស​ដោយ​មាន​ជម្រើស "Monitor session with user permission" យ៉ាង​ហោច​ណាស់​បាន​ជ្រើសរើស (ព័ត៌មានបន្ថែម):

mstsc /shadow:127

សូមចំណាំថាបញ្ជីនឹងមានតែការចូលរបស់អ្នកប្រើប៉ុណ្ណោះ។

ខ្ញុំនិយាយម្តងទៀតថាដោយគ្មានសិទ្ធិអ្នកគ្រប់គ្រងអ្នកនឹងទទួលបានដូចខាងក្រោម:

ប៉ុន្តែសម្រាប់ការបំបាត់កំហុសបឋមនៃកម្មវិធីដែលនឹងត្រូវបានពិភាក្សា ខ្ញុំបានប្រើគណនីដែលមានសិទ្ធិអ្នកគ្រប់គ្រង។

II. កម្មវិធី

ដូច្នេះសេចក្តីថ្លែងការណ៍បញ្ហា៖ ការបង្កើតចំណុចប្រទាក់ក្រាហ្វិកសាមញ្ញមួយចំនួនដើម្បីភ្ជាប់ទៅអារម្មណ៍ស្រមោលរបស់អ្នកប្រើជាមួយនឹងការអនុញ្ញាតរបស់គាត់ ផ្ញើសារទៅកាន់អ្នកប្រើប្រាស់។ បរិយាកាស​កម្មវិធី​ដែល​បាន​ជ្រើសរើស​គឺ Lazarus។

1. យើងទទួលបានបញ្ជីឈ្មោះអ្នកប្រើប្រាស់ពេញលេញ "ចូល" - "ឈ្មោះពេញ" ពីអ្នកគ្រប់គ្រង ឬម្តងទៀតតាមរយៈកុងសូល៖

wmic useraccount get Name,FullName 

គ្មាននរណាម្នាក់ហាមឃាត់សូម្បីតែរឿងនេះ៖

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

ខ្ញុំនឹងនិយាយភ្លាមៗថាវាជា Lazarus ដែលមានបញ្ហាក្នុងដំណើរការឯកសារនេះ ចាប់តាំងពីតាមលំនាំដើមការអ៊ិនកូដរបស់វាគឺ 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. ដោយប្រើវិធីសាស្រ្តដូចគ្នាពីកថាខណ្ឌមុន យើងបានអានលទ្ធផលនៃការដំណើរការបញ្ជីទៅក្នុងធាតុ StringGrid ខណៈពេលដែលខ្ញុំនឹងផ្តល់លេខកូដ "សំខាន់" មួយ:

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. ការប្រើប្រាស់ AdminLink - អ្វីដែលខ្ញុំបានឃើញ៖

AdminLink បង្កើតផ្លូវកាត់ដែលយោងទីតាំងរបស់ឧបករណ៍ប្រើប្រាស់ admilaunch.exeនិងច្បាប់ចម្លងផ្ទាល់ខ្លួននៃឧបករណ៍ប្រើប្រាស់ចាប់ផ្តើម AdmiRun.Exe ដែលមានទីតាំងនៅក្នុងថតរបស់អ្នកប្រើ ឧទាហរណ៍ វាសី, ប្រភេទ C: UsersvasyaWINDOWS. ជាទូទៅ មិនមែនអ្វីៗទាំងអស់សុទ្ធតែអាក្រក់នោះទេ៖ អ្នកអាចលេងជាមួយសិទ្ធិចូលប្រើឯកសារផ្លូវកាត់ និងអ្នកផ្សេងទៀតដើម្បីជម្រះមនសិការអ្នកគ្រប់គ្រងរបស់អ្នក។

ប្រភព: www.habr.com