easemaster
(easemaster)
注册会员
中级会员
UID 20192
精华
0
积分 186
帖子 186
金钱 186 喜悦币
威望 0
人脉 0
阅读权限 20
注册 2003-5-27
状态 离线
|
[广告]: q
m
无刷新的数据库显示
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=??????">
</head>
<body>
<style>
body,div,span,input{font-size:12px;font-family:verdana}
</style>
<INPUT TYPE="hidden" NAME="url" value="test.php"><input
type=button onclick=get() value="Start..."><br>
<br>即时比分:山东鲁能-青岛海牛 <span id=yyyy style='width:40;border:0px'></span>
<script language="vbscript">
function bytes2BSTR(vIn)
dim strReturn,i,ThisCharCode,innerCode,Hight8,Low8,NextCharCode
strReturn=""
for i=1 to LenB(vIn)
ThisCharCode=AscB(MidB(vIn,i,1))
if ThisCharCode<&H80 Then
strReturn=strReturn & Chr(ThisCharCode)
else
NextCharCode=AscB(MidB(vIn,i+1,1))
strReturn=strReturn&Chr(CLng(ThisCharCode)*&H100+CInt(NextCharCode))
i=i+1
end if
next
bytes2BSTR=strReturn
end function
</script>
<script language="JScript">
function get(){
yyyy.innerHTML="Loading....";
var xmlhttp=new ActiveXObject("Msxml2.xmlhttp")
xmlhttp.open("GET",url.value,false)
xmlhttp.send()
var str = bytes2BSTR(xmlhttp.ResponseBody)
yyyy.innerHTML=str;
setTimeout("get();",1000);
}
</body>
</html>
test.php
<?php
header ("Cache-Control: no-cache, must-revalidate");
header (" ragma: no-cache");
$a=rand(0,9);
$b=rand(0,9);
echo $a." : ".$b;
?>
（无刷新的数据库显示）
运行出错！提示14行
（<INPUT TYPE="hidden" NAME="url" value="test.php"><input
type=button onclick=get() value="Start..."><）这一行出错
缺少对象！里面有vbscript语言我看不明白！请指教
|
|
