3.2sp1友情连接错误的终结解决方案----[菜鸟版](2)_风讯Cms教程
教程Tag:暂无Tag,欢迎添加,赚取U币!
End If
FriendLink = FriendLink & "<td " & RowHeightStr & " ><a href=""" & RsFriendLinkObj("Url") & """ "& NewWindowTF &"><img border=""0"" width=""" & PicWidthStr & """ Height=""" & PicHeightStr & """ src=""" &Temp_Str & """></a>"
end if
RsFriendLinkObj.MoveNext
if RsFriendLinkObj.Eof then Exit For
Next
FriendLink = FriendLink & "</tr>"
Loop
FriendLink = FriendLink & "</table>"
else
FriendLink = ""
end if
Set RsFriendLinkObj = Nothing
else
FriendLink = ""
end if
End Function
相关风讯Cms教程:
- 相关链接:
- 教程说明:
风讯Cms教程-3.2sp1友情连接错误的终结解决方案----[菜鸟版](2)。