Вниз
Скачать: CL | DM;

CGI+POST   Найти похожие ветки 

← →
Leran2002 ©   (2003-02-28 10:40) [0]

Как у TWebActionItem в onAction получить данные отправленные методом POST???

При GET делаю следующее, все работает, а при POST непроходит:

procedure TWebModule1.WebModule1WebActionItem2Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
with AdoQuery.Parameters do begin
ParamValues["[Сумма]"]:=Request.QueryFields.Values["newsum"];
ParamValues["[ТабНомер]"]:=Request.QueryFields.Values["tabnum"];
end;

NumCex:=StrToInt(Request.QueryFields.Values["numcex"]);
NumOtd:=StrToInt(Request.QueryFields.Values["numotd"]);
...


← →
Leran2002 ©   (2003-03-05 08:00) [1]

procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var
LoginS,PasswS:string;
begin
//*******************************************************
if Request.Method = "POST" then begin // если данные были переданы методом "POST"
LoginS:=Request.ContentFields.Values["Login"];
PasswS:=Request.ContentFields.Values["Passw"];
end
else begin // если данные были переданы методом "GET"
LoginS:=Request.QueryFields.Values["Login"];
PasswS:=Request.QueryFields.Values["Passw"];
end;
//*******************************************************

Отвечаю сам на свой вопрос. Однакос...



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c
1-91282
Дмитрий
2003-04-17 10:31
2003.04.28
Определить кол-во запущенных экземпляров другой программы...


3-91159
Knight
2003-04-09 14:13
2003.04.28
Программы скрытия дисков и управления доступом к папкам и файлам


1-91331
asafr
2003-04-14 18:32
2003.04.28
Word, замена найденного текста удалением строки...


14-91461
Почтальён Печкин
2003-04-09 13:09
2003.04.28
Письмо счастья


3-91233
Wedos
2003-04-11 08:47
2003.04.28
Сортировка строк по полю




   Наверх