<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 键进行列选,就很方便了。
