/*
** POST报文到主机
*/
function PostToHost($url, $data) {
$url = parse_url($url);
if (!$url) return "couldn"t parse url";
if (!isset($url["port"])) { $url["port"] = ""; }
if (!isset($url["query"])) { $url["query"] = ""; }
$encoded = ""; while (list($k,$v) = each($data)) {
$encoded .= ($encoded ? "&" : "");
$encoded .= rawurlencode($k)."=".rawurlencode($v);
} $port = $url["port"] ? $url["port"] : 80;
$fp = fsockopen($url["host"], $port, $errno, $errstr);
if (!$fp) return "Failed to open socket to $url[host] $port ERROR: $errno - $errstr"; fputs($fp, sprintf("POST %s%s%s HTTP/1.0\n", $url["path"], $url["query"] ? "?" : "", $url["query"]));
fputs($fp, "Host: $url[host]\n");
fputs($fp, "Content-type: application/x-www-form-urlencoded\n");
fputs($fp, "Content-length: " . strlen($encoded) . "\n");
fputs($fp, "Connection: close\n\n"); fputs($fp, "$encoded\n"); $line = fgets($fp,1024);
if (!eregi("^HTTP/1\.. 200", $line)) return; $results = ""; $inheader = 1;
while(!feof($fp)) {
$line = fgets($fp,1024);
if ($inheader && ($line == "\n" || $line == "\r\n")) {
$inheader = 0;
}
elseif (!$inheader) {
$results .= $line;
}
}
fclose($fp); return $results;
}/* end function PostToHost */
?>