高分请求:ASP程序代码问题

来源:百度知道 编辑:UC知道 时间:2024/06/17 05:16:35
原代码:
Sub zt_link(a)'友情链接
maxz_link=FSOFileRead(a)
maxz_link=Replace(maxz_link,Chr(13)&Chr(10),"#")
maxz_link_1=Split(maxz_link,"#")
maxz_link_2=UBound(maxz_link_1)
If maxz_link_2>=0 Then
For maxz_link_i=0 To maxz_link_2
If maxz_link_1(maxz_link_i)<>"" Then
maxz_link_3=Split(maxz_link_1(maxz_link_i),"|")
If maxz_link_3(3)="" Then
response.write"<a target=""_blank"" href="""&maxz_link_3(1)&""" title="""&maxz_link_3(2)&""">"&maxz_link_3(0)&"</a>         "
Else
response.write"<a target=""_blank"" href="""&maxz_link_3(1)&""" title="""&maxz_link_3(2)&"""><img src="""&maxz_link_3(3)&"&q

Sub dome(a)
maxz_link="a|aa|title1|https://gss0.bdstatic.com/70cFsjip0QIZ8tyhnq/img/logo-zhidao.gif,b|bb|titleb|,c|cc|title3|,d|dd|title4|https://gss0.bdstatic.com/70cFsjip0QIZ8tyhnq/img/logo-zhidao.gif,e|ee|title5|,f|ff|title6|,g|gg|title7|,h|hh|title8|,i|ii|title9|,j|jj|title10|,k|kk|title11|,l|ll|title12|,m|mm|title13|https://gss0.bdstatic.com/70cFsjip0QIZ8tyhnq/img/logo-zhidao.gif,n|nn|title14|https://gss0.bdstatic.com/70cFsjip0QIZ8tyhnq/img/logo-zhidao.gif"
maxz_link_1=Split(maxz_link,"