手机
当前位置:查字典教程网 >编程开发 >ASP教程 >asp:生成静态页面函数
asp:生成静态页面函数
摘要:复制代码代码如下:

复制代码 代码如下:

<%

ifSaveFile("/htm/list.htm","http://www.xxx.com/asp/list.asp")then

Response.write"已生成"

else

Response.write"没有生成"

endif

functionSaveFile(LocalFileName,RemoteFileUrl)

DimAds,Retrieval,GetRemoteData

OnErrorResumeNext

SetRetrieval=Server.CreateObject("Microso"&"ft.XM"&"LHTTP")

WithRetrieval

.Open"Get",RemoteFileUrl,False,"",""

.Send

GetRemoteData=.ResponseBody

EndWith

SetRetrieval=Nothing

SetAds=Server.CreateObject("Ado"&"db.Str"&"eam")

WithAds

.Type=1

.Open

.WriteGetRemoteData

.SaveToFileServer.MapPath(LocalFileName),2

.Cancel()

.Close()

EndWith

SetAds=nothing

iferr<>0then

SaveFile=false

err.clear

else

SaveFile=true

endif

Endfunction

%>

【asp:生成静态页面函数】相关文章:

生成静态页大全[ASP/PHP/ASPX]

用ASP+FSO生成JS文件

ASP采集入库生成本地文件的几个函数

检测函数 asp class

网站生成静态页面攻略4:防采集而不防搜索引擎策略

asp中正则表达式过滤html代码函数

一个实用asp分页函数

asp 日期格式化函数

Asp 函数介绍

asp 常用函数用法

精品推荐
分类导航