asp 批量生成HTML

我在网上搜了好多资料都是不能用的那位高手给个能用的代码给我啊是要批量生成的最是好是要速度快一点的生成的HTML代码要是存在就覆盖... 我在网上搜了好多资料 都是不能用的 那位高手给个能用的代码给我啊

是要批量生成的 最是好是要速度快一点的

生成的HTML 代码要是存在 就覆盖
展开
 我来答
haha6443
2008-12-02 · 超过35用户采纳过TA的回答
知道答主
回答量:101
采纳率:0%
帮助的人:76.4万
展开全部
去下个飞鸟生成HTML插件吧,一键就全部生成
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
小育BD
2008-12-02 · TA获得超过113个赞
知道答主
回答量:289
采纳率:0%
帮助的人:130万
展开全部
你的问题我都可以告诉你方法解决,而且绝对的比你的好,
但是你给的分实在太少了.如果你能把分加高.我能帮你
请恕我这么现实
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
倾太作8
2008-12-08 · 超过13用户采纳过TA的回答
知道答主
回答量:92
采纳率:0%
帮助的人:61.3万
展开全部
给你一个实例:
用到三个文件conn.asp,newlist.asp,info.asp
conn.asp代码
<%
'数据库链接
db="data/data.asp"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
conn.open connstr
If Err Then
err.Clear
Set conn = Nothing
Response.Write "数据库连接出错,请检查连接字串。"
Response.End
End If
'定义新闻阅读界面的读取
Dim News_title,News_content
Sub ReadNews()
set rs1=server.createobject("adodb.recordset")
sql1="select id,title,content from news where id="& ID
rs1.open sql1,conn,3,3
News_title=rs1("title")
News_content=rs1("content")
rs1.close
set rs1=Nothing
End Sub
%>

newslist.asp代码如下:
<!--#include file="conn.asp"-->
<ol>
<%
Set rs=server.CreateObject("adodb.recordset")
sql="select * from news"
rs.open sql,conn,1,1
do while not rs.eof
%>
<li><a href="info.asp?/<%=rs("id")%>.html"><%=left(trim(rs("title")),30)%></a></li>
<%
rs.movenext
loop
rs.close
set rs=Nothing
%>
</ol>

info.asp代码如下:
<!--#include file="conn.asp"-->
<%
id=request.QueryString("id")
If id="" Then
server_v40=Request.ServerVariables("QUERY_STRING")
id=Int(replace(replace(server_v40,"/",""),".html",""))
End If
Call ReadNews()
%>
<div>
标题: <b><%= News_title%></b><br />
内容: <%=News_content%>
</div>

你可以到这个网站看看, 对你有帮助http://www.shcundu.cn
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
百度网友4bbeba2db
2008-12-04
知道答主
回答量:19
采纳率:0%
帮助的人:19.2万
展开全部
我可以告诉你一个专业的程序API。不过学习的时间比较长点。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式