如何让网页在指定的几点几分几秒的时候自动刷新?有代码吗

如何让网页在指定的几点几分几秒的时候自动刷新?有代码吗 ASP

第1个回答  2007-07-03
随着网络的发展,利用ASP技术制作Web页面,来完成动态网站设计的方式,越来越得到广泛的应用。企业站点和其他商业站点,有时需要为用户提供查询实时变化的数据信息,而利用ASP技术完成这种功能会遇到实时数据的自动刷新问题。面对几秒钟变化一次的实时数据,HTML和ASP中VBScript、JavaScript语言仅为我们提供了页面Frame和窗口的刷新方法(即HTML的<META HTTP-Equiv=“refresh” Content=……及ASP的window.location.reload()),这样会造成页面的刷新闪烁,影响了实时效果和页面的稳定美观。

面对这种情况,我们可以将实时数据显示页面DisplayMain.htm划分成左右两个框架(Frame)Fra_Left和Fra_Right。

DisplayMain.htm代码如下:

<HTML>

<FRAMESET cols=“100%,*” Border=1>

<FRAME NAME=“Fra_Left” scrolling=“auto”SRC=“Dis_Left.asp” noresize>

<FRAME NAME=“Fra_Right”scrolling=“no” SRC=“Dis_Right.asp”>

</FRAMESET>

</HTML>

其中框架Fra_Left完全占据页面,而框架Fra_

Right不占据页面空间。我们可以在Fra_Left框架中显示实时数据页面,而在右面框架Fra_Right中进行实时数据处理(产生查询结果数据集,并将结果数据集作为参数传递给左侧Fra_Left框架进行数据显示),这样我们只要定时刷新右侧框架,左侧框架显示页面数据即可实时刷新,而不会出现页面闪动影响视觉效果。

Dis_Left.asp代码如下:

<%@ Language=VBScript %>

<HTML>

<HEAD>

<META NAME=“GENERATOR” Content=“Microsoft Visual Studio 6.0”>

</HEAD>

<BODY>

//此处可定义若干供显示实时数据的TEXT对象

<form name=“sj”>

<input id=“text1” name=“text1” style=“BACKGROUND-COLOR: black; BORDER-BOTTOM-COLOR: black; BORDER-LEFT-COLOR: black; BORDER-RIGHT-COLOR: black; BORDER-TOP-COLOR: black; COLOR: white; HEIGHT: 18px; WIDTH: 81px”>

……

</form>

//或者定义一个可自动下载的OCX实时数据显示控件

//<OBJECT 此处定义一个可自动下载的OCX实时数据显示控件</OBJECT>

</BODY>

</HTML>

右侧框架Dis_Right.asp代码如下:

<%@ Language=VBScript %>

<HTML>

<HEAD>

<!--<META NAME=“GENERATOR” Content=“Microsoft Visual Studio 6.0”>-->

//此处定义本页面每5秒刷新一次

<META HTTP-Equiv=“refresh” Content=“5; url=Dis_Right.asp”NAME=“GENERATOR” Content=“Microsoft Visual Studio 6.0”>

</HEAD>

<BODY>

<%

//建立数据库连接

set connectme=Server.CreateObject(“ADODB.CONNECTION”)

connectme.ConnectionTimeout = 15

connectme.CommandTimeout = 30

connectme.CursorLocation = 3

connectme.Open “Provider=MSDAORA.1; Password=MYPASS; User ID=MYID; Data Source=MYSPURCE; Persist Security Info=True;User Id=MYID; PASSWORD=MYPASS;UID=MYID; DBQ=MYDBQ; DBA=W; APA=T;FEN=T; FRC=10; FDL=10; LOB=T; RST=T;FRL=F; PFC=10; TLO=0; ”,“USER”,“MYPASS”

dim DataStr

dim CntStr

//执行SQL语句

sql = “select value from tablename ……”

set rstemp = Server.CreateObject(“ADODB.RECORDSET”)

set rstemp = connectme.Execute(sql)

//形成实时数据参数字符串

DataStr = “”

CntStr = 0

do while not rstemp.EOF

DataStr = DataStr & rstemp(“val”) & “;”

CntStr = CntStr + 1

rstemp.MoveNext

//也可将数据直接赋值给右侧TEXT对象

//Response.Write(“<Script> parent.Left

.document.sj.text1.value=‘”+val+“’</Script>”);

loop

rstemp.Close

%>

<SCRIPT LANGUAGE=VBScript>

//传递参数给右侧页面

parent.Left.document.控件名 “<%

=DataStr%>”

</SCRIPT>

<%

end if

%>

</BODY>

</HTML>

经过这样设计的实时数据浏览页面,避免了页面刷新带来的闪动问题,使页面更加稳定美观。在生产企业站点、股市汇市查询、模拟图形设计等应用实践中,取得了良好的效果。

方案2

XMLHTTP无刷新自动实时更新数据
传统上,我们浏览网页,如果加入最新的数据.只能是等我们重新向服务器端请求时才能显示出来.但是,对于一些时效性很强的网站.传统的这种做法是不能满足的. 我们可以让程序自动刷新.定时向服务器请求数据.5秒取一次数据,10秒取一次数据.利用XMLHTTP发出请求并取得数据.传到客户端,客户端重新组织并显示数据.

demo.htm 前台显示.

<script language="JavaScript">
function GetResult()
{
/*
*--------------- GetResult() -----------------
* GetResult()
* 功能:通过XMLHTTP发送请求,返回结果.
* 参数:str,字符串,发送条件.
* 实例:GetResult();
*--------------- GetResult() -----------------
*/
var oBao = new ActiveXObject("Microsoft.XMLHTTP");
//特殊字符:+,%,&,=,?等的传输解决办法.字符串先用escape编码的.
//Update:2004-6-1 12:22
oBao.open("POST","Server.asp",false);
oBao.send();
//服务器端处理返回的是经过escape编码的字符串.
var strResult = unescape(oBao.responseText);
//将字符串分开.
var arrResult = strResult.split("###");
RemoveRow(); //删除以前的数据.
//将取得的字符串分开,并写入表格中.
for(var i=0;i<arrResult.length;i++)
{
arrTmp = arrResult[i].split("@@@");
num1 = arrTmp[0]; //字段num1的值
num2 = arrTmp[1]; //字段num2的值
row1 = tb.insertRow();
cell1 = row1.insertCell();
cell1.innerText = num1;
cell2 = row1.insertCell();
cell2.innerText = num2;
}
}

function RemoveRow()
{
//保留第一行表头,其余数据均删除.
var iRows = tb.rows.length;
for(var i=0;i<iRows-1;i++)
{
tb.deleteRow(1);
}
}

function MyShow()
{
//2秒自动刷新一次,2秒取得一次数据.
timer = window.setInterval("GetResult()",2000);
}
</script>

<body onload="MyShow()">
<p>
</p>
<table width="47%" height="23" border="0" cellpadding="1" cellspacing="0" id="tb">
<tr>
<td>num1</td>
<td>num2</td>
</tr>
</table>

Server.asp 后台读取数据

<% @Language="JavaScript" %>
<%
function OpenDB(sdbname)
{
/*
*--------------- OpenDB(sdbname) -----------------
* OpenDB(sdbname)
* 功能:打开数据库sdbname,返回conn对象.
* 参数:sdbname,字符串,数据库名称.
* 实例:var conn = OpenDB("database.mdb");
*--------------- OpenDB(sdbname) -----------------
*/
var connstr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="+Server.MapPath(sdbname);
var conn = Server.CreateObject("ADODB.Connection");
conn.Open(connstr);
return conn;
}
var sResult = new Array();
var oConn = OpenDB("data.mdb");
//特殊字符:+,%,&,=,?等的传输解决办法.客户端字符是经过escape编码的
//所以服务器端先要经过unescape解码.
//Update:2004-6-1 12:22
var sql = "select num1,num2 from nums order by id";
var rs = oConn.Execute(sql);
while(!rs.EOF)
{
//一条记录用"###"隔开.每列数据用"@@@"隔开. 这是以只有两个列数据的情况.
sResult[sResult.length] = rs("num1").Value + "@@@" + rs("num2").Value
rs.MoveNext();
}
//escape解决了XMLHTTP。中文处理的问题.
Response.Write(escape(sResult.join("###")));
%>

数据库data.mdb
表 nums
id,自动编号
num1,文本
num2,文本

测试数据

id num1 num2
1 20.70 20.810
2 10.5 20.5
3 12.3 300
4 132 323
5 563 56
6 20 10

参考资料:http://www.kaysky.cn/blogview.asp?u=21&blog_id=65

第2个回答  2007-07-03
网页是没有状态的,除了你一直开着页面计算时间,还有就是服务器装辅助软件,其他好像没有办法了,都要有东西触发
第3个回答  2007-07-03
按键精灵

如何让网页在指定的几点几分几秒的时候自动刷新?有代码吗
传统上,我们浏览网页,如果加入最新的数据.只能是等我们重新向服务器端请求时才能显示出来.但是,对于一些时效性很强的网站.传统的这种做法是不能满足的. 我们可以让程序自动刷新.定时向服务器请求数据.5秒取一次数据,10秒取一次数据.利用XMLHTTP发出请求并取得数据.传到客户端,客户端重新组织并显示数据.de...

什么地JS?什么是JSP?
然后,在需要的页面中,加上以下html语句到文件的和之间(假设以上ico文件的地址http:\/\/happyisland.126.com\/icon.ico)。 如果访问者的浏览器是IE5.0,就不需加任何代码,只要将图标文件上传到网站的根目录下即可。1,META标签里的代码是什么意思? <META>是放于<HEAD>与<\/HEAD>之间的标记.以下是我总结它在网页中...

meta name是什么意思?
3、让一个页面过上一定的时间,自动转到另一个页面或者站点去,如:< Meta HTTP-EQUIV="refresh" content="6; url=http:\/\/fym888.nease.net" > content中的6表示时间,单位为秒,url=后面是你要转向的网址,若是与你当前网页在同一目录下,可以直接写上文件名,如:< Meta HTTP-EQUIV="refres...

移动宽带很多网页都打不开,能不能通过设置DNS解决?
1、可以通过设置DNS解决,桌面左下角找到windows开始并鼠标单击。2、点击后后弹出菜单,找到设置,并点击设置,如图所示。3、点击设置后,会弹出设置菜单,然后找到网络和Internet并点击,如图所示。4、点击网络和Internet后,会进入如下界面,找到并点击网络和共享中心,如图所示。5、点击网络和共享中心后,...

360浏览器打开网页自动消失
表示程序出错时等待0.5秒。 e. 让系统自动关闭停止回送的程序。打开注册表 HKEY_CURRENT_USER\\\\Control Panel\\\\Desktop 键, 将AutoEndTasks 值设为 1。 ( 原设置值∶0 ) 1.关闭"休眠" 方法:打开[控制面板]→[电源选项]→[休眠],把"启用休眠"前面的勾去掉 说明:休眠是系统长时间一种待机状态,使您在长...

请问一个刷网页pv的方法!!急~~
1\/打开index后,该页面iframe延迟3秒后调用一个0高0宽页面,0高0宽页面指向二级随机跳转代码(该跳转代码随机跳到50...500多个网页文件)进行隐藏刷新站点PV 达到效果:一个IP打开一个页面最少能得到2个PV.(刷PV的时候是在隐藏运行的,没有任何提示,而且不是刷新指定的一两个文件,刷新由随机跳转代码完成...

网吧电脑系统如何破解如何破解网吧电脑
用“WIN开始”+D,刷新桌面。在美萍下的桌面实际是美萍指定的一个目录,而原桌面则被隐藏了,刷新是对原桌面的刷新,只要你不切换其他窗口,我的电脑等将会一直存在于桌面之上。你要做的是:打开我的电脑,然后再点向上,就可以把桌面以窗口的形式打开了(因为硬盘是被屏蔽掉的,当我们打开我的电脑时将什么都看不见),...

谁能够帮我详细的介绍一下ajax啊?
通过js调用AJAX引擎,可以使得页面不在被整体刷新,而仅仅更新用户需要的部分,不但避免了“白屏”现象,还大大节省了带快,加快了 web浏览的速度。好处可以归纳为几点:1.减轻服务器的负担,加快浏览速度。2.带来更好的用户体验。3.基于标准化并被广泛支持的技术,不需要下载插件或小程序。目前主流的浏览...

把自己的电脑文件做成网站如何把自己的电脑作为网站服务器
4.自己的机器上有WEB服务,比如像IIS服务,装了IIS服务的可以把文件放到IIS的主目录下,即可以把地址发表出来.如http:\/\/68.60.120.112\/file.exe 好像就这几种了吧Ⅱ 怎么把自己的电脑做成服务器,能让别人访问自己的网页1、点击‘开始’,打开‘控制面板’。Ⅲ 如何把自己的电脑作为网站服务器想让电脑成为一台服务...

如何确定自己是否适合做程序员?
并更好地传达您的计划。当然,如果你已经是一个伟大的神,你不交流也没关系。桃李不言,下溪不言。你独自编写每个人的代码,你什么都不说,人们就会把你当上帝看待。事实上,很少有人能做到以上几点。如果他们能做好其中的2-3件事,他们通常“适合”做程序,并在软件行业找到合适的工作。

相似回答