📄 index.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 from Wed_wedding where UID="&uid&" "
rs.Open sql,conn,3
bridegroom=rs("bridegroom")
bride=rs("bride")
announce=rs("announce")
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, ">", ">")
fString = Replace(fString, "<", "<")
fString = Replace(fString," ", " ")
fString = Replace(fString,"""", """)
'fString = Replace(fString,CHR(13), "<br>")
fString = Replace(fString, CHR(32), " ")
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">
<div align="center">
<table width="1004" height="768" cellspacing="0" cellpadding="0" style="background:url('images/index_bg_1024.jpg') no-repeat;">
<tr>
<!-- left -->
<td width="600" valign="top">
<table width="100%" cellspacing="0" cellpadding="0">
<tr><td height="282"></td></tr>
<%Set rs_main = Server.CreateObject("ADODB.Recordset")%>
<%sql = "select top 6 picsrc,pic_id,picext from Wed_pic_intro where uid="&uid&" and not(picseq is null) order by picseq desc "%>
<%rs_main.Open sql,conn,3%>
<tr><td height="152" style="padding:0 0 0 76"><table width="470"><tr>
<td>
<% if rs_main.eof then picname="empty.gif" else picname=rs_main("picsrc") & rs_main("pic_id") & "." & rs_main("picext") end if %>
<table background="../../images/wedding/kuan.gif" border="0" width="133" height="133"><tr><td valign="top" style="padding: 3 0 0 3">
<img width="120" height="120" src="/images/empty.gif" style="background-image: url('/userpic/small/<%=picname%>');background-position: center top;">
</td></tr></table>
<%if not(rs_main.eof) then
rs_main.movenext
end if%>
</td>
<td>
<% if rs_main.eof then picname="empty.gif" else picname=rs_main("picsrc") & rs_main("pic_id") & "." & rs_main("picext") end if %>
<table background="../../images/wedding/kuan.gif" border="0" width="133" height="133"><tr><td valign="top" style="padding: 3 0 0 3">
<img width="120" height="120" src="/images/empty.gif" style="background-image: url('/userpic/small/<%=picname%>');background-position: center top;">
</td></tr></table>
<%if not(rs_main.eof) then
rs_main.movenext
end if%>
</td>
<td>
<% if rs_main.eof then picname="empty.gif" else picname=rs_main("picsrc") & rs_main("pic_id") & "." & rs_main("picext") end if %>
<table background="../../images/wedding/kuan.gif" border="0" width="133" height="133"><tr><td valign="top" style="padding: 3 0 0 3">
<img width="120" height="120" src="/images/empty.gif" style="background-image: url('/userpic/small/<%=picname%>');background-position: center top;">
</td></tr></table>
<%if not(rs_main.eof) then
rs_main.movenext
end if%>
</td>
</tr></table></td></tr>
<tr><td height="152" style="padding:0 0 0 76"><table width="470"><tr>
<td>
<% if rs_main.eof then picname="empty.gif" else picname=rs_main("picsrc") & rs_main("pic_id") & "." & rs_main("picext") end if %>
<table background="../../images/wedding/kuan.gif" border="0" width="133" height="133"><tr><td valign="top" style="padding: 3 0 0 3">
<img width="120" height="120" src="/images/empty.gif" style="background-image: url('/userpic/small/<%=picname%>');background-position: center top;">
</td></tr></table>
<%if not(rs_main.eof) then
rs_main.movenext
end if%>
</td>
<td>
<% if rs_main.eof then picname="empty.gif" else picname=rs_main("picsrc") & rs_main("pic_id") & "." & rs_main("picext") end if %>
<table background="../../images/wedding/kuan.gif" border="0" width="133" height="133"><tr><td valign="top" style="padding: 3 0 0 3">
<img width="120" height="120" src="/images/empty.gif" style="background-image: url('/userpic/small/<%=picname%>');background-position: center top;">
</td></tr></table>
<%if not(rs_main.eof) then
rs_main.movenext
end if%>
</td>
<td>
<% if rs_main.eof then picname="empty.gif" else picname=rs_main("picsrc") & rs_main("pic_id") & "." & rs_main("picext") end if %>
<table background="../../images/wedding/kuan.gif" border="0" width="133" height="133"><tr><td valign="top" style="padding: 3 0 0 3">
<img width="120" height="120" src="/images/empty.gif" style="background-image: url('/userpic/small/<%=picname%>');background-position: center top;">
</td></tr></table>
<%if not(rs_main.eof) then
rs_main.movenext
end if%>
</td>
</tr></table></td></tr>
<tr><td height="57"></td></tr>
<tr><td style="padding:0 0 0 96">
<textarea cols="20" rows="5" name="a" style="border: 1px solid #CFCFCF; width:400px; 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="18"></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:#FFFFFF; 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:#DA4747"><%=bridegroom%>&<%=bride%></span>
<br><br>
<div align="right"><span style="font-family:Arial;color:#726464;font-weight:bold;"><%=date_legal%></span></div>
</div>
</td></tr>
<tr><td valign="top" height="423">
<map name="FPMap0">
<area onfocus="this.blur()" href="beauty.asp?uid=<%=uid%>&ms=1" shape="circle" coords="193, 62, 40">
<area onfocus="this.blur()" href="love.asp?uid=<%=uid%>&ms=1" shape="circle" coords="297, 147, 40">
<area onfocus="this.blur()" href="wedding.asp?uid=<%=uid%>&ms=1" shape="circle" coords="163, 191, 40">
<area onfocus="this.blur()" href="honeymoon.asp?uid=<%=uid%>&ms=1" shape="circle" coords="277, 286, 40">
<area onfocus="this.blur()" href="bless.asp?uid=<%=uid%>&ms=1" shape="circle" coords="123, 320, 40">
</map>
<img border="0" src="../../../images/empty.gif" width="345" height="385" usemap="#FPMap0">
</td></tr>
<tr><td valign="top" style="padding:0 0 0 310"><img src="images/more.gif"></td></tr>
<tr><td height="92" valign="top" style="padding:20 0 0 98"><%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>
</table>
</td>
</tr>
</table>
<table width="1004" height="1" cellspacing="0" cellpadding="0"><tr><td></td></tr></table>
<table width="1004" cellspacing="0" cellpadding="0">
<tr><td bgcolor="#FFDFDF" align="right" class="copyright"><font color="#666666">Copyright © 2004 <a target="_blank" href="Http://www.onlove.cn"><font color="#666666">www.onlove.cn</font></a> Inc. All rights reserved. </font></td></tr>
</table>
</div>
</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 + -