⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 index.asp

📁 - 其中VIP源代码是经过测试
💻 ASP
字号:
<!--#include file="../../../js/conn.asp"-->
<!--#include file="safety.asp"-->
<%
'更新访问量
sql = "update W_useralbum set visitcount=visitcount+1 where uid="&uid&""
conn.execute sql

sql = "select announce,bridegroom,bride,date_legal,date_legal_ty,mainpic from Wed_wedding where UID="&uid&"  "
rs.Open sql,conn,3
bridegroom=rs("bridegroom")
bride=rs("bride")
announce=rs("announce")
mainpic=rs("mainpic")

if not(isnull(mainpic)) then
Set rs_pic = Server.CreateObject("ADODB.Recordset")
sql = "select picwidth,picheight from Wed_pic_intro where pic_id='"&mid(mainpic,10,14)&"'  "
rs_pic.Open sql,conn,3
if rs_pic.recordcount>0 then
	if rs_pic("picwidth")>rs_pic("picheight") then
		pic_width=360
		pic_height=rs_pic("picheight") * pic_width / rs_pic("picwidth")
	else
		pic_height=360
		pic_width=rs_pic("picwidth") * pic_height / rs_pic("picheight")
	end if
else
	mainpic=NULL
end if
end if

if rs("date_legal_ty") then
	date_legal="—— 结婚于" & year(rs("date_legal")) & "年" & month(rs("date_legal")) & "月" & day(rs("date_legal")) & "日"
else
	select case month(rs("date_legal"))
	case "1"	EN_month="Jan."
	case "2"	EN_month="Feb."
	case "3"	EN_month="Mar."
	case "4"	EN_month="Apr."
	case "5"	EN_month="May."
	case "6"	EN_month="Jun."
	case "7"	EN_month="Jul."
	case "8"	EN_month="Aug."
	case "9"	EN_month="Sep."	
	case "10"	EN_month="Oct."
	case "11"	EN_month="Nov."
	case "12"	EN_month="Dec."
	end select
	date_legal="—— Marrid on " & EN_month & " " & day(rs("date_legal")) & " , " & year(rs("date_legal"))
end if

rs.close
sql = "select msgpeople,msgdate,ty from Wed_bless where uid="&uid&" order by msgdate desc "
rs.Open sql,conn,3

Function  EncodeTxt(fString)
	if not(isnull(fString)) then
	fString  =  Replace(fString,  ">",  "&gt;")  
	fString  =  Replace(fString,  "<",  "&lt;")  
	fString  =  Replace(fString,"  ",  "&nbsp;")  
	fString  =  Replace(fString,"""",  "&quot;")  
	'fString  =  Replace(fString,CHR(13),  "<br>")  
	fString  =  Replace(fString,  CHR(32),  "&nbsp;")  
	EncodeTxt  =  fString
	end if
End  Function 
%>

<head>
<meta http-equiv="Content-Language" content="en-us">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<link href="../../common.css" rel="stylesheet" type="text/css">
<SCRIPT LANGUAGE=JavaScript SRC="wed_scroll.js"></SCRIPT>
<SCRIPT LANGUAGE=JavaScript SRC="/js/leftstr.js"></SCRIPT>
<SCRIPT language=JavaScript>
function Bmove_in(x) {
eval(x).src="images/" + x + "_on.jpg";
}
function Bmove_out(x) {
eval(x).src="images/" + x + ".jpg";
}
function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
</SCRIPT>
<style type="text/css">
.couplename {FONT-WEIGHT:bold; FONT-SIZE:31px; FONT-STYLE: italic; FONT-FAMILY:黑体; line-height:120%}
a {color:#00FFFF}
</style>
<title>浪漫结婚网</title>
</head>

<body topmargin="0" leftmargin="0" style="background:url('IMAGES/INDEX_BG_1024.jpg') no-repeat;" onload="MM_preloadImages('images/nav_1_on.jpg','images/nav_2_on.jpg','images/nav_3_on.jpg','images/nav_4_on.jpg','images/nav_5_on.jpg')">

<script>
if (window.screen.width>=1024)
document.write("<table cellspacing='0' cellpadding='0' width='1004'><tr><td align='center'>")
else 
document.write("<div align='center'>")
</script>
<table width="780" height="625" cellspacing="0" cellpadding="0" style="background:url('images/index_bg.jpg') no-repeat;">
<tr>
<!-- left -->
	<td width="400" valign="top">
		<table width="100%" cellspacing="0" cellpadding="0">
		<tr><td align="center" height="440">
			<table cellspacing="0" cellpadding="0">
				<tr>
					<td><table border="1"cellspacing="7" bgcolor="#F6F6F6" style="border-collapse: collapse" bordercolor="#DEDEDE"><tr><%if isnull(mainpic) then%><td height="360" width="297" background="/templet/images/main.jpg"><%else%><td height="<%=pic_height%>" width="<%=pic_width%>" background="/userpic/standard/<%=mainpic%>"><%end if%></td></tr></table></td>
					<td height="100%"><table cellspacing="0" cellpadding="0" height="100%"><tr><td width="5" height="5"></td></tr><tr><td bgcolor="#CBCBCB"></td></tr></table></td>
				</tr>
				<tr>
					<td colspan="2"><table cellspacing="0" cellpadding="0" width="100%"><tr><td width="5" height="5"><img src="/images/empty.gif"></td><td bgcolor="#CBCBCB"><img src="/images/empty.gif"></td></tr></table></td>
				</tr>
			</table>
		</td></tr>
		<tr><td height="70"></td></tr>
		<tr><td style="padding-left:35">
<textarea cols="20" rows="5" name="a" style="border: 1px solid #CFCFCF; width:280px; height:90px;padding:5 5 5 5 ; font-size:12px; line-height:120%; color:#686868" readonly>
<%=EncodeTxt(announce)%>
</textarea>
		</td></tr>
		</table>
	</td>
<!-- right -->
	<td valign="top">
		<table width="100%" cellspacing="0" cellpadding="0">
		<tr><td height="6"></td></tr>
		<tr><td width="370" height="162" valign="top">
<div style="position: absolute;" style="padding:30 10 0 144">
<span class="couplename" style="color:#D3D3D3; FILTER: Blur(Add=0, Direction=135, Strength=6);width:220; height:100;"><%=bridegroom%>&<%=bride%></span><p></div>
<div style="position: absolute;" style="padding:30 10 0 144">
<span class="couplename" style="color:#E85555"><%=bridegroom%>&<%=bride%></span>
<br><br>
<div align="right"><span style="font-family:Arial;color:#999966;font-weight:bold;"><%=date_legal%></span></div>
</div>
		</td></tr>
		<tr><td style="padding-left:126" valign="top" height="236">
			<table cellspacing="1" cellpadding="0">
				<tr><td align="right"><a href="beauty.asp?uid=<%=uid%>&ms=1" onfocus="this.blur()"><img name="nav_1" border="0" src="images/nav_1.jpg" onmousemove=Bmove_in(this.name)  onmouseout=Bmove_out(this.name)></a></td></tr>
				<tr><td align="right"><a href="love.asp?uid=<%=uid%>&ms=1" onfocus="this.blur()"><img name="nav_2" border="0" src="images/nav_2.jpg" onmousemove=Bmove_in(this.name)  onmouseout=Bmove_out(this.name)></a></td></tr>
				<tr><td align="right"><a href="wedding.asp?uid=<%=uid%>&ms=1" onfocus="this.blur()"><img name="nav_3" border="0" src="images/nav_3.jpg" onmousemove=Bmove_in(this.name)  onmouseout=Bmove_out(this.name)></a></td></tr>
				<tr><td align="right"><a href="honeymoon.asp?uid=<%=uid%>&ms=1" onfocus="this.blur()"><img name="nav_4" border="0" src="images/nav_4.jpg" onmousemove=Bmove_in(this.name)  onmouseout=Bmove_out(this.name)></a></td></tr>
				<tr><td align="right"><a href="bless.asp?uid=<%=uid%>&ms=1" onfocus="this.blur()"><img name="nav_5" border="0" src="images/nav_5.jpg" onmousemove=Bmove_in(this.name)  onmouseout=Bmove_out(this.name)></a></td></tr>
			</table>
		</td></tr>
		<tr><td height="34" valign="top" style="padding:8 0 0 306"><img src="images/more.gif"></td></tr>
		<tr><td height="92" valign="top" style="padding:0 0 0 80"><%if rs.recordcount>0 then%><div id="scroll_main_1" style="position: absolute; overflow:hidden; width:300;" onmouseover="scrolling_stop_1();" onmouseout="mainFrame2_1();" ></div><%end if%></td></tr>
		<tr><td>
		<div style="position: absolute;">
		<table cellpadding="0" cellspacing="0">
		<tr><td colspan="4" height="8"></td></tr>
		<tr>
			<td width="81" height="81" background="../../images/man1.gif"></td>
			<td width="81" background="../../images/man2.gif"></td>
			<td width="81" background="../../images/man3.gif"></td>
			<td width="81" background="../../images/man4.gif"></td>
		</tr>
		</table>
		</div>
		<div style="position: absolute;"><table width="325" height="90" background="images/index_pic.gif"><tr><td></td></tr></table></div>
		</td></tr>
		</table>
	</td>
</tr>
</table>


<table width="100%" cellspacing="0" cellpadding="0">
<tr><td bgcolor="#CACCB7" align="right" class="copyright"><font color="#666666">Copyright &copy; 2004 <a target="_blank" href="Http://www.onlove.cn"><font color="#996633">www.onlove.cn</font></a> Inc. All rights reserved.&nbsp;&nbsp;&nbsp;</font></td></tr>
</table>

<script>
if (window.screen.width>=1024)
document.write("</td></tr></table>")
else
document.write("</div>")
</script>
</body>
<%if rs.recordcount>0 then%>
<%
response.write("<script>")
response.write("var con_1 = new Array();")
response.write("var num_1 = 0;")
xianshi=8		'显示条数

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") + "',14)+']'" + "+' " + CStr(datevalue(rs("msgdate"))) + " '+" + "'最新" + 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>

⌨️ 快捷键说明

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