2010-01-28 by text , 0 views
Gblog输入tag标签都已经统一用逗号隔开了，不过tag标签现在是个整体，我们要把它分开，然后逐个加上超链接。
下面用Split函数把他们分开
Split函数的用法:
返回值数组 = Split("字符串","分割符")
代码如下：
vtags=rs("tag")
vtagsReturn = split(vtags,"，")
If IsArray(vtagsReturn)=True Then
For i = LBound(vtagsReturn) To UBound(vtagsReturn)
vtagsurl=vtagsurl&"<a href=""http://www.goodtext.org/item/log.asp?tag="&Server.URLEncode(vtagsReturn(i))&""">"&vtagsReturn(i)&"</a>，"
Next
vtagsurl=Left(vtagsurl,Len(vtagsurl)-1)
Else
vtagsurl=vtagsurl&"<a href=""http://www.goodtext.org/item/log.asp?tag="&Server.URLEncode(vtagsReturn)&""">"&vtagsReturn&"</a>，"
End If
这样输出了带链接的tag标签了。
不过测试时发现，如果tag标签为空的时候会出错
所以又加了判断
If vtags<>"" Then
……
End If
同时发现http://www.goodtext.org/的Gblog评论留下的主页地址，有的填写了http://，有的直接写域名，我改了下。现在带不带http://都可以了，没有http://的也会自动填上。
tagged: Gblog，tag标签