如何将获得的信息以变量格式输出？

先看代码：
文件 whois.php
<?php 
error_reporting(7);
set_time_limit(300);// Server List File
$config['server_list'] = "whois.lst";$domain = trim($_POST['domain']);
$domain = strtolower($domain);if(substr($domain,0,7) == "http://") {
$domain = str_replace("http://","",$domain);
}
if(substr($domain,0,4) == "www.") {
$domain = str_replace("www.","",$domain);
}function whois_request($server, $query)
{
    $data = "";
if(!$fp = @fsockopen($server, 43)) {
Return false;
} else {
fputs($fp, $query . "\r\n");
        while (!feof($fp)) {
            $data .= fread($fp, 1000);
        } 
        fclose($fp);
}
    return nl2br($data);
}function get_server() {
global $config,$domain;
$serverarray = file($config['server_list']);
$i = 0;
foreach($serverarray as $key=>$val) {
if(substr($val,0,1) != "#") {
$server_p = explode("|",$val);
$server[$i]['tld'] = $server_p[0];
$server[$i]['server'] = $server_p[1];
$server[$i]['avail'] = $server_p[2];
$server[$i]['infoserver'] = $server_p[3];
$server[$i]['backserver'] = $server_p[4];
$server[$i]['info'] = $server_p[5];
}
$i++;
} $domain_c = explode(".",$domain);
$partnum = count($domain_c);
$last_part_1 = $domain_c[$partnum-1];
$last_part_2 = $domain_c[$partnum-2];

foreach($server as $key=>$val) {
if($val['tld'] == $last_part_2.".".$last_part_1) {
Return $val;
} elseif($val['tld'] == $last_part_1) {
Return $val;
}
}
Return false;
}function startwhois() {
global $domain;
if(!$server = get_server()) {
die("无法查询此类型的域名");
}
$result1 = whois_request($server['server'], $domain);
$result2 = whois_request($server['infoserver'], $domain);
if(!$result1 && !$result2) {
echo "无法连接服务器";
die();
} else {
$result = $result1."<br />".$result2;
echo $result;
}
}if(isset($_GET['action']) && trim($_GET['action']) == "do") {
startwhois();
die();
}
?>
<SCRIPT type="text/javascript">
<!--
var xmlHttp;
function creatXMLHttpRequest() {
  if(window.ActiveXObject) {
    xmlHttp = new ActiveXObject('Microsoft.XMLHTTP');
  } else if(window.XMLHttpRequest) {
    xmlHttp = new XMLHttpRequest();
  }
}function handleStateChange() {
  if(xmlHttp.readyState == 4) {
    if(xmlHttp.status == 200) {
      var allcon =  xmlHttp.responseText;
  allcon=allcon.replace(/\n|\r/g,"");
  document.write("var whoistxt='"+allcon+"'");
    }
  }
}function request(paras){ 
var url = location.href; 
var paraString = url.substring(url.indexOf("?")+1,url.length).split("&"); 
var paraObj = {} 
for (i=0; j=paraString[i]; i++){ 
paraObj[j.substring(0,j.indexOf("=")).toLowerCase()] = j.substring(j.indexOf("=")+1,j.length); 
} 
var returnValue = paraObj[paras.toLowerCase()]; 
if(typeof(returnValue)=="undefined"){ 
return ""; 
}else{ 
return returnValue; 
} 
} var queryString;
var domain = request("domain");
queryString = "domain=" + domain;
creatXMLHttpRequest();
xmlHttp.open("POST","?action=do","true");
xmlHttp.onreadystatechange = handleStateChange;
xmlHttp.setRequestHeader("Content-Type","application/x-www-form-urlencoded;");
xmlHttp.send(queryString);
//-->
</SCRIPT>文件 whois.as<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<%domain=Request.QueryString("domain")%>
<script src="http://tool.35926.com/sitetoolasp/whois.php?domain="&<%=domain%> type="text/javascript" language="javascript"></script>
</head>
<body><script type="text/javascript">document.write(whoistxt);</script>
</body>
</html>问题来了，如果在浏览器中直接打开whois.php?domain=35926.com那就没问题，可以输出格式为：
var whoistxt='内容';
的变量，但在whois.asp中调用则会报错
现在是直接打开whois.php时要等一会儿才能出现输出内容，不知道是不是这个等一会儿的造成的whois.asp报错，
请问，如何才能在whois.asp中输出whoistxt的内容？