一聚教程网:一个值得你收藏的教程网站

热门教程

用链接组件轻松做交互式链接

时间:2022-06-30 11:14:13 编辑:袖梨 来源:一聚教程网


测试

<% set myobj=server.createobject("mswc.nextlink") %> ''建立 Content Linking 组件

<%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 ""
else
Response.Write ""
end if
next

%>

"
else
Response.Write "
"
end if
%>
>
<% response.write explain %>

<%
j=j + 1
if j mod 3=0 then
Response.Write "



说明:list.txt里面的文件格式为:前面为链接地址,后面为描述,链接url地址和描述之间用 Tab 键分隔。如果文件很多,你可以用dir * >>list.txt 获取所有的路径及文件名,然后在word里面打开,再得用alt 键进行列选,就很方便了。

热门栏目