7 × 24小時服務熱線:18605391786  4000-999-221  關于我們  聯系我們   付款方式  網站地圖   加為收藏       
您當前的位置:首頁 >  新聞中心 > 網頁技巧 > 【asp】讓網頁在指定的幾點幾分幾秒的時候自動刷新頁面的代碼

【asp】讓網頁在指定的幾點幾分幾秒的時候自動刷新頁面的代碼 

信息來自:炫維網絡    發布日期:2014-1-10   瀏覽次數:  

asp有沒有讓網頁在指定的幾點幾分幾秒的時候自動刷新頁面的代碼?近期本人就需要這樣的一段代碼,但是在網上找了很多都不能實現,現在總結下以下幾個方法,留著以后用的,總結了最基本的問題,首先asp的代碼如果需要在指定時間自動刷新頁面的問題,就必須保證該頁面在客戶端打開著,才能實現,真是頭疼啊。。。不說了,下面是我搜集的幾個代碼:
這個是不是可以在meta里面設置刷新的時間  比如以24個小時為基本  刷新的間隔為23個小時 或許25個小時
<script type="text/javascript">
        /*
        setInterval(function(){
                location.reload();
        },30000);//每五分鐘刷新一次頁面
        */
       
        //如果要在指定的時間刷新, 那么就需要開個定時器, 每秒執行一次, 其實就是一個倒計時
        var oEndDate = new Date();
        var oNowDate = new Date();
        var iRemain = 0;
        var timer = null;
       
        //設置結束時間
        oEndDate.setFullYear(2011, 6, 18);//指定結束的年月日(2011-7-18), 注意月份要減1, 你懂的
        oEndDate.setHours(23, 40, 50);//指定結束的時分秒(23:40:50)
       
        //剩余秒數
        iRemain = parseInt((oEndDate.getTime() - oNowDate.getTime()) / 1000);
       
        //開個定時器, 每秒執行一次
        iRemain > 0 && (timer = setInterval(count, 1000));
       
        //計算剩余時間
        function count()
        {               
                if(iRemain <= 0)
                {
                        location.reload();//到了指定時間刷新一次頁面
                        iRemain = 0;
                        clearInterval(timer);//清除定時器
                }
                iRemain--;
        }       

------------------------------------------------------------------以下是另外一篇代碼---------------------------------------------

面對這種情況,我們可以將實時數據顯示頁面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>

經過這樣設計的實時數據瀏覽頁面,避免了頁面刷新帶來的閃動問題,使頁面更加穩定美觀。在生產企業站點、股市匯市查詢、模擬圖形設計等應用實踐中,取得了良好的效果。

方案2XMLHTTP無刷新自動實時更新數據傳統上,我們瀏覽網頁,如果加入最新的數據.只能是等我們重新向服務器端請求時才能顯示出來.但是,對于一些時效性很強的網站.傳統的這種做法是不能滿足的. 我們可以讓程序自動刷新.定時向服務器請求數據.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:22oBao.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:22var 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").Valuers.MoveNext();}//escape解決了XMLHTTP。中文處理的問題.Response.Write(escape(sResult.join("###")));%>數據庫data.mdb表 numsid,自動編號num1,文本num2,文本測試數據id num1 num21 20.70 20.8102 10.5 20.53 12.3 3004 132 3235 563 566 20 10
</script>

做服務最好的網絡公司:臨沂網絡公司http://www.0972138.live
更多
臨沂網站建設豪華團隊!www.0972138.live
臨沂網絡公司

炫維網絡 www.0972138.live
建站咨詢電話:18605391786  郵箱:[email protected]  
地址:山東省臨沂市蘭山區通達路367號 裕城大廈   
  
福建31选7开奖中奖公告