📄 bless.asp

📁 - 其中VIP源代码是经过测试
💻 ASP
📖 第 1 页 / 共 2 页
字号:
上一页 12
									<td width="50" valign="top" style="padding-top:8;padding-left:2"><img name="length<%=i%>" src="/images/empty.gif" width="40" height="1" style="background-color:#FF0000">
									<div id="laye<%=i%>" onmouseout="drag=0" onmouseover="dragObj=this; drag=1;" style="position: absolute; padding-top:3"><img src="../../images/wedbbs/player_volume.gif"></div></td>
									<script>laye<%=i%>.style.left=allwidth</script>
								</tr>
							</table>
						</td></tr>
						</table>
						<%if rs("msgcontent")<>"" then%>
						<table height="12"><tr><td></td></tr></table><!--Null-->
						<table width="468" height="3" cellpadding="0" cellspacing="0" background="../../images/wedbbs/txt_1.gif"><tr><td></td></tr></table>
						<table width="468" cellpadding="0" cellspacing="0" background="../../images/wedbbs/txt_2.gif"><tr><td style="padding:8 10 8 10" class="txt"><%=EncodeTxt(rs("msgcontent"))%></td></tr></table>
						<table width="468" height="3"cellpadding="0" cellspacing="0" background="../../images/wedbbs/txt_3.gif"><tr><td></td></tr></table>
						<%end if%>
						<table height="10"><tr><td></td></tr></table><!--Null-->
					</td></tr>
				</table>
				<table width="504" height="7" cellpadding="0" cellspacing="0" background="../../images/wedbbs/frame_bottom.gif"><tr><td></td></tr></table>
				<%=rs("replymsg")%>
			</td></tr>
		</table>
	</td>
</tr>
<tr><td height="16" colspan="2" valign="bottom"><table width="100%" cellpadding="0" cellspacing="0" height="1" background="../../images/wedbbs/dot.gif"><tr><td></td></tr></table></td></tr>
<%case 2%>
<tr>
	<td width="160" valign="top" align="center" style="padding-top:14">
		<table cellpadding="0" cellspacing="0">
			<tr><td background="../../images/wedbbs/icon_bg2.gif">
				<table cellpadding="0" cellspacing="0" width="129" style="background:url('../../images/wedbbs/icon_bg1.gif') no-repeat">
				<tr>
					<td width="40" valign="top" style="padding:8 0 0 15"><img src="../../images/wedbbs/no<%=i%>.gif"></td>
					<td style="padding:8 0 0 0"><img src="/images/icon/<%=rs("portrait")%>.gif"></td>
				</tr>
				<tr><td colspan="2" height="4"></td></tr>
				<tr><td colspan="2" height="38" background="../../images/wedbbs/nameinfo_bg.gif" valign="top" style="padding:4 0 0 35">
					<table cellpadding="0" cellspacing="0"><tr><td class="nameinfo" bgcolor="#F5F5F5"><%="<script>"%>document.write(leftstr("<%=rs("msgpeople")%>",13))</script>&nbsp;</td></tr></table>
					<table cellpadding="0" cellspacing="0" height="2"><tr><td></td></tr></table>
					<table cellpadding="0" cellspacing="0"><tr><td width="17"><img src="../../images/wedbbs/nameinfo_url.gif" alt="个人主页:<%=rs("msgurl")%>"></td><td width="17"><img src="../../images/wedbbs/nameinfo_tel.gif"  alt="联系电话:<%=rs("msgtel")%>"></td><td width="17"><img src="../../images/wedbbs/nameinfo_mail.gif"  alt="电子邮件:<%=rs("msgmail")%>"></td><td width="17"><img src="../../images/wedbbs/nameinfo_heart.gif"  alt="个人QQ:<%=rs("msgqq")%>"></td></tr></table>
				</td></tr>
				<tr><td colspan="2" height="6"></td></tr>
				</table>
			</td></tr>
			<tr><td height="1" background="../../images/wedbbs/icon_bg3.gif"></td></tr>
		</table>
	</td>
	<td valign="top"  style="padding-top:5">
		<table width="540" cellpadding="0" cellspacing="0">
			<tr><td><form method="POST" onSubmit="return delmsg()" name="form<%=i%>"><table cellpadding="0" cellspacing="3"><tr><td width="400" class="title" valign="bottom"><img src="../../images/wedbbs/cell.gif"> <%=rs("msgpeople")%> 发表于 <%=rs("msgdate")%></td><td><input type="image" src="../../images/wedbbs/menu_1.gif" onfocus="this.blur()"><img hspace="4" src="../../images/wedbbs/menu_2.gif" onclick="replymsg(<%=rs("id")%>)" style="cursor:hand"><input type="hidden" name="id" value="<%=rs("id")%>"></td></tr></form></table>
			<tr><td height="1" bgcolor="#F3E4D7"></td></tr>
			<tr><td height="7"></td></tr>
			<tr><td align="center">
				<table width="504" height="62" cellpadding="0" cellspacing="0" background="../../images/wedbbs/frame_title.gif"><tr><td width="72" style="padding-left:14"><img src="../../images/wedbbs/frame_gift.gif"></td><td valign="top" style="padding-top:37" class="frame_title">好友[<%=rs("msgpeople")%>]为<%=rs("bridegroom")%>和<%=rs("bride")%>赠送精美礼物！</td></tr></table>
				<table width="504" cellpadding="0" cellspacing="0" background="../../images/wedbbs/frame_bg.gif">
					<tr><td style="padding-left:18">
						<table><tr><td><img src="../../images/wedbbs/gift<%=rs("gift")%>.jpg"></td></tr></table>
						<%if rs("msgcontent")<>"" then%>
						<table height="12"><tr><td></td></tr></table><!--Null-->
						<table width="468" height="3" cellpadding="0" cellspacing="0" background="../../images/wedbbs/txt_1.gif"><tr><td></td></tr></table>
						<table width="468" cellpadding="0" cellspacing="0" background="../../images/wedbbs/txt_2.gif"><tr><td style="padding:8 10 8 10" class="txt"><%=EncodeTxt(rs("msgcontent"))%></td></tr></table>
						<table width="468" height="3"cellpadding="0" cellspacing="0" background="../../images/wedbbs/txt_3.gif"><tr><td></td></tr></table>
						<%end if%>
						<table height="10"><tr><td></td></tr></table><!--Null-->
					</td></tr>
				</table>
				<table width="504" height="7" cellpadding="0" cellspacing="0" background="../../images/wedbbs/frame_bottom.gif"><tr><td></td></tr></table>
				<%=rs("replymsg")%>
			</td></tr>
		</table>
	</td>
</tr>
<tr><td height="16" colspan="2" valign="bottom"><table width="100%" cellpadding="0" cellspacing="0" height="1" background="../../images/wedbbs/dot.gif"><tr><td></td></tr></table></td></tr>
<%case 3%>
<tr>
	<td width="160" valign="top" align="center" style="padding-top:14">
		<table cellpadding="0" cellspacing="0">
			<tr><td background="../../images/wedbbs/icon_bg2.gif">
				<table cellpadding="0" cellspacing="0" width="129" style="background:url('../../images/wedbbs/icon_bg1.gif') no-repeat">
				<tr>
					<td width="40" valign="top" style="padding:8 0 0 15"><img src="../../images/wedbbs/no<%=i%>.gif"></td>
					<td style="padding:8 0 0 0"><img src="/images/icon/<%=rs("portrait")%>.gif"></td>
				</tr>
				<tr><td colspan="2" height="4"></td></tr>
				<tr><td colspan="2" height="38" background="../../images/wedbbs/nameinfo_bg.gif" valign="top" style="padding:4 0 0 35">
					<table cellpadding="0" cellspacing="0"><tr><td class="nameinfo" bgcolor="#F5F5F5"><%="<script>"%>document.write(leftstr("<%=rs("msgpeople")%>",13))</script>&nbsp;</td></tr></table>
					<table cellpadding="0" cellspacing="0" height="2"><tr><td></td></tr></table>
					<table cellpadding="0" cellspacing="0"><tr><td width="17"><img src="../../images/wedbbs/nameinfo_url.gif" alt="个人主页:<%=rs("msgurl")%>"></td><td width="17"><img src="../../images/wedbbs/nameinfo_tel.gif"  alt="联系电话:<%=rs("msgtel")%>"></td><td width="17"><img src="../../images/wedbbs/nameinfo_mail.gif"  alt="电子邮件:<%=rs("msgmail")%>"></td><td width="17"><img src="../../images/wedbbs/nameinfo_heart.gif"  alt="个人QQ:<%=rs("msgqq")%>"></td></tr></table>
				</td></tr>
				<tr><td colspan="2" height="6"></td></tr>
				</table>
			</td></tr>
			<tr><td height="1" background="../../images/wedbbs/icon_bg3.gif"></td></tr>
		</table>
	</td>
	<td valign="top"  style="padding-top:5">
		<table width="540" cellpadding="0" cellspacing="0">
			<tr><td><form method="POST" onSubmit="return delmsg()" name="form<%=i%>"><table cellpadding="0" cellspacing="3"><tr><td width="400" class="title" valign="bottom"><img src="../../images/wedbbs/cell.gif"> <%=rs("msgpeople")%> 发表于 <%=rs("msgdate")%></td><td><input type="image" src="../../images/wedbbs/menu_1.gif" onfocus="this.blur()"><img hspace="4" src="../../images/wedbbs/menu_2.gif" onclick="replymsg(<%=rs("id")%>)" style="cursor:hand"><input type="hidden" name="id" value="<%=rs("id")%>"></td></tr></form></table>
			<tr><td height="1" bgcolor="#F3E4D7"></td></tr>
			<tr><td height="7"></td></tr>
			<tr><td align="center">
				<table width="504" cellpadding="0" cellspacing="0"><tr><td class="msgtxt"><%=rs("msgcontent")%></td></tr></table>
				<%=rs("replymsg")%>
			</td></tr>
		</table>
	</td>
</tr>
<tr><td height="16" colspan="2" valign="bottom"><table width="100%" cellpadding="0" cellspacing="0" height="1" background="../../images/wedbbs/dot.gif"><tr><td></td></tr></table></td></tr>
<%end select%>

<%rs.movenext%>
<%if rs.eof then%>
<%exit for%>
<%end if%>
<%next%>
<%end if%>
<form name="form">
<input type="hidden" name="id">
</form>
			</table>
		</td></tr></table>
	</td>
	<td width="23"></td>
</tr>
</table>
<table width="780" height="33" cellpadding="0" cellspacing="0" style="background:url('../../images/wedbbs/bottom.gif') no-repeat;"><tr><td align="right" valign="top" style="padding-right:30;padding-top:14;font-family:Arial;" class="page"><%if page>1 then%><a href="?uid=<%=uid%>&page=<%=page-1%>"><font color="#CC3333">上一页</font></a><%end if%>&nbsp;<%if page<rs.pagecount then%><a href="?uid=<%=uid%>&page=<%=page+1%>"><font color="#CC3333">下一页</font></a>&nbsp;<%end if%>page:<%for i=1 to rs.pagecount%>&nbsp;<a href="?uid=<%=uid%>&page=<%=i%>"><font color="#CC3333"><%if i = page then%><font color="#FF0000"><%end if%>[<%=i%>]</font></a><%next%></td></tr></table>
<br><br>
</td>

<%
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
%>
<td valign="top" style="padding:0 0 0 22">
<table width="184" cellpadding="0" cellspacing="0">
<tr><td height="19"></td></tr>
<tr><td height="57" background="../../images/wedding/right_bulletin.gif"></td></tr>
<tr><td height="5" background="../../images/wedding/right_top.gif"></td></tr>
<tr><td height="60" background="../../images/wedding/right_line.gif" valign="top" style="padding:6 16 8 24"><span style="cursor:hand;color:#9d9d9d;" onclick="right_view1()"><%=EncodeTxt(left(bulletin,116))%><%if len(bulletin)>116 then%>…<%end if%></span></td></tr>
<tr><td background="../../images/wedding/right_line.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="8" background="../../images/wedding/right_bottom.gif"></td></tr>
<tr><td height="22"></td></tr>
<tr><td height="57" background="../../images/wedding/right_link.gif"></td></tr>
<tr><td height="5" background="../../images/wedding/right_top.gif"></td></tr>
<tr><td height="60" background="../../images/wedding/right_line.gif" valign="top" style="padding:6 16 8 24" align="center" style="line-height:150%">
<%for i=1 to rs_link.recordcount%>
<a href="Http://<%=rs_link("url")%>" target="_blank"><font color="#9D9D9D"><%=rs_link("title")%></font></a><br>
<%rs_link.movenext%>
<%if rs_link.eof then%>
<%exit for%>
<%end if%>
<%next%>
</td></tr>
<tr><td background="../../images/wedding/right_line.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="8" background="../../images/wedding/right_bottom.gif"></td></tr>
<tr><td height="22"></td></tr>
<tr><td height="57" background="../../images/wedding/right_vod.gif"></td></tr>
<tr><td height="5" background="../../images/wedding/right_top.gif"></td></tr>
<tr><td height="60" background="../../images/wedding/right_line.gif" valign="top" style="padding:6 16 8 24" align="center" style="line-height:150%">
<%for i=1 to rs_vod.recordcount%>
<a href="Http://www.onlove.cn/userpic/vod/<%=rs_vod("url")%>" target="_blank"><font color="#9D9D9D"><%=rs_vod("title")%></font></a><br>
<%rs_vod.movenext%>
<%if rs_vod.eof then%>
<%exit for%>
<%end if%>
<%next%>
</td></tr>
<%if rs_vod.recordcount>1 then%>
<tr><td background="../../images/wedding/right_line.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 background="../../images/wedding/right_line.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="8" background="../../images/wedding/right_bottom.gif"></td></tr>
<tr><td height="22"></td></tr><!--Null-->
<tr><td height="57" background="../../images/wedding/right_hot.gif"></td></tr>
<tr><td height="5" background="../../images/wedding/right_hot1.gif"></td></tr>
<tr><td height="60" background="../../images/wedding/right_hot2.gif" valign="top" style="padding:8 0 4 30">
<script src="Http://www.onlove.cn/js/output_1.asp?dis=8&wid=150&bg=0"></script>
</td></tr>
<tr><td height="8" background="../../images/wedding/right_hot3.gif"></td></tr>
<tr><td height="40"></td></tr><!--Null-->
</table>
</td>
</tr></table>

<div align="center"><!--#include file="bottom.asp"--></div>

</body>
<%if rs.recordcount>0 then%>
<%
rs.movefirst
response.write("<script>")
response.write("var con_1 = new Array();")
response.write("var num_1 = 0;")
xianshi=6		'显示条数

function blessty(x)
	select case x
	case 1: blessty="点歌"
	case 2: blessty="赠礼物"
	case 3: blessty="留言"
	end select
end function

for i=1 to xianshi
	response.write("con_1[num_1] = new Array();")
	response.write("con_1[num_1][2] = " + "leftstr('" + rs("msgpeople") + "',12)" + "+" + "'最新" + blessty(rs("ty")) + "祝福" + "';")
	response.write("num_1++;")
	rs.movenext
	if rs.eof then
		rs.movefirst
	end if
next

response.write("</script>")
%>
<script>var oScrollMain_1 =  document.getElementById("scroll_main_1");WriteTable_1();</script>
<%end if%>
</html>
上一页 12
💿 文件大小 36368 K
👤 上传用户 Rebecca_SYF
📂 所属分类其他行业
🏷️ 相关标签

#VIP #源代码 #测试
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -