3.2sp1友情连接错误的终结解决方案----[菜鸟版](2)_风讯Cms教程

编辑Tag赚U币
教程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模板

共2页上一页12下一页
来源:模板无忧//所属分类:风讯Cms教程/更新时间:2006-06-18
相关风讯Cms教程