📄 honeymoon.asp
字号:
<!--#include file="../../../js/conn.asp"-->
<!--#include file="safety.asp"-->
<%
set rs1 = Server.CreateObject("ADODB.Recordset")
sql = "select tourtitle,tourno from wed_honeymoon where UID="&uid&" order by id desc "
rs1.Open sql,conn,3
if rs1.recordcount>0 then
if request("tourno")="" then
tourno=rs1("tourno")
else
tourno=Cint(request("tourno"))
end if
set rs2 = Server.CreateObject("ADODB.Recordset")
sql = "select tourintro,albumty_tour,picwrite_tour from wed_honeymoon where UID="&uid&" and tourno="&tourno&" "
rs2.Open sql,conn,3
albumty = rs2("albumty_tour")
picwrite = rs2("picwrite_tour")
end if
'查询该页面的图片
tyno="3" & tourno
sql_wed_pic_intro = "select * from wed_pic_intro where uid="&uid&" and tyno='"&tyno&"' "
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
%>
<!--#include file="../../wed_album_addnew.asp"-->
<html>
<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">
<link href="../../wed_album.css" rel="stylesheet" type="text/css">
<SCRIPT LANGUAGE=JavaScript SRC="../../wed_album.js"></script>
<style>
.tour_intro {color:#765541; line-height:140%;}
</style>
<title>婚礼在线</title>
</head>
<body topmargin="0" leftmargin="0" marginwidth="0" marginheight="0" onload="moveinit()">
<div align="center">
<!--#include file="menu.asp"-->
<br>
<table width="750" height="6" cellspacing="0" cellpadding="0" background="images/honeymoon_bg1.gif"><tr><td></td></tr></table>
<table width="750" cellspacing="0" cellpadding="0" background="images/honeymoon_bg2.gif"><tr>
<td width="218" valign="top">
<table width="100%" cellspacing="0" cellpadding="0">
<tr><td align="center" style="padding:10 0 6 7"><img src="images/honeymoon_left.gif"></td></tr>
<tr><td align="center" valign="top">
<table width="172" cellspacing="0" cellpadding="0" border="1" bordercolor="#DCD0E0" bgcolor="#FFFFFF" style="border-collapse: collapse" >
<tr><td style="padding-bottom:10">
<table width="width" cellpadding="0" cellspacing="0">
<tr><td height="8" colspan="2"></td></tr>
<%for i=1 to rs1.recordcount%>
<tr><td width="16" height="20" valign="top" style="padding-top:3"><img src="/images/root/no<%if rs1("tourno")=tourno then%>2<%else%>3<%end if%>_<%=i%>.gif" hspace="5"></td><td><a href="honeymoon.asp?uid=<%=uid%>&tourno=<%=rs1("tourno")%>"><font color="#8758D6"><%if rs1("tourno")=tourno then%><font color="#FF6633"><u><%end if%><%=rs1("tourtitle")%></u></font></a></td></tr>
<%rs1.movenext%>
<%if rs1.eof then%>
<%exit for%>
<%end if%>
<%next%>
<tr><td height="10" colspan="2"></td></tr>
</table>
</td></tr>
</table>
</td></tr>
<tr><td height="30"></td></tr>
</table>
</td>
<td valign="top" style="padding:6 0 0 28">
<table cellspacing="0" cellpadding="0">
<tr><td><img src="images/honeymoon_right.gif"></td></tr>
<tr><td style="padding:16 8 10 8" class="tour_intro"><%if rs1.recordcount>0 then%><%=EncodeTxt(rs2("tourintro"))%><%end if%></td></tr>
</table>
</td>
</tr></table>
<table width="750" height="6" cellspacing="0" cellpadding="0" background="images/honeymoon_bg3.gif"><tr><td></td></tr></table>
<br>
<a name="5"></a>
<img src="images/title_4.gif">
<%if rs.recordcount>0 then%>
<!--#include file="../../wed_album_view.asp"-->
<br><br><br>
<%end if%>
<!--#include file="bottom.asp"-->
</div>
</body>
<%
conn.close
set conn=nothing
%>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -