помогите разобраться с пакетной передачей данных

[anghela]

Здравствуйте! Помогите, пожалуйста, разобраться с пакетной передачей данных в Делфи. Может, у кого-нибудь есть источники информации, где это можно подробно изучить, или может кто-нибудь подробно расскажет что к чему. Очень надо. Нужно из текстовых полей на форме (на стороне клиента) взять данные и с помощью пакетов передать их на сторону сервера в БД. На сервере хранится только БД. Спасибо

[Stilet]

На данный момент при такой постановке задачи это не возможно )
Так что подробно рассказывай про сервер, какое СУБД, как к нему по сети можно достучаться и т.д.
Одно дело через ADO посылать запросы в СУБД, другое дело писать программу, а она уже либо по НTTP, либо по RPC либо еще как будет взаимодействовать с удаленным компом.

[anghela]

На самом сервере находится только СУБД MS Access. Подключение к нему еще не готово. Нужно разобраться со всем, что связано с пакетами. Передавать данные можно любым способом, хоть по сети Интернет, хоть по портам и т.д. Главное, сделать саму передачу. Т.е. в итоге на форме клиента я заполняю поля, произвожу расчеты, затем пакетами передаю эти данные каким-то способом на сервер. Проверяю можно ли добавить данные в таблицу (вдруг например такую запись в базу добавить не возможно, т.к. существует идентичная запись), либо я проверяю по базе на сервере какое то условие, и, наконец отправляю на форму клиента ответ в виде данных из таблице, либо с отказом занесения данных в СУБД

[Stilet]

Тогда без вариантов - делать свою серверную программу. Под Делфи можно использовать компоненты INDY.
В данном случае можно попробовать FTP компоненты, поскольку тебе конче потрибно именно пакетная передача. Хотя я бы наверное использовал HTTP, он как-то проще.

По поводу FTP (если принимаешь идею) механизм следующий:
1) Организовываешь приложение с FTPServer. В его обработчике получения файла считываешь из файла строки и скармливаешь их самому Акцессу:

procedure TForm1.FtpServerStoreFile(ASender: TIdFTPServerContext;
  const AFileName: string; AAppend: Boolean; var VStream: TStream);
var st:TstringList; i:integer;
begin
 VStream.position:=0;
 st:=TStringList.create;
 st.LoadfromStream(VStream);
 for i:=0 to st.count-1 do begin
  в st[i] очередной запрос
 end;
 st.free;
end.

2) Клиент у себя формирует в памяти файл и отсылает его на FTP

var st:TStringStream; i:integer;
begin
 st:=TStringStream.create;
 for i:=0 to st.count-1 do begin
  st.write(тут типа запрос)
  st.write(#13#10);
 end;
 ftp.Put(st,''); // Это компонент FTPClient
 st.free;
end.

Ну вот так-то как-то...

[anghela]

спасибо. Буду пробовать

[Son Of Pain]

Так а подключаться к аксесу готовым компонентом разве нельзя? Это ж тоже "пакетная передача", на самом деле )

[Stilet]

подключаться к аксесу готовым компонентом

Ну вдруг этот акцесс должен быть по законам безопасности защищен от вездействия извне? У меня на работе тоже такие приложения есть.

[Son Of Pain]

Тогда проще всего обмениваться запросами напрямую, думаю, без ftp и http. т. е. серверная часть держит соединение с базой данных через стандартный AdoConnection (или как там оно в делфи называется), принимает sql-запросы от клиента, передает их аксесу, получает результат и отправляет его обратно клиенту. Ну а клиентская часть, соответственно, подключается к серверной, шлет sql-запрос, получает ответ и показывает его на форме.

А еще можно попробовать покурить вот это, если лень изобретать свой велосипед - http://office.microsoft.com/en-us/ac...010356866.aspx

[Stilet]

проще всего обмениваться запросами напрямую

Да, но я предложил FTP потому что удобно им передавать данные типа файлов, меньше писанины будет - сам так делаю.