Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 2003.04.28;
Скачать: [xml.tar.bz2];

Вниз

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 вся ветка

Форум: "Сети";
Текущий архив: 2003.04.28;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.014 c
1-91318
Val
2003-04-11 14:58
2003.04.28
Изменение стиля пера


3-91156
nvalery500
2003-04-09 11:42
2003.04.28
БД и файл-сервер


7-91578
DenneD
2003-03-08 22:44
2003.04.28
RW-Memore


14-91532
p@s
2003-04-10 12:31
2003.04.28
Нужен компонент TVCLScriptControl


3-91176
Patrick
2003-04-09 15:39
2003.04.28
Использование AppendRecord





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский