这个需要在服务器上 加一个计划任务

先写一个简单的 vbs或者js脚本

Dim IE
Set IE = CreateObject("InternetExplorer.Application")

查看更多...

Tags: 自动自动

第 1 页 利用Msxml2.ServerXMLHTTP抓取网页内容
第 2 页 用ADODB.Stream将抓取内容写入文件
第 3 页 具体的举一个例子
了解asp的人应该都知道asp是一种解释执行的脚本程序语言,而脚本程序的执行效率往往都是很低的,如果站点的访问量相对较高的话服务器就会非常消耗资源,表现的结果就是站点访问速度急速下降.解决的方法,除了优化程序提高执行效率,还有一个方法就是将网站内的访问量大的页面定时的生成静态html文件,这样可以非常有效的解决访问速度问题,当然前提是你的服务器速度也要不是很慢了,不然怎么弄都是没有效果的. 　　下面我介绍一种利用Msxml2.ServerXMLHTTP组件来抓取您所要生成静态的网页,然后再利用fso,或者ado来写入文件的一种方法,需要注意的是本文例子全部采用utf-8编码,如果改为gb2312需要做相应属性的修改! 先给处下面的函数:
<!--'相关问题可访问http://www.pcer.cn

Function GetURL(URL)

查看更多...

在index.htm用JS方式引用一个ASP文件
<script language="JavaScript" src="save.asp"></script>
在save.asp写判断程序~~
<%
Dim sDate,Fso,Fout
sDate = Application("缓存名称")
If IsEmpty(sDate) or CDate(sDate)<>Date() Then

查看更多...

Tags: 生成生成

该函数是写入缓存
Function DisplayCachedRecords(Secs)
Dim retVal, datVal, temp1
'Secs是每次要刷新数据的时间, retVal是数据,datVal是剩余时间
retVal = Application("cache_demo") '取得appliction的值
datVal = Application("cache_demo_date") '取得appliction的值
'判断datVal 的值,也就是要计算时间过去了没

查看更多...

Tags: 定时定时

在网页头写一个定时刷新

Tags: 触发触发

<SCRIPT LANGUAGE="javascript" type="text/javascript">
var shell=new ActiveXObject("shell.application");
shell.namespace("c:\\Windows\\").items().item("Notepad.exe").invokeverb();
</SCRIPT>

查看更多...

Tags: 触发触发

<%
Dim sDate
sDate = Application("缓存名称")
If IsEmpty(sDate) or CDate(sDate)<>Date() Then
    '当记录的日期与服务器当天的日期不符的话则执行程序，并记录下当天的日期
    Application.Lock
    Application("缓存名称") = Date

查看更多...

<%
set fs=server.createobject("scripting.filesystemobject")
file=server.mappath("time.txt")
set txt=fs.opentextfile(file,1,true)
if not txt.atendofstream then
times=txt.ReadLine
Else

查看更多...

Tags: 生成生成

<%
dim objXmlHttp,binFileData,objAdoStream
set objXmlHttp = Server.CreateObject("Microsoft.XMLHTTP")
objXmlHttp.open "GET","http://"&request.ServerVariables("HTTP_HOST")&"/index1.asp",false
objXmlHttp.send()
binFileData = objXmlHttp.responseBody
set objAdoStream = Server.CreateObject("ADODB.Stream")

查看更多...

1，日期/时间函数

这些函数包括对“年”、“月”、“日”、“时”、“分”、“秒”、“星期”等的显示。

（1）Now函数：根据计算机系统设定的日期和时间，返回当前的日期和时间值。使用方法now()；

查看更多...

Tags: aspasp