Das hat schon alles seinen Sinn mit WinSock
Ich hätte auch IdHTTP nehmen können, aber darum geht es nicht.
Edit: so sieht das script zur abfrage aus, in der index.php wird dann einfach ein
aufgerufen
Delphi-Quellcode:
<?php
$sock = fsockopen( "
localhost", 80, $errno, $erro, 2);
$header = "POST /testserver/
index.php HTTP/1.1 \r\n"
."Host:
localhost \r\n"
// ."Connection: Close \r\n"
."User-Agent: Mozilla/5.0 (Windows NT 6.1; rv:10.0.1) Gecko/20100101 Firefox/10.0.1 \r\n"
."Accept: text/
html,application/xhtml+
xml,application/
xml;q=0.9,*/*;q=0.8 \r\n"
."Content-
Type: application/x-www-form-
url-encoded"
."Content-Length: 8 \r\n\r\n"
."a=blabla&b=dsfdf&a=whjdbwdj";
fwrite( $sock, $header);
$data = $header;
while(!feof($sock))
{
$data .= fread( $sock, 128);
}
fclose($sock);
$data = str_replace( "\r\n", "<br>", $data);
echo $data;
?>