Добрый день...посылаю запрос страничке на локалхост, он замечательно доходит, но в переменных р1..р6 пусто. Не знаю что делать. Подскажите пожалуйста. Ниже код
Отправка:
| Код |
URL = 'http://localhost/bmweb/mike/mike.dll/Msg';
...
HTTP := TIdHTTP.Create(nil);
HTTP.ReadTimeout := 30;
MsgData := TIdMultiPartFormDataStream.Create;
try
MsgData.AddFormField('p1', Kassa);
MsgData.AddFormField('p2', Number);
MsgData.AddFormField('p3', Name);
MsgData.AddFormField('p4', MTextMsg.Text);
MsgData.AddFormField('p5', IntToStr(InDig));
MsgData.AddFormField('p6', IntToStr(OutDig));
MTextMsg.Clear;
MTextMsg.Text := HTTP.Post(URL, SL);
finally
HTTP.Free;
MsgData.Free;
SL.Free;
end;
|
Приём
| Код |
Kassa := WebContext.Request.QueryFields.Values['p1'];
Number := WebContext.Request.QueryFields.Values['p2'];
Name := WebContext.Request.QueryFields.Values['p3'];
Text_Msg := WebContext.Request.QueryFields.Values['p4'];
InDig := WebContext.Request.QueryFields.Values['p5'];
OutDig := WebContext.Request.QueryFields.Values['p6'];
|
и все переменные пустые. По идеи он не так отправляет, так как когда я писал модуль для приёма - делал всё точно также и всё классно получалось((( |
. В принципе я это и так знаю, просто это особенности апача))), забыл поменять.