第一篇：asp刷新页面实现方式总结
网页刷新代码-刷新页面实现方式总结篇 自动刷新页面的实现方法总结: 1) 10表示间隔10秒刷新一次 2) 如果是你要刷新某一个iframe就把window给换成frame的名字或ID号 3) 4>
function abc(){ window.location.href=“/blog/window.location.href”;setTimeout(“abc()”,10000);} 刷新本页：
Response.Write(“”)
刷新父页：
Response.Write(“”)
转到指定页: Response.Write(“”)
刷新页面实现方式总结(HTML,ASP,JS)'by aloxy
定时刷新：
1，
说明：url是要刷新的页面URL地址 2000是等待时间=2秒，2，
说明：
n is the number of seconds to wait before loading the specified URL.url is an absolute URL to be loaded.n,是等待的时间，以秒为单位 url是要刷新的页面URL地址
3，<%response.redirect url%>
说明：一般用一个url参数或者表单传值判断是否发生某个操作，然后利用response.redirect 刷新。
4，刷新框架页 〈script language=javascript>top.leftFrm.location.reload();parent.frmTop.location.reload();
Response.Write(“”);//open Response.Write(“”);
在子窗体页面代码head中加入
刷新的内容加在 if(!IsPostBack)中
在框架页中右面刷新左面 //刷新框架页左半部分
Response.Write(“”);
页面定时刷新功能实现 有三种方法：
1，在html中设置：
2.jsp <% response.setHeader(“refresh”,“1”);%> 每一秒刷新一次
3.使用javascript:
//第二个刷新父页面的函数
//第三个打开窗口
同时刷新框架网页中的多个页面
现在有个框架页面Index_BianJ.aspx，上面有个toppage,leftpage.rightpage, bottompage四个页面。
本人想在leftpage页面中点击一个按钮，然后想刷新整个Index_BianJ.aspx页面，当然也包括四个小页面。
尝试用Response.Redirect(string.Format(“Index_BianJ.aspx?zhcyh=” + Convert.ToString(Session[“ZhuCYHM”])));来实现，但是行不通，如果这样做只会在leftpage页面中更新。其余页面没什么变化。
最后使用Response.Output.Write(“”);配合这JS语言来实现的框架中多个页面同时刷新的功能。
或者在HTML代码中添加如下代码也可以实现
第二篇：php页面缓存实现方法总结范文
php页面缓存实现方法总结
在php页面缓存主要用到的是ob系列函数，如ob_start(),ob_end_flush(),ob_get_contents(),但是更高级的缓存是不使用这些函数的，本文章最后一个实现就有讲到，大家可参考一下。ob_start()：页面缓存开始的标志，此函数一下的内容直至ob_end_flush()或者ob_end_clean()都保存在页面缓存中；
ob_get_contents()：用来获取页面缓存中的内容，获取到以后呢，我们就可以想怎么处理这些内容都行了，过滤字段啦，匹配内容啦，都可以~~~ ：）
ob_end_flush()：表示页面缓存结束。并且经我验证，缓存的内容将输出到当前页面上，也就是可以显示缓存内容。
用此三个php函数，就可以实现强大的功能。如果数据库查询量较大，可以用cache来解决这个问题。
下面是编码部分。
1.初始化函数，一般是设置页面缓存路径、缓存文件命名格式等，可按个人喜好自定义。这里用到的识别ID是经加密的$_SERVER[REQUEST_URI]参数。这个函数中最后还有一个if判断：若未过缓存期，则加载缓存文件，否则加载源文件。
代码如下 复制代码 function page_init(){
$url = $_SERVER['REQUEST_URI'];//子url，该参数一般是唯一的$pageid = md5($url);
$dir = str_replace('/','_',substr($_SERVER['SCRIPT_NAME'],1,-4));
//目录命名方式，如exp_index
if(!file_exists($pd = PAGE_PATH.$dir.'/'))@mkdir($pd,0777)or die(“$pd目录创建失败”);
//如cache/page/exp_index/
define('PAGE_FILE',$pd.$pageid.'.html');
//如cache/page/exp_index/cc8ef22b405566745ed21305dd248f0e.html
$contents = file_get_contents(PAGE_FILE);//读出
if($contents && substr($contents, 13, 10)> time())//对应page_cache()函数中加上的自定义头部
{
echo substr($contents, 27);
exit(0);
}
return true;
}
2.页面缓存函数，这里使用到一个技巧：在缓存文件的内容中加上一个头部信息--过期时间，所以每次只需要对头部中的过期时间和当前时间进行比较（在page_init()函数中进行）就能判断缓存是否过期了。
代码如下 复制代码
function page_cache($ttl = 0){
$ttl = $ttl ? $ttl : PAGE_TTL;//缓存时间，默认3600s
$contents = ob_get_contents();//从缓存中获取内容
$contents = “n”.$contents;
//加上自定义头部：过期时间=生成时间+缓存时间
file_put_contents(PAGE_FILE, $contents);//写入缓存文件中
ob_end_flush();//释放缓存
}
3.函数使用，注意这两个函数有先后执行顺序，还有别忘了ob_start()
代码如下 复制代码
page_init();//页面缓存初始化
ob_start();//开启缓存
...//代码段
page_cache(60);//一般是最后一行
?> 例2
下面做个示例来说明PHP页面缓存技术：
代码如下 复制代码
function cache_start($_time, $dir){
$cachefile = $dir.'/'.sha1($_SERVER['REQUEST_URI']).'.html';
$cachetime = $_time;
ob_start();
if(file_exists($cachefile)&&(time()-filemtime($cachefile)< $cachetime))
{
include($cachefile);
ob_end_flush();
exit;
} }
function cache_end($dir){
$cachefile = $dir.'/'.sha1($_SERVER['REQUEST_URI']).'.html';
$fp = fopen($cachefile, 'w');
fwrite($fp, ob_get_contents());
fclose($fp);
ob_end_flush();}
cache_start($_time, $dir);//以下是输出的内容，放在cache_start和cache_end两个方法之间 for($i=0;$i<5;$i++){
echo $i;
sleep(1);} cache_end($dir);?> 例
利用生成文件做缓存
代码如下 复制代码
* @copyright 2009-3-13 * @param string $cache_folder 缓文件夹
* @param int $cache_create_time 文件缓存时间 * @example $cache=new Esj_Cache('./_cache',100)* @example $cache->read_cache()读取缓存并输出
* @example $cache->creatre_cache()创建缓存文件(放在文件未尾)* @example $cache->list_file()返回所有缓存文件列表 * @example $cache->del_file()删除所有缓存文件 */
class Esj_Cache{ private $cache_folder=null;//cacher文件夹 private $wroot_dir=null;//站点目录
private $cacher_create_time=null;//cacher文件的建立时间
public function __construct($cache_foldername,$cacher_time=100){ ob_start();$this->wroot_dir=$_SERVER['DOCUMENT_ROOT'];$this->cache_folder=$cache_foldername;$this->cacher_create_time=$cacher_time;}
public function read_cache(){ try { if(self::create_folder($this->cache_folder)){ self::get_cache();//输出缓存文件信息 }else { echo “缓存文件夹创建失败!”;return false;}
}catch(Exception $e){ echo $e;return false;} }
//测试缓存文件夹是否存在
private function exist_folder($foler){ if(file_exists($this->wroot_dir.“/”.$foler)){ return true;}else { return false;} } //建立一个新的文件夹
private function create_folder($foler){ if(!self::exist_folder($foler)){ try{ mkdir($this->wroot_dir.“/”.$foler,0777);chmod($this->wroot_dir.“/”.$foler,0777);return true;}catch(Exception $e){ self::get_cache();//输出缓存 return false;} return false;} else { return true;} }
//读取缓存文件
private function get_cache(){ $file_name=self::get_filename();if(file_exists($file_name)&&((filemtime($file_name)+$this->cacher_create_time)> time())){ $content=file_get_contents($file_name);if($content){ echo $content;ob_end_flush();exit;}else { echo “文件读取失败”;exit;} } } //返回文件的名字
private function get_filename(){ $filename=$file_name=$this->wroot_dir.'/'.$this->cache_folder.'/'.md5($_SERVER['QUERY_STRING']).“.html”;return $filename;}
//建立缓存文件
public function create_cache(){ $filename=self::get_filename();if($filename!=“"){ try{ file_put_contents($filename,ob_get_contents());return true;}catch(Exception $e){ echo ”写缓存失败:“.$e;exit();} return true;} }
// 取得缓存中的所有文件 public function list_file(){ $path=$this->cache_folder;if($handle = opwww.shanxiwang.netendir($path)){ while(false!==($file = readdir($handle))){ if($file!=”.“ && $file!=”..“){ $path1=$path.”/“.$file;if(file_exists($path1)){ $result[]=$file;} } } closedir($handle);} return $result;}
//删除缓存中的所有文件 public function del_file(){ $path=$this->cache_folder;if($handle = opendir($path)){ while(false!==($file = readdir($handle))){ if($file!=”.“ && $file!=”..“){ $path1=$path.”/".$file;if(file_exists($path1)){ unlink($path1);} } } closedir($handle);} return true;} } ?>
第三篇：ASP总结
ASP 课 程 设 计 总 结系别：信息工程系 班级：09大计一班 学号：52 姓名：张明
通过这次课程设计，我拓宽了知识面，锻炼了能力，综合素质得到了提高。课程设计是培养学生综合运用所学知识,发现,提出,分析和解决实际问题,锻炼实践能力的重要环节,是对学生实际工作能力的具体训练和考察过程.通过理论与实际的结合、人与人的沟通，进一步提高思想觉悟。尤其是观察、分析和解决问题的实际工作能力，以便培养成为能够主动适应社会主义现代化建设需要的高素质的复合型人才。作为整个学习体系的有机组成部分，课程设计虽然安排在连续两周进行，但并不具有绝对独立的意义。它的一个重要功能，在于运用学习成果，检验学习成果。运用学习成果，把课堂上学到的系统化的理论知识，尝试性地应用于实际设计工作，并从理论的高度对设计工作的现代化提出一些有针对性的建议和设想。检验学习成果，看一看课堂学习与实际工作到底有多大距离，并通过综合分析，找出学习中存在的不足，以便为完善学习计划，改变学习内容与方法提供实践依据。对我们计算机专业的专科生来说，实际能力的培养至关重要，而这种实际能力的培养单靠课堂教学是远远不够的，必须从课堂走向实践。这也是一次预演和准备毕业设计工作。通过课程设计，让我们找出自身状况与实际需要的差距，并在以后的学习期间及时补充相关知识，为求职与正式工作做好充分的知识、能力准备，从而缩短从校园走向社会的心理转型期。
回顾起此次asp课程设计，至今我仍感慨颇多，的确，从拿到老师给我们的题目，然后老师简单的阐述我们该做些什么，该完成些什么的时候，我就觉得这个课程设计是很有挑战的，因为我知道平时自
己学的知识不是很牢固，这些做起来肯定很棘手。事实验证了我的想法。在整整两星期的日子里，可以说得是苦多于甜，由于对相关知识所学甚少，可以说做起设计来是一片茫然。在设计的过程中遇到问题，可以说得是困难重重，遇到过各种各样的问题，同时在设计的过程中发现了自己的不足之处，对以前所学过的知识理解得不够深刻，掌握得不够牢固。看着那些陌生的代码和程序，真的不知道该怎么办。但是最后还是我们组其他成员帮助了我。在他们做的差不多的情况下，我在帮忙整理和美化，并试着去看懂代码，在这期间我也弄懂了不少问题和知识。由于自己并没多少知识，别人可以说是通过此次课程设计巩固了以前所学过的知识，而且学到了很多在书本上所没有学到过的知识，而我呢，只能说是从这次课程设计中重新审视了自己，终于发现自己对所学知识的严重不足，这也给我提了个醒，没知识终究将是一事无成。
不过通过这次课程设计我也明白了很多事理。它使我懂得了理论与实际相结合是很重要的，只有理论知识是远远不够的，只有把所学的理论知识与实践相结合起来，从理论中得出结论，才能真正为社会服务，从而提高自己的实际动手能力和独立思考的能力。
课程设计达到了专业学习的预期目的。在两个星期的课程设计之后，我们普遍感到不仅实际动手能力有所提高，更重要的是通过对汇编语言重大功能的了解，进一步激发了我们对专业知识的兴趣，并能够结合实际存在的问题在专业领域内进行更深入的学习。在课程设计过程中，收获知识，提高能力的同时，我也学到了很多人生的哲理，懂得怎么样去制定计划，怎么样去实现这个计划，并掌握了在执行过程中怎么样去克服心理上的不良情绪。因此在以后的生活和学习的过程中，我一定会把课程设计的精神带到生活中，不畏艰难，勇往直前！
第四篇：asp总结
生成静态页面的代码：
<%
dim xmlHttp,os, PersonNum
'定义xmlhttp
function GetXmlText(Url)
dim GetXmlHttp
set GetXmlHttp=server.Createobject(“Microsoft.XMLHTTP”)GetXmlHttp.open “Get”,url,false,“",”“
GetXmlHttp.Send
'GetXmlText=GetXmlHttp.Responsetext
GetXmlText=GetXmlHttp.ResponseBody
set GetXmlHttp=Nothing
end function
'转换为字符
Function BytesToBstr(body,Cset)
dim objstream
set objstream = Server.CreateObject(”adodb.stream“)objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = Cset
BytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
End Function
'保存文件
Sub SaveToFile(strBody,File)
Dim objStream
Set objStream = Server.CreateObject(”ADODB.Stream“)With objStream
.Type = 2
.Open
.Charset = ”GB2312“
.Position = objStream.Size
.WriteText = strBody
.SaveToFile Server.MapPath(File),2
.Close
End With
Set objStream = Nothing
End Sub
%>
<% dim k
k=0
'set rs=server.createobject(”adodb.recordset“)
'sql=”select ComId FROM CompanyTbl order by Comid desc“
'rs.open sql,conn,1,1
'PersonNum = rs.recordcount
'
do while k<10
Randomize
ComId=int(rnd*1000)
%>
<%SaveToFile
BytesToBstr(GetXmlText(”“%>
<%
'rs.movenext
k=k+1
loop
'rs.close()
'Set rs=Nothing
'Qsite.ShowMsg ”成功生成企业（“&PersonNum &”）份“ , ”../sitesys/muban1.asp“
%>
加载数据库代码：
<%
response.expires=0
response.buffer=true
session.timeout=30
dim conn
dim char_str(20)
sub OpenDataConn()
dim connstr
connstr = ”Provider=Microsoft.Jet.OLEDB.4.0;Data Source=“
connstr = connstr & Server.MapPath(”../data/qhousedb.asp“)
'response.write connstr
set conn=Server.CreateObject(”AdoDb.Connection“)
conn.Open connstr
end sub
sub CloseDataConn()
'conn.close
set conn=Nothing
end sub
%>
插入记录语句的执行1：
sql=”insert into news(topic,q1,fromw,sort,comment)values(“&topic&”,“&q1&”,“&fromw&”,'“&sort&”',“&comment&”)“
opendataconn
conn.execute sql
response.redirect”news_del.asp“
修改语句的执行2：
sql=”updatenews set topic=“&topic&”,q1=“&q1&”,fromw=“&fromw&”,sort='“&sort&”',DNT=now(),comment=“&comment&” where newsid=“&newsid&”“
删除语句的执行3：
<%
opendataconn
ids=split(request(”newsid“),”,“)
for i=0 to ubound(ids)
tt=trim(ids(i))
set rs=server.createobject(”adodb.recordset“)
'rs.open”select * from news where newsid=“&tt&”“,conn,1,1
'If Not Rs.Eof Then
'imgname=Split(Trim(Rs(”imgname“)),”,“)
' For m=0 to ubound(imgname)
'If len(imgname(m))>12 then
'set fso=Server.CreateObject(”Scripting.FileSystemObject“)
' fso.deleteFile Server.MapPath(”../pic/“&imgname(m))
'Set fso=Nothing
' end if
'Next
' End if
'rs.close
sql=”select * from news where newsid=“&tt&”“
rs.open sql,conn,1,1
if not rs.eof then
conn.execute ”delete from news where newsid=“&tt&”“
rs.close
set rs=nothing
end if
conn.execute”delete from news where newsid=“&tt&”“
next
response.redirect”news_del.asp“
closedataconn
%>
输出语句的执行4：
<%
strSql=”select top 12 * from news where sort=1 order by dnt desc“set rs=Server.CreateObject(”ADODB.RecordSet“)
rs.open strSql,conn,3,3
do while not rs.eof%>
<%
Rs.MoveNext
Loop
Rs.Close %>
Session.timeout=100
失效时间！
把文件写入txt中
<%
dim fs,fname,f,t,x
set fs=Server.CreateObject(”Scripting.FileSystemObject“)公共的部分
'set fname=fs.CreateTextFile(”textads.txt“,true)
'fname.WriteLine(”我是伟！！“&year(now())&”-“&month(now())&”-“&day(now())&”“)
'fname.Close
'set fname=nothing
'set fs=nothing是写入文件中
set t=fs.OpenTextFile(”textads.txt“,1,false)
x=t.ReadLine 张小
x=replace(x,”,“,”我是张小伟“)
t.close
Response.Write(”“& x &”")读出里面的内容 %>
第五篇：ShowModalDialog的心得.刷新本页面,设置高度
1.刷新本页面
在body里写一个A链接.然后在javascript中使用click()调用.注意:在头部加上:
第一步:
加上
(有日期控件一定加在日期控件后面,不然IE6会报错)
引用
第二步:
引用
第三步:
在JS处调用这个,至于需要在哪个地方调用自己放.newPage.click();
2.ShowModalDialog的高度(IE8版本)
根据IE8浏览器,设置好页面的高度,但是在IE6中,弹出的模式窗口高度被缩小了.自己总结一个方法:
在JS中写入:
引用
function setHight(height){
var ua = navigator.userAgent.toLowerCase();//客户端浏览器信息var size=“";
if(window.ActiveXObject){//判断IE浏览器
size=ua.match(/msie([d.]+)/)[1];//得出IE的版本大小
}
if(size==”6.0"){
height = Number(height)+ 60;//在IE8中的高度加60就是IE6下的高度了.}
return height;
}
在给模式窗口设置高度时可以使用这个方法:
var height = setHight(610);//这个610是IE8中模式窗口的高度.
点击咨询 