怎么在html网页里面,插入调用asp的文件
我的网站,首页是html的,我现在也自己编写了一个可以在线发布和修改文章的asp网页,想在首页里面,调用一下数据库里面,我刚刚发布文章标题和发布时间代码,不知道有没有办法...
我的网站,首页是html的,我现在也自己编写了一个可以在线发布和修改文章的asp 网页,想在首页里面,调用一下数据库里面,我刚刚发布文章标题和发布时间代码,不知道有没有办法在不修改首页后缀名的情况下,实现呢
展开
1个回答
展开全部
HTML是可以调用ASP代码的，但是需要Javascript支持：
index.html调用部分
<html>
<head><title>测试HTML调用ASP</title></head>
<body>
最新文章：
<script language="javascript" src="Newest.asp"></Script>
</body>
</html>
Newest.asp代码：
<%
Dim Rs,sql
Set Rs=Server.CreateObject("adodb.recordset")
sql="select * from [article] Order by AddTime desc"
Rs.open sql,conn,1,1
if Rs.eof or rs.bof then
Response.write"document.write(""栏目建设中..."");"
else
Dim i
i=1
Do while Not(Rs.eof or rs.bof or i>10)
Response.write"document.write(""<a href=Read.asp?ID="&Rs("ID")&">"&Rs("Title")&"</a>("&Rs("AddTime")&")"");"
Rs.movenext
i=i+1
Loop
end if
Set Rs=nothing
%>
原理就是用ASP读取数据，用Response.write写出可以被JS调用的document.write，在HTML中显示出来。
index.html调用部分
<html>
<head><title>测试HTML调用ASP</title></head>
<body>
最新文章：
<script language="javascript" src="Newest.asp"></Script>
</body>
</html>
Newest.asp代码：
<%
Dim Rs,sql
Set Rs=Server.CreateObject("adodb.recordset")
sql="select * from [article] Order by AddTime desc"
Rs.open sql,conn,1,1
if Rs.eof or rs.bof then
Response.write"document.write(""栏目建设中..."");"
else
Dim i
i=1
Do while Not(Rs.eof or rs.bof or i>10)
Response.write"document.write(""<a href=Read.asp?ID="&Rs("ID")&">"&Rs("Title")&"</a>("&Rs("AddTime")&")"");"
Rs.movenext
i=i+1
Loop
end if
Set Rs=nothing
%>
原理就是用ASP读取数据，用Response.write写出可以被JS调用的document.write，在HTML中显示出来。
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
