<?
$ASPservername : 此變數必須有IP在
/etc/hosts檔案內.
$ASPport : ASP檔案伺服器連接埠號碼.
$ASPpath : 在伺服器端的ASP檔案路徑.
$ASPfile : ASP檔案名稱
$ASPurlredirect : $ASP檔案參數.
//設定變數
$ASPservername = "WEB_SQLSERVER";
$ASPport = 80;
$ASPpath = "/development/sqlserver/";
$ASPfile = "storedprocs.asp?";
$ASPurlredirect = "clienthostpage=".strstr($SCRIPT_NAME, "/");
//串連IIS/ASP伺服器
$fp=fsockopen($ASPservername, $ASPport, &$errno, &$errstr);
if($fp) {
//GET模式到伺服器
$sRequest = "GET ".$ASPpath.$ASPfile;
$sProtocol= " HTTP/1.0 \n\n";
if (!strlen(chop($QUERY_STRING))){
$httpget=$sRequest.$ASPurlredirect.$sProtocol;
} else {
$httpget=$sRequest.$QUERY_STRING.$sProtocol;
}
//從用戶端發送請求到ASP檔案
fputs($fp,$httpget);
//處理返回結果
while(!feof($fp)) {
$line=fgets($fp,128);
//顯示ASP檔案返回結果
if ($bTripped){
echo $line;
} else {
//處理IIS頭資訊
$bTripped=strstr(strtoupper($line), "<HTML>");
if ($bTripped) echo $line;
}
}
fclose($fp);
} else {
echo "$errstr ($errno)<br>\n";
}
?>