right_bbs.asp

- 其中VIP源代码是经过测试

<%
set rs_link = Server.CreateObject("ADODB.Recordset")
sql = "select top 8 * from W_link where uid="&uid&" "
rs_link.Open sql,conn,3
set rs_vod = Server.CreateObject("ADODB.Recordset")
sql = "select top 8 * from W_vod where uid="&uid&" "
rs_vod.Open sql,conn,3
%>
<table width="192" cellpadding="0" cellspacing="0">
<!-- Null -->
<tr><td height="5" background="../../images/wedding/vip_right_bulletin1.gif"><table width="100%" height="136" style="background:url('../../images/wedding/vip_right_bulletin2.jpg') no-repeat;"><tr><td valign="top" style="padding:70 16 2 24"><span style="cursor:hand;color:8B6844;line-height:130%;" onclick="right_view1()"><%=EncodeTxt(left(bulletin,116))%><%if len(bulletin)>116 then%>…<%end if%></span></td></tr></table></td></tr>
<tr><td height="22" background="../../images/wedding/vip_right_bulletin1.gif" style="padding:0 0 0 92"><img style="cursor:hand" src="../../images/wedding/right_b1.gif" onclick="right_b1()"></td></tr>
<tr><td height="5" background="../../images/wedding/vip_right_bulletin3.gif"></td></tr>
<tr><td height="22"></td></tr><!-- Null -->
<tr><td height="5" background="../../images/wedding/vip_right_link1.gif"><table width="100%" height="136" style="background:url('../../images/wedding/vip_right_link2.jpg') no-repeat;" class="rightbbs"><tr><td align="center" valign="top" style="padding:70 16 2 24;line-height:140%">
<%for i=1 to rs_link.recordcount%>
<a href="Http://<%=rs_link("url")%>" target="_blank"><font color="#445D8A"><%=rs_link("title")%></font></a><br>
<%rs_link.movenext%>
<%if rs_link.eof then%>
<%exit for%>
<%end if%>
<%next%>
</td></tr></table></td></tr>
<tr><td height="22" background="../../images/wedding/vip_right_link1.gif" style="padding:0 0 0 33"><img style="cursor:hand" src="../../images/wedding/more.gif" onclick="right_view2()">　　<img style="cursor:hand" src="../../images/wedding/right_b2.gif" onclick="right_b2()"></td></tr>
<tr><td height="5" background="../../images/wedding/vip_right_link3.gif"></td></tr>
<tr><td height="22"></td></tr><!-- Null -->
<tr><td height="5" background="../../images/wedding/vip_right_vod1.gif"><table width="100%" height="136" style="background:url('../../images/wedding/vip_right_vod2.jpg') no-repeat;" class="rightbbs"><tr><td align="center" valign="top" style="padding:70 16 2 24;line-height:140%">
<%for i=1 to rs_vod.recordcount%>
<a href="Http://www.onlove.cn/userpic/vod/<%=rs_vod("url")%>" target="_blank"><font color="#42865A"><%=rs_vod("title")%></font></a><br>
<%rs_vod.movenext%>
<%if rs_vod.eof then%>
<%exit for%>
<%end if%>
<%next%>
</td></tr></table></td></tr>
<%if rs_vod.recordcount>1 then%>
<tr><td height="22" background="../../images/wedding/vip_right_vod1.gif" style="padding:0 0 0 33"><img style="cursor:hand" src="../../images/wedding/more1.gif" onclick="right_view3()">　　<img style="cursor:hand" src="../../images/wedding/right_b3.gif" onclick="right_b3()"></td></tr>
<%else%>
<tr><td height="22" background="../../images/wedding/vip_right_vod1.gif" style="padding:0 0 0 92"><img style="cursor:hand" src="../../images/wedding/right_b3.gif" onclick="right_b3()"></td></tr>
<%end if%>
<tr><td height="5" background="../../images/wedding/vip_right_vod3.gif"></td></tr>
</table>