|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Передача изображений по сети и администрирование.
Здравствуйте!
Срочно нужно добавить в чат возможность передачи графических файлов - изображений. Для того, что бы по локальной сети передавать отсканеренные файлы. Реализация нужна "сокетная". Очень нужно. И еще. Как администрировать компы по сети? Например выключить все компы или что-нибудь подобное. Если будут исходники - вообще замечательно! Я с этой темой вообще мало знаком. И с сетями тоже, поэтому, если не сложно, попроще. Спасибо. |
#2
|
||||
|
||||
?
Про администрирование:
Глянь, мою тему "Delphi Sources - Форум по программированию на Delphi > Все о Delphi > Интернет и сети > Локальная сеть". Тока в исходничке сделай проверку - если пришла, допустим единичка в переменной "f", то комп вырубить, если двоечка - то перезагрузить... А далее - воля твой фантазии, хоть винт форматируй. Но енто, если на удалённой машине твой сервак стоит, правда есть проги(я не помню название, но могу поискать), которые и без оного обходятся. А вот как они работают, я к сожалению не знаю. Если кто знает - отпишите в личку. |
#3
|
|||
|
|||
Ferra,
Спасибо, что откликнулся. Программисты, как я успел заметить, народ не контактный: написал много сообщений на много форумов. Ответил только ты(или вы, как угодно ). Скачал предложенный исходник. Клиент не работает, выдает какую-то непонятную ошибку, что-то с сокетом 10061, а что не понимаю. Насколько я смог понять своим ламерским умом ( ), смысл в том чтобы послать несколько (три) файла типа строки и получить целый. Так? Вот мне не понятно что такое "packed record". Если не тяжело, поправь меня, пожалуйста, и объясни что за тип. Такс, про администрирование... Допустим на обоих машинах - сервак и клиент или просто клиент... Я от сервака шлю определенную последовательность символов. Если та последовательность (клиент сверяет), то выключаем компьютер клиента или перезагружаем. Ок, понятно, а как реализовать??? Я прошу прощения за ламерские, возможно, вопросы, но я на кодера и не претендую. Заранее благодарен. |
#4
|
||||
|
||||
Так, так...
Да ничего, у всех бывают "ламерские, возможно, вопросы", все же с чего то начинали..
Почему исходник мой не работает, я не знаю.. Возможно ты что-то не так делаешь. Попробуй вот это: http://5eyes.at.tut.by/Downloads/SendText&SendImage.rar +Внутри комментарии и Readme/ Делай всё там написано, и всё должно получиться\ На счёт "packed record"-это мой тип. Попробую вкратце пояснить что это такое: Вот примерчик: type TYourType=record a:byte; b:String; end; после этих строк любая переменная может принимать тип TYourType, как тип Integer, Byte или String. Т.е. можно потом писать так var P : TYourType; И переменная "P" "хранит" 2 значения - "a" и "b", где a-Byte, a "b"-String. Теперь можно обращаться к "P" ... p.a:=1; p.b:='Hi to all!!!' ... Packed record - насколько я знаю, это что-то вроде упакованной переменной. В старом исходнике, я просто за один раз пересылаю 3 параметра(благодаря объявлению своего типа). Что не понятно по этой части - спрашивай. И Ещё. Клиент - для того чтобы пересылать команды, а сервак - чтобы принимать и выполнять. З.ы Может что то и пропущено, если вопросы- обращайся, я постароюсь в исходнике всё реализовать. Да и ещё процедура SENDTEXT - немного попроще (для тебя по крайней мере) чем SENDBUF, разберись с ней сначала. Вроде вс... Ответь, как понял... Нет повести печальнее на свете, чем повесть о заклиневшем Resete. |
#5
|
||||
|
||||
-ВСЕМ
Вот вроде что-то сделал, кого интересует:
http://5eyes.at.tut.by/Downloads/!DiChat_Source.rar http://5eyes.at.tut.by/Downloads/!DiChat_Exe.rar НО тут есть БАГИ. Правда небольшие, они почти не заметны; в основном проблемы будут, если много чуваков в чате.. Но исходник рабочий. Ах, да и передачи изображений сдесь нет, как выяснилось это (впрочем) и не надо... Нет повести печальнее на свете, чем повесть о заклиневшем Resete. Последний раз редактировалось Ferra, 13.06.2006 в 20:04. |
#6
|
||||
|
||||
+
P>s> Забыл пароль для админки - пробел.
Нет повести печальнее на свете, чем повесть о заклиневшем Resete. |
#7
|
||||
|
||||
Цитата:
Цитата:
|
#8
|
||||
|
||||
-
Это конечно круто, но в чём я не прав?
Нет повести печальнее на свете, чем повесть о заклиневшем Resete. |
#9
|
||||
|
||||
Цитата:
В моем понимании "упакован" - значит занимает меньший размер чем на самом деле (например: "файл упакован арховатором"), а в данном случае при использовании слова packed запись (или любая другая структура) будет занимать столько места в памяти сколько занимают суммарно составляющие ее элементы. Пример: Код:
test = packed record a:Char; b:Integer; end Код:
test = record a:Char; b:Integer; end Последний раз редактировалось Aristarh Dark, 15.06.2006 в 10:00. |
#10
|
||||
|
||||
->
Согласен, ты прав, сам тока в книжке посмотрел..
Нет повести печальнее на свете, чем повесть о заклиневшем Resete. |
#11
|
||||
|
||||
"Программисты, как я успел заметить, народ не контактный: написал много сообщений на много форумов"
Ты не прав. =))) InitiateSystemShutdown() - самый раз для вырубки рабочих станций. Поиграйся с ней. Есть пример сего http://www.sysman.ru/index.php?showtopic=3863. Но можно еще сделать логин на удаленной станции, залогиниться, определить софт/свойства удаленной машины=) а затем ее...сломать "возможность передачи графических файлов - изображений." А в чем разница между передачей текстовых файлов и графических? Ни какой=). Как текстовые передаешь, так и графику. SysMan. C++Builder Internet/Intranet Programming. Последний раз редактировалось Майняк, 25.06.2006 в 19:11. |