Главная страница
    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.008 c
9-91137
seemann
2002-10-06 19:05
2003.04.28
Непослушный спрайт


1-91260
malkolinge
2003-04-16 17:20
2003.04.28
Загадка с гридом !


1-91329
Neox
2003-04-14 16:03
2003.04.28
динамический массив


14-91497
Seb_Kost
2003-04-10 07:35
2003.04.28
Сохранение и НЕСохранение изменений


14-91446
Dudao
2003-04-06 05:05
2003.04.28
Интерфейc и Delphi





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский