如何自动更新导航栏?

页面导航:首页 > 网络编程 > 编程10000问 > 如何自动更新导航栏?

如何自动更新导航栏?

来源:互联网 作者:脚本宝典 时间:2015-06-22 12:50 【

html head meta http-equiv=Content-Type content=text/html; charset=gb2312 title山水盈盈之Content Linking组件应用 /title /head body center font color=redContent Linking组件应用示范 /font /center ul % Set Link=Server.CreateObjec
< html>
    < head>
    < meta http-equiv="Content-Type" content="text/html; charset=gb2312">
    < title>山水盈盈之Content Linking组件应用< /title>
    < /head>
    < body>
    < center>< font color=red>Content Linking组件应用示范< /font>< /center>
    < ul>
    < %
    Set Link=Server.CreateObject("MSWC.NextLink")
    lcount=Link.GetListCount("conlink.txt")
' 用GetListCount方法确定在conlink.txt中有多少条超链.
    Dim i
    For i=1 to lcount
      < li>< a href="< % =Link.GetNthURL("conlink.txt", i) %>" >
< %=Link.GetNthDescription("conlink.txt", i) %>< /a>
    < % Next %>
' 用GetNthURL、GetNthDescription方法逐一将存储在conlink.txt 文件的URL和文本信息读出并显示给客户端浏览器,循环执行.
    < /ul>
    < /body>
    < /html>
Tags:

相关文章

    文章评论

    最 近 更 新
    热 点 排 行
    Js与CSS工具
    代码转换工具
    
    <