WinServer 2012R2 मा RDP प्रयोगकर्ता सत्रहरूमा गैर-प्रशासकको मानव छाया जडानको लागि उपयोगिता

इन्टरप्राइजको क्वारेन्टाइन अवधिको समयमा समस्या निम्न बन्यो: अनुप्रयोग सफ्टवेयरमा सेवा र परामर्श गर्ने विशेषज्ञहरूद्वारा कार्यालयहरूमा भ्रमणको संख्यालाई कम गर्न वास्तवमै आवश्यक छ, र स्पष्ट रूपमा भन्नुपर्दा, प्रयोगकर्ताहरूले प्रायः विशेषज्ञहरूको मद्दतको दुरुपयोग गर्छन्। मुद्दा आफैं, तिनीहरू भन्छन् "उनीहरू आउनेछन् - तिनीहरूले मद्दत गर्नेछन् - तिनीहरूले यो गर्नेछन्, तर म धुम्रपान / कफी पिउनेछु, आदि।" यदि तपाइँ रिमोट स्क्रिन हेर्नुहुन्छ भने सर्भर साझेदारी गर्दा टेलिफोन परामर्श अधिक प्रभावकारी हुन्छ।

हाम्रो साइकलको "आविष्कार" पछि, लेखको शीर्षकमा विवेकी जानकारी देखा पर्‍यो: RDS छाया - Windows Server 2012 R2 मा RDP प्रयोगकर्ता सत्रहरूमा छाया जडान वा विन्डोज सर्भरमा अनप्रिभलेज्ड प्रयोगकर्ता छाया मोड वा RDP सत्रहरूको प्रत्यायोजित व्यवस्थापन। ती सबैमा कन्सोलको प्रयोग समावेश छ, साधारण संवादको तत्वहरूसँग पनि।

तलका सबै जानकारी ती व्यक्तिहरूको लागि हो सामान्य रूपमा असामान्य विकृतिहरू सहन गर्दछ अनावश्यक विधिहरू आविष्कार गर्दै, इच्छित परिणाम प्राप्त गर्न।
"बिरालोलाई पुच्छरले तान्नु" नगर्नको लागि, म अन्तिमबाट सुरु गर्नेछु: बाइकले उपयोगिता प्रयोग गरेर औसत प्रयोगकर्ताको लागि काम गर्दछ। AdmiLink, जसको लागि यसको लेखकलाई धन्यवाद।

I. कन्सोल र छाया RDP।

संग प्रयोग गर्दा सर्भर प्रबन्धक कन्सोलको प्रशासक अधिकार -> QuickSessionCollection -> रुचिको प्रयोगकर्ताको सत्रमा क्लिक गरेर, सन्दर्भ मेनुबाट छाया चयन गर्नुहोस्। सफ्टवेयर कसरी प्रयोग गर्ने भनेर निर्देशन दिने कर्मचारीहरूको लागि, एक विकल्प छैन, अर्को "काठ" विधि विचार गरियो, अर्थात्:

1. सत्रको RDP आईडी पत्ता लगाउनुहोस्:

query user | findstr Administrator

वा:

qwinsta | findstr Administrator 

साथै "| खोज्नुहोस् प्रशासक"यो केवल सुविधाजनक थियो जब तपाईलाई वास्तवमा के थाहा थियो प्रशासक तपाईलाई चाहिन्छ, वा सर्भरमा लगइन भएका सबैलाई हेर्नको लागि पहिलो भाग मात्र प्रयोग गर्नुहोस्।

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. अघिल्लो अनुच्छेदबाट उही विधि प्रयोग गरेर, हामीले स्ट्रिङग्रिड तत्वमा सूची प्रशोधन गर्ने परिणाम पढ्छौं, जबकि म कोडको "महत्वपूर्ण" टुक्रा दिनेछु:

२.१ हामीले हालको 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