🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.delphi
Article #346352

DelphiXE2 IDHTTP.Get i polskie znaki

#346352
From: Karol
Date: Sun, 18 Feb 2018 19:26
89 lines
4138 bytes
Jak prawidłowo wysłać polskie znaki do skryptu PHP


   IdHTTP1.Request.ContentEncoding := TEncoding.Default.EncodingName;
   IdHTTP1.Request.UserAgent := 'Mozilla/5.0 (Windows; U; Windows NT 
5.0; pl-PL; rv:1.7.6) Gecko/20050226 Firefox/1.0.1';
   IdHTTP1.Request.ContentType := 'text/html'; 
IdHTTP1.Request.CharSet:=TEncoding.GetEncoding(TEncoding.Default.CodePage).EncodingName;

   ms := TMemoryStream.Create;
   try
   cialo1.First;
   while not cialo1.Eof do
   begin
     ms.clear;
     urls:=
           '?NAZWA='+cialo1.FieldByName('nazwa').Text+
           '&NIP='+cialo1.FieldByName('nip').Text+.........
     urls:=URLEncode(urls,true);
     try
 
IdHTTP1.Get('XXXXXXXXXXXXXXXXXXXX/zapiszdanekontrahenta.php'+urls, ms);
       ShowMessage(PAnsiChar(ms.Memory));
     except
       On E:Exception do ShowMessage(urls);
     end;
     Exit;
     Application.ProcessMessages;


     cialo1.Next;
   end;
   finally
     ms.free;
   end;
end;



W skrypcie PHP mam tak ustawione zmienne

     [_GET] => Array
         (
             [NAZWA] => W?odzimierz    <---    Chodzi o ta zmiennÄ…
             [NIP] => 9999999999
         )
....
[_SERVER] => Array
         (
             [USER] => ...
             [HOME] => ...
             [FCGI_ROLE] => RESPONDER
             [UNIQUE_ID] => WonSGuFkqBmMVS7WdQP-2QAAAVY
             [proxy-nokeepalive] => 1
             [HTTP_HOST] => XXXXXXX.pl
             [HTTP_X_REAL_IP] => 99.99.999.99
             [HTTP_X_FORWARDED_FOR] => 99.99.99.999
             [HTTP_X_ACCEL_INTERNAL] => /internal-nginx-static-location
             [HTTP_CONNECTION] => close
             [HTTP_CONTENT_ENCODING] => 1250  (ANSI - Europa ?rodkowa)
             [CONTENT_TYPE] => text/html; charset="1250  (ANSI - Europa 
?rodkowa)"
             [HTTP_ACCEPT] => text/html, */*
             [HTTP_USER_AGENT] => Mozilla/5.0 (Windows; U; Windows NT 
5.0; pl-PL; rv:1.7.6) Gecko/20050226 Firefox/1.0.1
             [PATH] => /usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin
             [SERVER_SIGNATURE] =>
             [SERVER_SOFTWARE] => Apache
             [SERVER_NAME] => XXXXXXX.pl
             [SERVER_ADDR] => 99.999.999.99
             [SERVER_PORT] => 80
             [REMOTE_ADDR] => 127.0.0.1
             [DOCUMENT_ROOT] => ...
             [REQUEST_SCHEME] => http
             [CONTEXT_PREFIX] =>
             [CONTEXT_DOCUMENT_ROOT] => .../XXXXXXX.pl
             [SERVER_ADMIN] => info@XXXXXXX.pl
             [SCRIPT_FILENAME] => .../zapiszdanekontrahenta.php
             [REMOTE_PORT] => 38016
             [GATEWAY_INTERFACE] => CGI/1.1
             [SERVER_PROTOCOL] => HTTP/1.0
             [REQUEST_METHOD] => GETXXX
             [REQUEST_URI] =>XXX
             [SCRIPT_NAME] => /zapiszdanekontrahenta.php
             [PHP_SELF] => /zapiszdanekontrahenta.php
             [REQUEST_TIME_FLOAT] => 1518981658.0794
             [REQUEST_TIME] => 1518981658
         )
...
Technical Details
Message-ID: <5a89d35f$0$567$65785112@news.neostrada.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!news.nask.pl!news.nask.org.pl!news.unit0.net!border1.nntp.ams1.giganews.com!nntp.giganews.com!peer02.ams1!peer.ams1.xlned.com!news.xlned.com!peer02.am4!peer.am4.highwinds-media.com!peer02.fr7!futter-mich.highwinds-media.com!news.highwinds-media.com!newsfeed.neostrada.pl!unt-exc-02.news.neostrada.pl!unt-spo-a-01.news.neostrada.pl!news.neostrada.pl.POSTED!not-for-mail

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!news.nask.pl!news.nask.org.pl!news.unit0.net!border1.nntp.ams1.giganews.com!nntp.giganews.com!peer02.ams1!peer.ams1.xlned.com!news.xlned.com!peer02.am4!peer.am4.highwinds-media.com!peer02.fr7!futter-mich.highwinds-media.com!news.highwinds-media.com!newsfeed.neostrada.pl!unt-exc-02.news.neostrada.pl!unt-spo-a-01.news.neostrada.pl!news.neostrada.pl.POSTED!not-for-mail
Newsgroups: pl.comp.lang.delphi
X-Mozilla-News-Host: news://news.neostrada.pl:119
From: Karol <konsul41@wp.pl>
Subject: DelphiXE2 IDHTTP.Get i polskie znaki
Date: Sun, 18 Feb 2018 20:26:23 +0100
User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64; rv:45.0) Gecko/20100101 Thunderbird/45.8.0
MIME-Version: 1.0
Lines: 95
Message-ID: <5a89d35f$0$567$65785112@news.neostrada.pl>
Organization: Telekomunikacja Polska
NNTP-Posting-Host: 37.47.41.252
X-Trace: 1518981983 unt-rea-b-01.news.neostrada.pl 567 37.47.41.252:21153
X-Complaints-To: abuse@news.neostrada.pl
X-Received-Body-CRC: 4022790632
X-Received-Bytes: 3951
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit