 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
<html> <title>测试</title> <BODY> <% set myobj=server.createobject("mswc.nextlink") %> \\\'\\\'建立 Content Linking 组件 <table border=1> <% j=0 FOR i=1 to myobj.getlistcount("list.txt") \\\'获取文件 urllist.txt 中链接数目 url1=myobj.getnthurl("list.txt",i) \\\'取得超链接 explain=myobj.getnthdescription("list.txt",i) \\\'\\\'取得文字描述 下面我是控制在表格里面显示 if j mod 3=0 then Response.Write "<tr><td width=\\\'250\\\'><div align=\\\'center\\\'>" else Response.Write "<td width=\\\'250\\\'><div align=\\\'center\\\'>" end if %> <a href=rtsp://172.16.0.1/<% =url1 %> > <% response.write explain %> </A> <% j=j + 1 if j mod 3=0 then Response.Write "</td></tr>" else Response.Write "</td>" end if next %> <tr> </table> </body> </html> 说明：list.txt里面的文件格式为:前面为链接地址，后面为描述，链接url地址和描述之间用 Tab 键分隔。假如文件很多，你可以用dir * >>list.txt 获取所有的路径及文件名，然后在word里面打开，再得用alt 键进行列选，就很方便了。 返回类别: 教程 上一教程: 如何知道使用者所用的浏览器 下一教程: 如何用ASP编写网站统计系统二 您可以阅读与"用链接组件轻松做交互式链接"相关的教程: · 作一个可以直接和浏览器进行交互的组件 · ASP讲座之四：ASP内置组件 · 手把手教你使用VB来创建ASP组件(4) · ADODB.STREAM组件的使用说明 · DELPHI编写组件封装ASP代码的基本步骤 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
