Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.07.16;
Скачать: CL | DM;

Вниз

Обработка данных посланных серверу методом POST   Найти похожие ветки 

 
NORDmen ©   (2006-06-26 21:42) [0]

привет. я не знаю где рыть в следующем вопросе:
программа на delphi должна получать данные из веб форм посланные методом post.
возможно ли это вообще сделать? какие компоненты юзать, и что вообще  можно почитать по сабжу?


 
Мефисто   (2006-06-26 21:48) [1]

В данном вопросе могу очччень ошибаться
Но может заглянуть сюда \Demos\IntraWeb\ и глянуть нелп по соотвествующим компонентам?

Еще раз повторюсь, что это именно то что нужно, не уверен даже на 50% :)


 
nordmen ©   (2006-06-26 22:47) [2]

Мефисто, не знаю точно, но имхо интравеб для создания сайтов с помошью IDE delphi )(было дело делал сайт на intraweb ;) ), а вот насчет обработки данных сервером врядли...
но в любом случае - по интравеб оч. мало информации и лучше не браться за него.
дык должны же быть хотябы стандартные средства winapi - просто не знаю куда рыть.

подскажите плз кто знает!!!


 
Пусик ©   (2006-06-26 23:46) [3]

Вот, содрала из древнего проекта:
function GetPostEnv: String;
var
   StdIn,Size,Actual: Cardinal;
begin
 Result := "";
 StdIn := GetStdHandle(STD_INPUT_HANDLE);
 Size := SetFilePointer(StdIn,0,nil,FILE_END);
 SetFilePointer(StdIn,0,nil,FILE_BEGIN);
 SetLength(Result,Size);
 if Size>0 then
 begin
   ReadFile(StdIn,Result[1],Size,Actual,nil);
 end;

end;


 
nordmen ©   (2006-06-27 06:05) [4]

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


 
Пусик ©   (2006-06-27 09:51) [5]


>  как понять от какого компа это пришло?


Об этом вопроса не было. Но это в любом случае не проблема.

Функция возвращает строку, стодержащую переданные методом POST данные.

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

Вот функция, которая строку, переданную методом GET.

Все переменные окружения вытаскиваются аналогично.

function GetGetEnv: String;
var
 buf: PChar;
begin
 GetMem(buf,BufSize);
 GetEnvironmentVariable(PChar("QUERY_STRING"),Buf,BufSize);
 Result := String(buf);
 FreeMem(buf);
end;



Страницы: 1 вся ветка

Текущий архив: 2006.07.16;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.028 c
2-1151630252
NigthSkif
2006-06-30 05:17
2006.07.16
Tedit


11-1130343864
mdw
2005-10-26 20:24
2006.07.16
KOLGraphicEx - есть ли более свежая версия?


4-1144150645
Stanislav
2006-04-04 15:37
2006.07.16
Остановка параллельных процессов


6-1142003887
viman
2006-03-10 18:18
2006.07.16
Winsock 2, Win98(WinME) и UDP, как отправить свой заголовок?


2-1151675414
Новичоккк
2006-06-30 17:50
2006.07.16
Работа с buf:pointer как с массивом char