Суббота, 20.04.2024, 11:09 Приветствую вас Гость | Группа "Гости" 
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: Anton93, Волк-1024, xXxSh@dowxXx  
delphicode » Delphi » Программы на Delphi » IcQ Console Alpha Version!!! (тестирование)
IcQ Console Alpha Version!!!
frenДата: Вторник, 17.11.2009, 13:48 | Сообщение # 1
Частый гость
Зарегистрирован: 12.12.2008
Группа: Пользователи
Сообщений: 34
Статус: Offline
Команды:
Command - отправление всех этих команд на icq номер администратора.
EVENTON/EVENTOFF - отображение/скрытие событий
ShowDesk - показать иконки рабочего стола
HideDesk - спрятать иконки рабочего стола
ShowStart - показать пуск
Hidestart - спрятать пуск
ShowClock - показать часы
HideClock - спрятать часы
TimePC - время на компьютера
TimePowerPC - время работы компьютера
Cdo - открыть привод компакт дисков
Сdc - закрыть привод компакт дисков
Off - выключить
Reboot - перезагрузка
Msl - клик левой кнопкой мыши
Msr - клик правой кнопкой мыши
Msm - клик средней кнопкой мыши
Vk_enter - нажатие enter
Vk_escape - нажатие escape
Vk_space - нажатие пробела
Getclb - буфер обмена (текст)
Setclb <текст> - занести в буфер обмена (текст вводится большими буквами в след. версии будет исправлено)
Close - закрыть IcQ Console
GetProc - получить список процессов
Author - Автор - Павел Павлов
Delfile <файл> - удаление файла
Killdir <директория> - удаление директориии
Open <файл> - открыть файл
OpenUrl <ссылка> - открыть ссылку в стандарном браузере
KillProc <процесс.exe> - убить процесс
Mesto <Текст>,<Заголовок> - вывод на экран пользователя сообщения
CopyFile <Старый файл>,<Новый файл> - копирование файла (около запятых пробелы не ставятся!!!)
CopyDir <Старая директория>,<Куда копировать> - копирование директории (около запятых пробелы не ставятся!!!)

Специальные команды:
Dir - отображение дисков на компьютере
Dir <диск> - переход на диск <диск> и отображение всех директорий и файлов на диске.
Opendir (opd) <dir-number> - открытие каталога (обычно используется после команды "dir <диск>"), какой <dir-number> можно узнать в начале имени каталога
Openfile (opf) <file-numer> - аналогично предыдущей команде. Открытие <file-number> файла. <file-number> указан в начале имени файла.
sendfile - запланированная команда передачи выделенного файла вам на icq номер (допустим qip клиент) с удаленной машины.

План:
-уже в следующей версии делаю полное управление CMD!
-оч хочется передачу файлов сделать)

Прикрепления: IcQConsolealpha.rar (345.4 Kb)


Сообщение отредактировал fren - Вторник, 17.11.2009, 19:35
 
JawДата: Среда, 18.11.2009, 10:02 | Сообщение # 2
Участник
Зарегистрирован: 09.03.2009
Группа: Пользователи
Сообщений: 70
Статус: Offline
Ммм странно большинство команд один в один как на ICQBlackDoorAlenka, даже название не изменил)).

Сообщение отредактировал Jaw - Среда, 18.11.2009, 10:04
 
frenДата: Среда, 18.11.2009, 11:02 | Сообщение # 3
Частый гость
Зарегистрирован: 12.12.2008
Группа: Пользователи
Сообщений: 34
Статус: Offline
Я не тупо стырил, я объединяю команды для полного администрирования))

добавил спец... -функция просмотра файлов..позже редактирование сделаю...

 
JawДата: Среда, 18.11.2009, 11:14 | Сообщение # 4
Участник
Зарегистрирован: 09.03.2009
Группа: Пользователи
Сообщений: 70
Статус: Offline
У тебя получается прога для удаленного администрирования намного интересней было еслиб это был бэкдур.
 
frenДата: Среда, 18.11.2009, 11:20 | Сообщение # 5
Частый гость
Зарегистрирован: 12.12.2008
Группа: Пользователи
Сообщений: 34
Статус: Offline
да так получается...) хорошая идея "IcQ Console [BackDoor]" спец версия) сделаю)

не сложно...убрать трей и из дисп. задач

Сообщение отредактировал fren - Среда, 18.11.2009, 11:21
 
dolphinДата: Среда, 18.11.2009, 22:11 | Сообщение # 6
Администратор
Сообщений: 906
Статус: Offline
Исходник в студию fren

Система: Windows 10 x64, Kali Linux
Среды программирования: Delphi 7, Delphi 10.x

Я не профессионал, я всего лишь любитель
Я не вредитель, я всего лишь теоретик
 
frenДата: Среда, 18.11.2009, 23:07 | Сообщение # 7
Частый гость
Зарегистрирован: 12.12.2008
Группа: Пользователи
Сообщений: 34
Статус: Offline
Могу кинуть исходник ICQBlackDoorAlenka...он гдето скачивается...
а моя прога закрыта...оч много мудачусь над ней)
 
frenДата: Среда, 18.11.2009, 23:09 | Сообщение # 8
Частый гость
Зарегистрирован: 12.12.2008
Группа: Пользователи
Сообщений: 34
Статус: Offline
Доступно только для пользователей

Сообщение отредактировал dolphin - Понедельник, 11.01.2010, 21:15
 
МарсельДата: Пятница, 01.01.2010, 13:20 | Сообщение # 9
Группа: Удаленные



fren, в чём ваще смысл твоих переделок?? В принципе как и смысл самой проги? Кому нужно удалённо нажимать на правую кнопку мыши или жать пробел, ИМХО идиотизм.
 
dolphinДата: Пятница, 01.01.2010, 16:41 | Сообщение # 10
Администратор
Сообщений: 906
Статус: Offline
Но несколько пелезных функций есть, собственно за этим и исходник, пользуйтесь ))

Система: Windows 10 x64, Kali Linux
Среды программирования: Delphi 7, Delphi 10.x

Я не профессионал, я всего лишь любитель
Я не вредитель, я всего лишь теоретик
 
Ca5perДата: Четверг, 21.01.2010, 16:19 | Сообщение # 11
Группа: Удаленные



ICQ Black Door Alenka wink http://nanoteam.net/index/programs/0-9 (Авторский, наш сайт)
Команды свежей аленки:
Code
[Команды]
COMMANDS - список комманд
INFO - информация о компьютере
OFF - выключить компьютер
REBOOT - перезагрузка компьютера
CDO - открыть привод компакт дисков
СDC - закрыть привод компакт дисков
DRIVELIST - список дисков
SETDRIVE: - задать жесткий диск
GETCLB - буфер обмена (текст)
SETCLB: - занести в буфер обмена (текст)
TASKLIST - получить список процессов
TASKCLOSE: - закрыть процесс
TASKPATH: - путь процесса
OPEN: - открыть файл или ссылку
OPENTXT: - прислать текст из файла
COPYFILE:<Старый файл>,<Новый файл> - копирование файла
UPLOADFILE: - залить файл на FTP
DELFILE: - удаление файла
DIR: - список директорий и файлов в выбраной папке
COPYDIR:<Старая директории>,<Куда копировать> - копирование директории
RMDIR: - удаление директории
SCREENSHOT:<качество> - прислать скриншот экрана на FTP
SETWALL: - изменить рабочий стол
MAIL:<кому>,<от кого>,<имя от кого>,<тема письма>,<текст письма> - отправить письмо на почту
AUTHOR - создатель
CLOSE - закрыть клиент
[Шалости]
SHOWDESK,HIDEDESK - показать, спрятать иконки рабочего стола
SHOWSTART,HIDESTART - показать, спрятать пуск
SHOWTASKBAR,HIDETASKBAR - показать, спрятать таскбар
SHOWCLOCK,HIDECLOCK - показать, спрятать часы
[Клавиатура и мышь]
SETCURSOR: - перемещение курсора в указанную точку
MSL,MSR,MSM - клик левой, правой и средней кнопкой мыши
ESC,TAB,CAPSLOCK,SHIFT,CTRL,ALT,SPACE,DELETE и т.д. - команды соотвествуют кнопкам
UP,LEFT,RIGHT,DOWN - кнопки управления
A-Z, А-Я - команды соотвествуют кнопкам
TEXT: - печатание текста
MESSAGE:<Текст>,<Заголовок> - вывод на экран сообщения


Сообщение отредактировал Ca5per - Пятница, 22.01.2010, 11:40
 
JawДата: Вторник, 26.01.2010, 21:21 | Сообщение # 12
Участник
Зарегистрирован: 09.03.2009
Группа: Пользователи
Сообщений: 70
Статус: Offline
каспер, есть пару полезных команд, но большинство ненужные(

P.S: fren жду бекдур версии этой проги, могу поделится своими разработками на эту тему.

Сообщение отредактировал Jaw - Вторник, 26.01.2010, 21:25
 
Ca5perДата: Пятница, 05.02.2010, 15:50 | Сообщение # 13
Группа: Удаленные



Jaw, во нубло biggrin , эта ICQ Black Door Alenka автор тупо изменил наши исходнки :D, тебе может и не нужные, а вот по мнению журнала хакер это аналог радмина wink
 
JawДата: Пятница, 05.02.2010, 19:59 | Сообщение # 14
Участник
Зарегистрирован: 09.03.2009
Группа: Пользователи
Сообщений: 70
Статус: Offline
Quote
Jaw, во нубло, эта автор тупо изменил наши исходнки

Зачем было выкладывать в паблик исходники, а потомо говорить: "мол, зачем передираете сорцы", странный ты однако.

 
kakawkinДата: Вторник, 27.04.2010, 21:27 | Сообщение # 15
Был не раз
Зарегистрирован: 18.04.2010
Группа: Пользователи
Сообщений: 16
Статус: Offline
да какаято шляпа.

Ты еще зделай перемещение курсора по X,Y координатам и тогда запомнив всё и смогу перемещая курсор+левым и правым нажатием - удаленно администрировать компьютер.

А если честно то функций полезных нету!

 
labvictxДата: Суббота, 15.05.2010, 16:11 | Сообщение # 16
Группа: Удаленные



kakawkin, Если тебе не нравиться то пиши сам, тебя не кто и не заставляет этим пользоваться. А Мне нравится и многим тоже. Хоть кто-то конкретный рабочий пример привел и поделился со всем просто так, а ты что полездного для народа за просто так сделал, а все тудаже судить, много вас таких туко критиковать можите и хаус наводить, а на полезное не способны??? ЗА то судить других просто. Ты вот лучше как профи мне помги, как решить проблему связанную в программир.. cool
Ca5per, Спасибо огромное за вашь выложенный пример исходника ICQ Black Door Alenka smile http://nanoteam.net/index/programs/0-9, жаль тока не успел новую версию исходного кода с новыми новшествами скачать sad , закрыли свой сайт. Жаль surprised . Я занимаюсь, тем что пишу программы по удаленному администрированию локальной сети, облегчая жизнь админам (в Radmине много нет, да и он не мобильный как ваше творение)и ваш пример мне очень помог во времени и в др. Одна голова хорошо, две лучше.
Да уж, что касается fren, wacko не красиво поступил, использовал ваш исходник, ну всевышний ему судья. В жизни все протикает по методу "бумиранга" только с %ами.
 
cool1Дата: Вторник, 09.11.2010, 09:27 | Сообщение # 17
Участник
Зарегистрирован: 14.07.2010
Группа: Пользователи
Сообщений: 238
Статус: Offline
fren
спс за сорец



За помощь ставьте +!
 
xXxSh@dowxXxДата: Четверг, 16.02.2012, 22:03 | Сообщение # 18
Авторитетный
Зарегистрирован: 22.01.2012
Группа: Модераторы
Сообщений: 702
Статус: Offline
Вот вы говорите бесполезные функции....,на мой взгляд чем больше функций реализовано тем лучше,и неважно какие они,а полезные или нет каждый сам решает для себя,главное что они есть...

да кстати благодарю за сорец,огромное спасибо...


Сообщение отредактировал xXxSh@dowxXx - Четверг, 16.02.2012, 22:04
 
xakep9864Дата: Пятница, 14.09.2012, 23:04 | Сообщение # 19
Группа: Удаленные



выложите плиз проэкт бекдура или сам бекдур, а то я не врубаюсь как из сурсняка сделать бекдур sad
 
okeДата: Вторник, 25.06.2013, 02:15 | Сообщение # 20
Постоянный
Зарегистрирован: 15.01.2012
Группа: Пользователи
Сообщений: 124
Статус: Offline
на самом то деле можно просто юзать winexec и получения текста с cmd вот и полное администратирование, да и к тому же меньше размер, меньше палева перед ав.
 
delphicode » Delphi » Программы на Delphi » IcQ Console Alpha Version!!! (тестирование)
  • Страница 1 из 1
  • 1
Поиск:

delphicode.ru © 2008 - 2024 Хостинг от uCoz