Передача файла по нету.

← →
Johnnnnn (2009-08-10 03:01) [0]

В общем есть какойто простой компонент для передачи файла чтоб ип хоста написаит и порт и название файла и можно слать ато чтото сокеты меня реально бесят.

← →
TIF © (2009-08-10 03:52) [1]

Пакет сетевых компонентов Indy
TIdTCPServer (Отсылать)
TIdTCPClient (Принимать)

PS: меня сильно поколбасило от текста
> В общем есть какойто простой компонент для передачи файла
> чтоб ип хоста написаит и порт и название файла и можно слать
> ато чтото сокеты меня реально бесят.

Translate to russian:
"Есть ли какой-то простой компонент для передачи файла, чтобы написать IP хоста, порт и имя файла и отослать, а то что-то работа с сокетами меня раздражает?"

← →
PZ (2009-08-10 06:51) [2]

Плюс к [1] TIF © (10.08.09 03:52)

PS: меня сильно поколбасило от текста

← →
Johnnnnn (2009-08-10 08:05) [3]

Спасибо за
> Пакет сетевых компонентов Indy

← →
Johnnnnn (2009-08-10 08:08) [4]

> а то что-то работа с сокетами меня раздражает?

не они именно бесят! причем нипадецки!

← →
Сергей М. © (2009-08-10 09:15) [5]

> не они именно бесят

Если не они , то кто ?)

← →
Johnnnnn (2009-08-10 09:47) [6]

если не они тогда Palladin

← →
Dennis I. Komarov © (2009-08-10 09:54) [7]

Вы просто не умеете их готовить...

← →
Johnnnnn (2009-08-10 09:58) [8]

> Вы просто не умеете их готовить...

Согласен, но настроения разбираться вобще никакого нет... Будет время может както осилю, а пока ну их.

← →
Сергей М. © (2009-08-10 10:17) [9]

> Johnnnnn (10.08.09 09:58) [8]

А откуда удаленный хост узнает, что он обязан от тебя что-то там принять на таком-то порту ?)
Кто об этом позаботится кроме тебя ?)

← →
Johnnnnn (2009-08-10 11:05) [10]

Первый пост был написан в приступе неконтролируемой злости (3 примера с сокетами в нете перепробовал и все какие-то ошибки выдают) поэтому писал быстро. А ситуация такая - есть "сервер" (запущенный на удаленной машине) и есть клиент, нужно наладить передачу файлов между ними по нажатию кнопки, нажал - получи файл, нажал другую забросил файл обратно. То есть да, об открытом порте буду заботиться я и я в курсе.:)

← →
Сергей М. © (2009-08-10 11:11) [11]

> есть "сервер"

Что значит "есть" ?
Откуда он там взялся ?
Его разрабатывал ты сам или использовал готовую стороннюю разработку ?
Какой прикладной протокол используется этим сервером для обслуживания клиентов ?

> все какие-то ошибки выдают

Что, вот прямо все они так и говорят - "выдаю какие-то ошибки" ?
Или в текстах этих ошибок сплошь и рядом незнакомые тебе буквы ?)

← →
Johnnnnn (2009-08-10 11:15) [12]

Ок. Один остался счас закину.

← →
Johnnnnn (2009-08-10 11:22) [13]

Это сервер под сервером подразумеваю, мое приложение с ServerSocket
глобальные var
const
MAX_BUF_SIZE = $4095;

var
Form1: TForm1;
fStream: TFileStream;
принимаем файл (а это точно файл потому как я ничего не шлю кроме файла:
procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
Socket: TCustomWinSocket);
var
count :Integer;
buffer: Array [0..MAX_BUF_SIZE] of Char;

begin
repeat
Socket.Lock;
count:= Socket.ReceiveBuf(buffer,SizeOf(buffer));
if count > 0 then
fStream.WriteBuffer(buffer,count);
Socket.Unlock;
until (count <= 0);
fStream.Free;
end;
fStrem создается здесь:
procedure TForm1.FormActivate(Sender: TObject);
begin
fStream:= TFileStream.Create("c:\2.xls", fmCreate);
end;

Клиент:
procedure TForm1.Button1Click(Sender: TObject);
var srcfile: TMemoryStream;

begin
try
srcfile :=TMemoryStream.Create;

srcfile.LoadFromFile("C:\1.xls");

ClientSocket1.Socket.SendStreamThenDrop(srcfile);
srcfile.Free;
except
end;

end;

выдет какието ошибки мне чесно лень даже было смотреть че там было, мне просто файл переслать нужно и нужно это решить просто без ковыряний, по крайней мере пока желания нет ковыряться никакого.

← →
Johnnnnn (2009-08-10 11:24) [14]

а да кстати кусок файла оно таки присылает, потом какието обрывы, ошибки, короче я манал, вобще настроение писать пропало все:) повтыкаю пару часиков посмотрю что там с indy может полече будет:)

← →
Anatoly Podgoretsky © (2009-08-10 11:32) [15]

> мне чесно лень даже было смотреть че там было,

А нам тем более лень.
Ты закажи работу, тому, кому не лень и все будет в порядке.

← →
Anatoly Podgoretsky © (2009-08-10 11:33) [16]

> вобще настроение писать пропало все:) повтыкаю пару часиков

Правильно повтыкай и иди в другое место работать - менеджером.

← →
Johnnnnn (2009-08-10 11:39) [17]

Я не програмер. Если пишу чтото то для удаления рутины, я кстати менеджером и работаю:) А если для такой ерунды как пересылка файла когото нанимать то никаких денег не напасешся!:)

← →
Сергей М. © (2009-08-10 11:41) [18]

> мне чесно лень даже было смотреть че там было

> желания нет ковыряться никакого

Ну вот как только преодолеешь лень и появится желание "ковыряться", так сразу и приходи.

А пока см. [15]

← →
Сергей М. © (2009-08-10 11:43) [19]

> Я не програмер

Зачем тогда полез в программинг ?
Тебе что, готовых решений мало ?)

← →
Johnnnnn (2009-08-10 11:46) [20]

> Тебе что, готовых решений мало ?)

Одно и тоже что разбираться что ктото придумал что самому побыстрому чтото написать, пока вот пользуюсь готовым решением:) Но оно не устраивает.

Зачем тогда полез в программинг ?

Вопрос улыбныл. Да нравится мне надосуге голову поломать:)

← →
Anatoly Podgoretsky © (2009-08-10 11:51) [21]

> Johnnnnn (10.08.2009 11:46:20) [20]

Ну так и ломай, голова твоя.

← →
Сергей М. © (2009-08-10 12:12) [22]

> оно не устраивает

Какое конкретно и чем ?

> нравится мне ..голову поломать

никак не вяжется с

> меня реально бесят

Или тебе нравится , когда тебя "реально бесит" ?)

← →
Плохиш © (2009-08-10 12:19) [23]

И зачем сантехнику программирование?

← →
Johnnnnn (2009-08-10 12:20) [24]

> Или тебе нравится , когда тебя "реально бесит" ?)
>

Вот поэтому вы сейчас и наблюдаете меня пишущего вам ответы на форуме потому что мне не нравится когда оно мен ябесит и я сделать ничего не
могу:)

> Какое конкретно и чем ?

Открываем терминал открываем файлик редактируем сохраняем, иногда бекапы делать нужно и их с ервера вытаскивать, не хочу открывать терминал (но файл должен быть на сервере), для всего етого пытаюсь сделать простое приложение которое вытаскивает файл с сервака, сохраняет и открывает, я его редактирую сохраняю закрываю, опять нажимаю на кнопку файл уходит на место, попутно на сервере перед тем как отослать файл мне для редактирования должна сохраняться копия (малоли чего я там наредактирую бекап непомешает). Вот и все. Да ерунда это все все что нужно у меня уже есть в любом случае эту проблему я решу с помощюь или без но решу ее полюбому.

← →
Johnnnnn (2009-08-10 12:22) [25]

Удалено модератором
Примечание: Проблема в том, что пшол ты, а не он

← →
Сергей М. © (2009-08-10 12:28) [26]

> сделать ничего не
> могу

Да ты еще ничего не сделал для того чтобы оно тебя н бесило, а радовало)
Палец о палец не ударил)

← →
Johnnnnn (2009-08-10 12:31) [27]

> Палец о палец не ударил)

Ударил! я 2 часа сидел в нете искал примеры потом эти примеры опробывал, в итоге я залез на этот форум спросил про компонент счас вот малеха разгребу тут посмотрю что можно с этими indy сделать, потом если невыйдет с ними вернусь опять к сокетам и так до победного конца.:)

С чего ты вооббще взял, что тебе поможет какой-то там волшебный компонент ?)

Если , к примеру, маршрут до сервера отсутствует или целевой сервис на целевом хосте по ряду причин не доступен, тебе не поможет ни компонент, ни царь, ни бог и не герой)

← →
Johnnnnn (2009-08-10 12:39) [29]

Поможет, потому как у сервака постоянный IP который отлично от меня пингуется. Да и это по сокетам текстовые сообщение идут на ура. а с файлами ну немогу я нада чтото полегче чтото понятнее (для меня по крайней мере).

> я кстати менеджером и работаю

менеджерами у нас сейчас называют впоть до продавца-консультанта...
to manage - управлять
meneger - управляющий
и чем там управляешь?

и тем не менее плохой из тебя менегер... такую программку тебе напишет боле-менее сображающий студент-второкурсник за пару-тройку бутылок пива. А ты свое время не ценишь => оно у тебя дешево стоит...

← →
Johnnnnn (2009-08-10 12:43) [31]

> и тем не менее плохой из тебя менегер..

Работа у меня не бей лежачего, и вся трабла в том что хоть делать и нефиг а на работе от 9 до 18 должен быть, так что да я плохой менеджер. Ну что уж тут поделаеш.

> с файлами .. немогу

Вот и рассказывай подробно симптомы своей нетрадиционной файловой импотенции)

> нада чтото полегче чтото понятнее

Например ?

← →
Johnnnnn (2009-08-10 12:46) [33]

> Например ?

Ну например через пару часиков посмотрю что можно придумать с indy. Пока к сожаления нет времени.

1.

> я кстати менеджером и работаю

2.

> так что да я плохой менеджер.

Надо что-то менять...

> Johnnnnn (10.08.09 12:46) [33]

Т.е. на Indy ты возлагаешь надежды аки на волшебную палочку ?
Ай да незнайка)

> нет времени

Видимо очень занят нифиганеделаньем)

1.

> Работа у меня не бей лежачего...

2.

> Пока к сожаления нет времени.

Свидетель явно путается в показаниях...

Передача файла по нету. Найти похожие ветки