<!--#include file="conn.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>网上祭奠演示版</title>
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
.style2 {
	font-size: 24px;
	color: #FFFFFF;
	font-family: "幼圆", "方正综艺繁体";
	font-weight: bold;
}
-->
</style>
<link href="4.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style3 {color: #FFFFFF}
-->
</style>
</head>

<body>
<%
dim rs3,sql3
set rs3=server.createobject("adodb.recordset")
sql3="select * from ly order by id desc"
rs3.open sql3,conn,1,3
%>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#07186A">
  <tr>
    <td width="432"><img src="image/mo_r1_c1.jpg" width="432" height="83"></td>
    <td width="346">&nbsp;</td>
  </tr>
  <tr>
    <td height="40" colspan="2">&nbsp;</td>
  </tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#07186A">
  <tr>
    <td width="22" height="303">&nbsp;</td>
    <td width="144" valign="top">
	<table width="96" border="0" align="right" cellpadding="0" cellspacing="10">
      <tr>
        <td>&nbsp;</td>
      </tr>
	  <tr>
        <td><a href="mobei.asp"><img src="image/mo_r4_c2.jpg" width="69" height="25" border="0"></a></td>
      </tr>
      <tr>
        <td><a href="pic.asp"><img src="image/mo_r6_c2.jpg" width="69" height="25" border="0"></a></td>
      </tr>
      <tr>
        <td><a href="index.asp"><img src="image/mo_r8_c2.jpg" width="69" height="25" border="0"></a></td>
      </tr>
      <tr>
        <td><a href="dl.asp"><img src="image/mo_r10_c2.jpg" width="69" height="25" border="0"></a></td>
      </tr>
      <tr>
        <td><a href="Login.asp"><img src="image/mo_r4_c3.jpg" width="69" height="25" border="0"></a></td>
      </tr>
    </table>
    <div align="right"></div></td>
    <td width="53" height="303">&nbsp;</td>
    <td width="262" height="303" background="image/mo_r3_c4.jpg"><table width="50%"  border="0" align="center" cellpadding="0" cellspacing="5">
      <tr>
        <td><div align="center"><img src="image/20045289389.jpg" width="100" height="100"></div></td>
      </tr>
    </table></td>
    <td width="22">&nbsp;</td>
    <td width="205" height="303" background="image/mo_r3_c20.jpg"><table width="80%"  border="0" align="center" cellpadding="0" cellspacing="5">
      <tr>
        <td><p class="style3"> 已逝者姓名：春风君<br>
              逝者生辰：1980 <br>
              逝者祭日：1314 <br>
              国籍：中国 <br>
              籍贯：汉 <br>
              宗教：佛教 <br>
          职业：CEO </p>          </td>
      </tr>
    </table></td>
    <td width="70">&nbsp;</td>
  </tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#07186A">
  <tr>
    <td><table width="32%" border="0" align="center" cellpadding="0" cellspacing="15">
      <tr>
        <td width="8%"><a href="more1.asp" target="_blank"><img src="image/a.gif" width="29" height="29" border="0"></a></td>
        <td width="8%"><a href="more2.asp" target="_blank"><img src="image/f.gif" width="29" height="29" border="0"></a></td>
        <td width="8%"><a href="more3.asp" target="_blank"><img src="image/e.gif" width="29" height="29" border="0"></a></td>
        <td width="8%"><a href="more4.asp" target="_blank"><img src="image/c.gif" width="29" height="29" border="0"></a></td>
        <td width="8%"><a href="more5.asp" target="_blank"><img src="image/f.jpg" width="29" height="29" border="0"></a></td>
        <td width="8%"><a href="more6.asp" target="_blank"><img src="image/b.jpg" width="29" height="29" border="0"></a></td>
        <td width="52%"><a href="more7.asp" target="_blank"><img src="image/d.jpg" width="29" height="29" border="0"></a></td>
        </tr>
    </table></td>
  </tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#07186A">
  <tr>
    <td class="style2"><img src="image/mo_r15_c2.gif" width="172" height="33"></td>
  </tr>
  <tr>
    <td valign="top"><%
	dim b,currentpage
	rs3.pagesize=5
	currentpage=Clng(request("page"))
	if currentpage<1 then currentpage=1
	if currentpage>rs3.pagecount then currentpage=rs3.pagecount
	if not rs3.eof then
	rs3.absolutepage=currentpage
	end if
	b=1
    while not rs3.eof and b<=rs3.pagesize
%>
      <table width="500" height="106" border="0" align="center" cellpadding="0" cellspacing="0" background="image/2bk.gif">
        <tr> 
          <td width="111" rowspan="2"><div align="center" class="style3"><font size="2"><b> 
              <%
dim imgsrc
Select Case rs3("mainclass")
  Case 1
    Select Case rs3("class1")
    case 1
    Response.Write ("<img src=""image/1/item1.jpg"" width=""80"" height=""80"">")
    case 2
	Response.Write ("<img src=""image/1/item2.jpg"" width=""80"" height=""80"">")
	case 3
	Response.Write ("<img src=""image/1/item3.jpg"" width=""80"" height=""80"">")
	case 4
	Response.Write ("<img src=""image/1/item4.jpg"" width=""80"" height=""80"">")
	case 5
	Response.Write ("<img src=""image/1/item5.jpg"" width=""80"" height=""80"">")
	case 6
	Response.Write ("<img src=""image/1/item6.jpg"" width=""80"" height=""80"">")
	case 7
	Response.Write ("<img src=""image/1/item7.jpg"" width=""80"" height=""80"">")
	case 8
	Response.Write ("<img src=""image/1/item8.jpg"" width=""80"" height=""80"">")
	case 9
	Response.Write ("<img src=""image/1/item9.jpg"" width=""80"" height=""80"">")
  End Select  
Case 2
    Response.Write ("<img src=""image/5/2.gif"">")
Case 3
    Select Case rs3("class3")
    case 1
    Response.Write ("<img src=""image/2/food1.jpg"" width=""80"" height=""80"">")
    case 2
	Response.Write ("<img src=""image/2/food2.jpg"" width=""80"" height=""80"">")
	case 3
	Response.Write ("<img src=""image/2/food3.jpg"" width=""80"" height=""80"">")
	case 4
	Response.Write ("<img src=""image/2/food4.jpg"" width=""80"" height=""80"">")
	case 5
	Response.Write ("<img src=""image/2/food5.jpg"" width=""80"" height=""80"">")
	case 6
	Response.Write ("<img src=""image/2/food6.jpg"" width=""80"" height=""80"">")
	case 7
	Response.Write ("<img src=""image/2/food7.jpg"" width=""80"" height=""80"">")
	case 8
	Response.Write ("<img src=""image/2/food8.jpg"" width=""80"" height=""80"">")
	case 9
	Response.Write ("<img src=""image/2/food9.jpg"" width=""80"" height=""80"">")
    End Select  

Case 4
    Select Case rs3("class4")
    case 1
    Response.Write ("<img src=""image/5/1.gif"" width=""80"" height=""80"">")
    case 2
	Response.Write ("<img src=""image/5/3.gif"" width=""80"" height=""80"">")
	case 3
	Response.Write ("<img src=""image/5/4.gif"" width=""80"" height=""80"">")
	case 4
	Response.Write ("<img src=""image/5/6.gif"" width=""80"" height=""80"">")
	case 5
	Response.Write ("<img src=""image/5/7.gif"" width=""80"" height=""80"">")
    End Select 

Case 5
    Select Case rs3("class5")
    case 1
    Response.Write ("<img src=""image/6/1.jpg"" width=""80"" height=""80"">")
    case 2
	Response.Write ("<img src=""image/6/2.jpg"" width=""80"" height=""80"">")
	case 3
	Response.Write ("<img src=""image/6/3.jpg"" width=""80"" height=""80"">")
	case 4
	Response.Write ("<img src=""image/6/4.jpg"" width=""80"" height=""80"">")
	case 5
	Response.Write ("<img src=""image/6/5.jpg"" width=""80"" height=""80"">")
	case 6
	Response.Write ("<img src=""image/6/6.jpg"" width=""80"" height=""80"">")
	case 7
	Response.Write ("<img src=""image/6/7.jpg"" width=""80"" height=""80"">")
	case 8
	Response.Write ("<img src=""image/6/8.jpg"" width=""80"" height=""80"">")
	case 9
	Response.Write ("<img src=""image/6/9.jpg"" width=""80"" height=""80"">")
    End Select
Case 6
    Select Case rs3("class6")
    case 1
    Response.Write ("<img src=""image/7/1.jpg"" width=""80"" height=""80"">")
    case 2
	Response.Write ("<img src=""image/7/2.jpg"" width=""80"" height=""80"">")
	case 3
	Response.Write ("<img src=""image/7/3.jpg"" width=""80"" height=""80"">")
	case 4
	Response.Write ("<img src=""image/7/4.jpg"" width=""80"" height=""80"">")
	case 5
	Response.Write ("<img src=""image/7/5.jpg"" width=""80"" height=""80"">")
	case 6
	Response.Write ("<img src=""image/7/6.jpg"" width=""80"" height=""80"">")
	case 7
	Response.Write ("<img src=""image/7/7.jpg"" width=""80"" height=""80"">")
	case 8
	Response.Write ("<img src=""image/7/8.jpg"" width=""80"" height=""80"">")
	case 9
	Response.Write ("<img src=""image/7/9.jpg"" width=""80"" height=""80"">")
   End Select
Case 7
    Select Case rs3("class7")
    case 1
    Response.Write ("<img src=""image/4/1.jpg"" width=""80"" height=""80"">")
    case 2
	Response.Write ("<img src=""image/4/2.jpg"" width=""80"" height=""80"">")
	case 3
	Response.Write ("<img src=""image/4/3.jpg"" width=""80"" height=""80"">")
	case 4
	Response.Write ("<img src=""image/4/4.jpg"" width=""80"" height=""80"">")
	case 5
	Response.Write ("<img src=""image/4/5.jpg"" width=""80"" height=""80"">")
	case 6
	Response.Write ("<img src=""image/4/6.jpg"" width=""80"" height=""80"">")
	case 7
	Response.Write ("<img src=""image/4/7.jpg"" width=""80"" height=""80"">")
	case 8
	Response.Write ("<img src=""image/4/8.jpg"" width=""80"" height=""80"">")
	case 9
	Response.Write ("<img src=""image/4/9.jpg"" width=""80"" height=""80"">")
   End Select  
End Select
%>
              </b></font></div></td>
          <td width="255" height="37" valign="middle">
<table width="92%" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td class="style3">网友：<%= rs3("lyname") %></td>
              </tr>
          </table> </td>
          <td width="134" valign="middle"> 
            <table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td class="style3"><%= rs3("riqi") %></td>
              </tr>
          </table></td>
        </tr>
        <tr> 
          <td colspan="2" valign="top"> 
            <table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td class="style3">附言：<br>&nbsp;&nbsp;<%= mid(rs3("comment"),1,50) %> </td>
              </tr>
            </table>          </td>
        </tr>
      </table>
<%
	  rs3.movenext
	 b=b+1
	  wend
%>
<form name="form1" method="post" action="dl.asp">
        <table width="90%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#07186A">
          <tr> 
<td><div align="right" > 
                <p class="newtext"><font color=#000000>悼念活动总数:</font><font color=red><%=rs3.recordcount%></font></span><font color="#000000"> 
                  |&nbsp;&nbsp;<a href=dl.asp>首页</a>&nbsp;| <a href=dl.asp?page=<%=currentpage-1%>> 
                  上一页</a>&nbsp;| <a href=dl.asp?page=<%=currentpage+1%>> 下一页</a> 
                  | <a href=dl.asp?page=<%=rs3.pagecount%>>末页</a>&nbsp; &nbsp;</font>&nbsp; 
                </p>
</div>
</td>
</tr>
</table>
</form></td>
  </tr>
</table>
</body>
</html>
