| 网站首页 | 教程 | 素材 | 图片 | 特效 | 论坛 | 字体 | 模板 | 软件 | 书籍 | 源码 | 新闻 | 站长原创 | 动易模板 | 
您现在的位置: 玉叶随风网 >> 教程 >> 语言编程 >> ASP技术 >> ASP应用 >> 文章正文 用户登录 新用户注册
asp文件首页调用代码          【字体:
asp文件首页调用代码
热门推荐:
普通文章 asp文件首页调用代码
普通文章 常用ASP自定义函数集
普通文章 纯ASP(VBscript)写的全
普通文章 ASP编写完整的IP所在地
作者:佚名    文章来源:本站原创    点击数:    更新时间:2005-5-10
下边的代码适合于所有ACCESS数据库的调用。
把下边的代码保存成一个ASP文件,如NEWS.ASP
data/news.mdb是数据库的目录路径和数据库的名字
top 15是在首页显示15条的意思
From news 是打开NEWS数据库的意思,NEWS是数据库的表的名字
& rs_news("url") &是鼠标点击显示出来的标题的URL
& rs_news("name") & 是让首页显示的标题的字段,要想显示数据库里的哪个字段,就调用哪个



首页调用格式如下:
<script language=javascript src="news.asp"></script>


news.asp
<%
Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("data/news.mdb")



conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
sql_news="Select top 15 * From news Order By id DESC"



set rs_news=conn.execute(sql_news)
if not rs_news.eof then
rs_news.movefirst
dis_mes=dis_mes & "<tr><td valign=top>"
do while not rs_news.eof
dis_mes=dis_mes &"<li><a href=" & rs_news("url") & " target=_blank>" & rs_news("name") & "</a><br>"
rs_news.movenext
loop
dis_mes=dis_mes & "</td></tr>"
end if
rs_news.close
dis_mes="document.write(""" & dis_mes & """);"
response.write dis_mes
%>
文章录入:碧玉叶    责任编辑:碧玉叶 
  • 上一篇文章:

  • 下一篇文章:
  • 发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口