Вниз
Скачать: 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.017 c
6-91426
Chak
2003-03-05 11:04
2003.04.28
Помогите понять ServerSocket и его метод GetThread!!!


14-91519
FLIZ
2003-04-11 02:26
2003.04.28
Про типусов, мнящих себя


3-91195
GRR
2003-04-10 10:14
2003.04.28
IBTransaction - помогите разобраться


1-91374
Chelny
2003-04-15 00:30
2003.04.28
String to Float


14-91499
Gaber
2003-04-09 11:10
2003.04.28
IB 6.0 backup, restore




   Наверх