ХЕЛП... как можно обмануть админовскую "смотрелку" ???

это точно...

уважухо к дирику сразу пропала....

Эх вы шпециалисты. Давно уже решение есть.
/*****************************************************
/* Мой админ установил мне radmin. Хрень всем известная.
/* Мне нельзя его снести, но я включил ведение log-а
/* Западло каждый раз зырить: подглядывает кто за мной или нет.
/* Этот скрипт контролирует процесс подглядывания, открывая,
/* когда меня осматривают, notepad и печатая в тот нотепад
/* содержимое текстовх файлов из подготовленного мной заранее
/* каталога. Ну, типа я весь в трудах такой.
/* К сожалению в Win98 есть проблема с кодировками. А в Xp
/* всё - хокей.
/******************************************************
Код:

var pozicLOG = "C:\\";
var nameLOG = "logfile.txt";
var FSO = WScript.CreateObject("Scripting.FileSystemObject");
var Folder = FSO.GetParentFolderName(WScript.ScriptFullName);
var WshShell = WScript.CreateObject("WScript.Shell");
var skipL = 0;
var tFini = pozicLOG+nameLOG;
var dirTXT = "C:\\WWW\\ROOT\\ИСХОДНИКИ";
do {
if (FSO.FileExists(Folder+"\\logfile.dbf") == false ) {
createDBF("logfile.dbf");
dobZAP("logfile.dbf","1","0");
}
if (FSO.FileExists(tFini) == true) {
Fini=FSO.GetFile(tFini);
if (ProvSize("logfile.dbf",Fini.Size) == true) {
TxtIni=Fini.OpenAsTextStream(1,-2);
do {
s=TxtIni.ReadLine();
}
while (!TxtIni.AtEndOfStream);
TxtIni.Close();
if (s.indexOf("Connection from") >= 0)
pechatR();
s="";
}
}
if (FSO.FileExists(Folder+"\\stop.txt") == true)
WScript.Quit();
WScript.Sleep(2000);
}
while (true);

function createDBF(nameDBF) {
var list_Pole="";
list_Pole+="NUM CHAR(5),SIZE CHAR(60)"
SConnect="Driver={Microsoft dBase Driver (*.dbf)};DefaultDir="+Folder;
RS=WScript.CreateObject("ADODB.Recordset");
mySQL='CREATE TABLE "'+nameDBF+'" ('+list_Pole+')';
try {
RS.Open(mySQL,SConnect);
}
catch(e) {
if (e != 0) {
WshShell.Popup("Не удалось создать таблицу учёта.",10,
"Ошибка создания таблицы",16);
}
}
list_Pole="";
return;
}

function ProvSize(nameDBF,nS) {
mySQL='SELECT * FROM '+nameDBF;
SConnect="Driver={Microsoft dBase Driver (*.dbf)};DefaultDir="+Folder;
RS=WScript.CreateObject("ADODB.Recordset");
RS.CursorType=3;
try {
RS.Open(mySQL,SConnect);
}
catch(e) {
if (e != 0) {
WshShell.Popup("Не удалось выбрать размерность.",10,
"Ошибка выбора из таблицы",16);
return false;
}
}
RS.MoveLast();
oldSize=parseInt(RS.Fields("SIZE").Value);
if (nS > oldSize) {
oldNUM=parseInt(RS.Fields("NUM").Value);
RS.Close();
dobZAP(nameDBF,oldNUM+1,nS);
return true;
}
RS.Close();
return false;
}

function dobZAP(nameDBF,nn,ss) {
mySQL="INSERT INTO "+nameDBF+" (NUM,SIZE) VALUES ("+nn+","+ss+")";
SConnect="Driver={Microsoft dBase Driver (*.dbf)};DefaultDir="+Folder;
RS=WScript.CreateObject("ADODB.Recordset");
try {
RS.Open(mySQL,SConnect);
}
catch(e) {
if (e != 0) {
WshShell.Popup("Не удалось добавить запись.",10,
"Ошибка добавления записи",16);
return;
}
}
return;
}

function pechatR() {
var d = new Date();
var iskl = "+^%~()<>!";
var tt = 20;
var gMo=d.getMonth();

theNotepad=WshShell.Exec("notepad");

do {
tTx=selectFile();
if (FSO.FileExists(tTx) == true) {
tFi=FSO.GetFile(tTx);
TIn=tFi.OpenAsTextStream(1,-2);
do {
s=TIn.ReadLine();
for (i=1;i<=s.length;i++) {
tSt=s.substr(i-1,1);
if (iskl.indexOf(tSt) >= 0)
tSt="{"+tSt+"}";
WshShell.AppActivate(theNotepad.ProcessID);
WScript.Sleep(tt);
WshShell.SendKeys(tSt);
}
WshShell.SendKeys('~');
if (provCloseConnect() == true)
break;
}
while (!TIn.AtEndOfStream);
TIn.Close();
}
}
while (!provCloseConnect());
theNotepad.Terminate();
return;
}


function selectFile() {
var Ffold,Ffiles;
if (FSO.FolderExists(dirTXT) == true) {
Ffold=FSO.GetFolder(dirTXT);
Ffiles = new Enumerator(Ffold.Files);
Ffiles.moveFirst();
while (!Ffiles.atEnd()) {
if (provSE(Ffiles.item()))
return dirTXT+"\\"+Ffiles.item().Name;
Ffiles.moveNext();
}
}
else {
return Folder+"\\txt.txt";
}
return;
}

function provSE(nFil) {
if (FSO.FileExists(Folder+"\\files.dbf") == false) {
createDBF("files.dbf");
dobZAP("files.dbf","1","'"+nFil.Name+"'");
return true;
}

else {
mySQL="SELECT COUNT(*) FROM FILES WHERE SIZE= '"+nFil.Name+
"' GROUP BY SIZE";
SConnect="Driver={Microsoft dBase Driver (*.dbf)};DefaultDir="+Folder;
RS=WScript.CreateObject("ADODB.Recordset");
RS.CursorType=3;
try {
RS.Open(mySQL,SConnect);
}
catch(e) {
if (e != 0) {
WshShell.Popup("Не удалось выбрать данные по файлам.",10,
"Ошибка выбора.",16);
return false;
}
}
if (RS.EOF == true && RS.EOF == true) {
RS.Close();
mySQL="INSERT INTO files.dbf (NUM,SIZE) VALUES ('1','"+nFil.Name+"')";
SConnect="Driver={Microsoft dBase Driver (*.dbf)};DefaultDir="+Folder;
RS=WScript.CreateObject("ADODB.Recordset");
try {
RS.Open(mySQL,SConnect);
}
catch(e) {
if (e != 0) {
WshShell.Popup("Не удалось добавить запись.",10,
"Ошибка добавления записи",16);
return false;
}
}
return true;
}
if (RS.Fields(0).Value == 0) {
RS.Close();
return true;
}
}
return false;
}

function izmDate(dd) {
var mm;
mm = new Date(dd);
tmpDay=izmlen(2,mm.getDate());
tmpMon=mm.getMonth()+1;
tmpMon=izmlen(2,tmpMon);
mm = tmpDay+"."+tmpMon+"."+mm.getYear();
return mm;
}

function izmlen(dlin,stroka) {
stroka=stroka+"";
ll=dlin-stroka.length;
if (stroka.length>=dlin) {
return stroka;
}
else {
new_stroka=stroka;
for (i=1;i<=ll;i++) {
new_stroka="0"+new_stroka;
}
}
return new_stroka;
}

function provCloseConnect() {
var FF,TT,su;
su="";
FF=FSO.GetFile(tFini);
TT=FF.OpenAsTextStream(1,-2);
do {
su=TT.ReadLine();
}
while (!TT.AtEndOfStream);
TT.Close();
if (su.indexOf("Connection from") >= 0)
return false;
return true;
}

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

:-D
такто тема жжот
можно смотреть
кучей экранных агентов
кучей клавиатурных шпионов
тупо проксей
сниффером сетевым
права всем - пользовательские
но лучше всего - не дердать на работе людей которые занимаются не работой а своими делами

можно конечнов оевать но я думаю лучше вместе делать работу и зарабатывать деньги
мотивация - рулит

как вариант договориться с админом, а тот уж наверняка знает что сделать ;-)

нарисовал такую картинку... :-D



Фотография из Фотогалереи на E1.ru

поставили на заставку рабочего стола

неа... :-D

дык придецО....

КПД поднимать бум... :-)

проще включить диспетчер задач и смотреть на загрузке ЦП и запуска етого файла
r_server.exe

Схема проста, если радмин не работает, на ковёр вызывается админ, который всё поправит. Если он дорожит работой, то либо сделает так, что вы нифига больше не сделаете сами, либо черкнёт докладную на вас и тут тож много вариантов событий. 1.Возьмут вас под пристальный контроль 2.премия 3.приставят стажёра принимать дела. Не нагребайте на свой зад, трудитесь

У вас на работе личная жизнь, что ли?:.
Или вы считаете. что прогу эту поставили от не фиг делать?:.

на рабочем месте я провожу 8-10 часов в день... и работаю уже тут несколько лет...
так что это часть моей личной жизни... :-p

Вставь загрузочную флешку. Стартуй с неё и снеси радмин. На вопрос: "Куда делся?" отвечай: "Антивирус тут убил какие-то файлы, может и ваш под горячую руку попал..." Нортон видит радмина как лоу риск, если ему разрешить, то пристрелит сразу. :-)

Кстати, если создать человеку некомф. условия работы, КПД падает еще ниже, чем при наличии безобидной аськи.
А если учесть, что кол-во стресса возрастает, то КПД будет падать ниже и быстрее.
на рабочем месте 8-10 часов в день, добавим время на дорогу. В итоге сколько времени остается на общение в реале?
ИМХО у человека должнв быть возможность отдохнуть на рабочем месте.

вроде, при включении Р-админа - картинка на рабочем столе должна пропадать и появляться просто синяя заставка? или я с какой другой подобной прогой путаю?

С ремоут десктопом.

поставть на комп висту... вместо картинки дир увидит чёрный экран....

Таран что ли поодглядывает? Ну а что? Имеет право. :cool:
Я когда работал инженером проектов у Селиванова не было р-админа, так он сам неожиданно заглядывал в кабинет :-)
А вообще скажу что чушь это все, слежение. Потому как если человек на самом деле работает, то ему некогда отвлекаться на всякую ерунду типа однокласников :lol:
Загляни например в проектный отдел, не думаю что они по сайтикам ползают, они пашут как заведённые, потому что работают "на результат".
Кстати привет коллега, как ни как около 5 лет я там честно(если не считать мелких халтурок, которые подкиывали из магазина снизу, типа поставить на квартиру домофончик) отработал. ;-)

а я года четыре (97-01) в соседней конторе работал :-)
Ваши постоянно к нам ходили ))

Понятно. Это тогда, когда офис еще на Свердлова был. Застал я то времечко, я там с 96 года работал.

Тема автоматически закрыта.