ASP生成具有分页的静态网页--asp编程技术

ASP生成具有分页的静态网页
<%
Dim htm_lr‚FileName‚Fso‚Ts‚Path‚I‚J
取记录....
J=0
Do While Not Rs.Eof
For I = 1 To 10
If Not Rs.Eof Then
htm_lr = html_lr&""&vbCrLf
End If
Rs.MoveNext
Next
J=J+1
FileName = "file_"&J&".htm"
Call SaveFile(FileName‚htm_lr)
Loop

Sub SaveFile(FileName‚Data)
Set Fso=createobject("scripting.filesystemobject")
If instr(filename‚":\")<>0 then
path=filename
Else
path=server.MapPath(FileName)
End If
Set ts=Fso.createtextfile(path‚true)
ts.writeline(data)
ts.close
set ts=nothing
set Fso=nothing
End Sub
%>

Server.ScriptTimeOut：处理脚本运行时间的方法2006-5-22

ASP实现禁止外部提交数据2006-5-22

asp禁止站外提交表单2006-5-22

经典的图片切换效果2006-5-22

asp图片防盗链2006-5-22

ASP生成具有分页的静态网页2006-5-22

xmlhttp上传文件突破大小限制2006-5-22

XMLHTTP详细介绍2006-5-22

Google SiteMap生成工具 (ASP & PHP)2006-5-22

用正则表达式突出显示字符串中查询到的单词的函数2006-5-22

您的姓名： 匿名发送

电子邮件：

评论内容：
不能超过100个字符

所有留言只代表网友个人观点，不代表本站观点。
请各位遵纪守法并注意语言文明。