最近HTTP遠程訪問的程序?qū)懙枚嗔?，主要接觸的是.NET類庫里的WebHttpRequest類和Microsoft.XMLHTTP這個通用的對象，有了這些方便的類，我們可以通過C#，ASP，Javascript來模擬Web客戶端訪問其他的Web頁面。但是今天想用PHP實現(xiàn)一下類似的功能，卻一時找不到方向了，于是只能自己“豐衣足食”了。

目前，PHP里面還沒有類似于HttpRequest的類，不過在官方在線文檔中找到了這么一個HttpRequest Class的頁面，不過也只是提及了此功能目前可能只有在CVS版本中存在，無奈...

要實現(xiàn)HTTP訪問無非就是用Socket發(fā)送一個請求，然后讀取返回信息。于是我就用Socket寫了一個HttpRequest的類，當然也可以用fsockopen()這個函數(shù)來實現(xiàn)，不過兩個的區(qū)別不是很大，具體代碼在附件里，自己看咯。<?php/*** Network: HTTP request object* Author: Li HouYu (Karajan Lee), Shanghai, China.*/class HttpRequest{var $sHostAdd;var $sUri;var $iPort;var $sRequestHeader;var $sResponse;function HttpRequest($sUrl){$sPatternUrlPart = '/http://([a-z-.0-9]+)(:(d+)){0,1}(.*)/i';$arMatchUrlPart = array();preg_match($sPatternUrlPart, $sUrl, $arMatchUrlPart);$this->sHostAdd = gethostbyname($arMatchUrlPart[1]);if (empty($arMatchUrlPart[4])){$this->sUri = '/';}else{$this->sUri = $arMatchUrlPart[4];}if (empty($arMatchUrlPart[3])){$this->iPort = 80;}else{$this->iPort = $arMatchUrlPart[3];}$this->addRequestHeader('Host: '.$arMatchUrlPart[1]);$this->addRequestHeader('Connection: Close');}function addRequestHeader($sHeader){$this->sRequestHeader .= trim($sHeader).'rn';}function sendRequest($sMethod = 'GET', $sPostData = ''){$sRequest = $sMethod.' '.$this->sUri.' HTTP/1.1rn';$sRequest .= $this->sRequestHeader;if ($sMethod == 'POST'){$sRequest .= 'Content-Type: application/x-www-form-urlencodedrn';$sRequest .= 'Content-Length: '.strlen($sPostData).'rn';$sRequest .= 'rn';$sRequest .= $sPostData.'rn';}$sRequest .= 'rn';$sockHttp = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);if (!$sockHttp){die('socket_create() failed!');}$resSockHttp = socket_connect($sockHttp, $this->sHostAdd, $this->iPort);if (!$resSockHttp){die('socket_connect() failed!');}socket_write($sockHttp, $sRequest, strlen($sRequest));$this->sResponse = '';while ($sRead = socket_read($sockHttp, 4096)){$this->sResponse .= $sRead;}socket_close($sockHttp);}function getResponse(){return $this->sResponse;}function getResponseBody(){$sPatternSeperate = '/rnrn/';$arMatchResponsePart = preg_split($sPatternSeperate, $this->sResponse, 2);return $arMatchResponsePart[1];}function getResponseHead(){$sPatternSeperate = '/rnrn/';$arMatchResponsePart = preg_split($sPatternSeperate, $this->sResponse, 2);return $arMatchResponsePart[0];}}?>