📄 book.asp
字号:
<!--#include file="Inc/syscode.asp" -->
<!--#include file="head.asp" -->
<link href="css/css.css" rel="stylesheet" type="text/css">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center" valign="top"><table width="850" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="30" valign="top" background="Style/<%=Root%>/cont_left_bg01.gif"><img src="Style/<%=Root%>/cont_left_img01.gif" width="30" height="431"></td>
<td style="padding-top:9px; " width="787" valign="top"><table width="787" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="207" align="left" valign="top" class="top_m_txt01"><table width="200" border="0" cellspacing="0" cellpadding="0">
<tr>
<td valign="top"><table width="200" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="Style/<%=Root%>/left_cp_tit.gif" width="200" height="67"></td>
</tr>
<tr>
<td height="142" align="center" valign="top" background="Style/<%=Root%>/left_bg01.gif"><% call ShowSmallClass_Tree() %></td>
</tr>
<tr>
<td><img src="Style/<%=Root%>/left_img01.gif" width="200" height="20"></td>
</tr>
</table></td>
</tr>
<tr>
<td><table width="200" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="63" valign="bottom"><img src="Style/<%=Root%>/left_tc_tit.gif" width="200" height="51"></td>
</tr>
<tr>
<td height="182" align="center" background="Style/<%=Root%>/left_bg02.gif"><table width="80%" border="0" cellspacing="0" cellpadding="0"> <tr> <td align="center"><% call ShowVote() %></td> </tr> </table></td>
</tr>
<tr>
<td><img src="Style/<%=Root%>/left_img02.gif" width="200" height="8"></td>
</tr>
</table></td>
</tr>
<tr>
<td valign="top"><table width="188" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="60" align="right" valign="bottom"><a href="about.asp"><img src="Style/<%=Root%>/left_img04.gif" width="175" height="47" border="0"></a></td>
</tr>
<tr>
<td height="51" align="right" valign="bottom"><a href="Culture.asp"><img src="Style/<%=Root%>/left_img05.gif" width="175" height="47" border="0"></a></td>
</tr>
<tr>
<td height="51" align="right" valign="bottom"><a href="Honor.asp"><img src="Style/<%=Root%>/left_img06.gif" width="175" height="47" border="0"></a></td>
</tr>
<tr>
<td height="70" align="left" valign="bottom"><a href="Contact.asp"><img src="Style/<%=Root%>/xsrx_img.gif" width="185" height="51" border="0"></a></td>
</tr>
</table></td>
</tr>
</table></td>
<td valign="top"><table width="580" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="Style/<%=Root%>/cont_img01.gif" width="580" height="17"></td>
</tr>
<tr>
<td valign="top"><table width="580" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="9" background="Style/<%=Root%>/cont_tbl01_bg01.gif"></td>
<td align="center" valign="top"><table width="540" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="45" align="left" valign="top"><img src="Style/<%=Root%>/ykly.gif" width="298" height="36"></td>
</tr>
<tr>
<td valign="top"><table width="540" border="0" cellspacing="0" cellpadding="0">
<tr>
<td colspan="3"><img src="Style/<%=Root%>/gsjs_img01.gif" width="540" height="19"></td>
</tr>
<tr>
<td width="22" valign="top" background="Style/<%=Root%>/gsjs_left_bg01.gif"><img src="Style/<%=Root%>/gsjs_img03.gif" width="22" height="149"></td>
<td width="498" rowspan="2" valign="top"><table width="498" border="0" cellspacing="0" cellpadding="0">
<tr>
<td style="padding-top:10px; " height="598" align="left" valign="top" class="top_m_txt01">
<% dim rndnum,verifycode
Randomize
Do While Len(rndnum)<4
num1=CStr(Chr((57-48)*rnd+48))
rndnum=rndnum&num1
loop
session("verifycode")=rndnum
%>
<%
if Request("work")="add" then
verifycode=trim(Request.Form("verifycode"))
verifycode2=trim(Request.Form("verifycode2"))
if verifycode<>verifycode2 then
Response.Write "<SCRIPT LANGUAGE='JavaScript'>"
Response.Write "alert('验证码错误！');"
Response.Write "history.go(-1);"
Response.Write "</SCRIPT>"
else
session("verifycode")=""
set rs=server.createobject("adodb.recordset")
sql="select * from liuyan"
rs.open sql,conn,3,3
rs.addnew
rs("B_name") =Request("B_name")
rs("B_msn") =Request("B_msn")
rs("B_mail") =Request("B_mail")
rs("B_tel") =Request("B_tel")
rs("B_dom") =Request("B_dom")
rs.update '更新数据表记录
Response.Redirect "book.asp"
End IF
End if
%>
<table width="100%" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#CCCCCC">
<tr>
<td width="100%" bgcolor="#FFFFFF">认真填写以下留言 |</td>
</tr>
<tr>
<td bgcolor="#FFFFFF"><TABLE class=tdtop cellSpacing=0 cellPadding=0 width=100% align=center
border=0>
<TBODY>
<TR>
<TD><TABLE cellSpacing=0 cellPadding=3 width=100% align=center border=0>
<FORM name=Form1 action=book.asp method=post>
<TBODY>
<TR>
<TD width="37" align="left"><DIV align=right>昵称:</DIV></TD>
<TD width="137" align="left"><INPUT name=B_name id=B_name size="15" maxLength=20>
<FONT
color=#ff6600>*</FONT></TD>
<TD vAlign=top width=398 rowSpan=7> 留言内容:<BR>
<TABLE cellSpacing=0 cellPadding=0 width="71%" border=0>
<TBODY>
<TR>
<TD><TEXTAREA class=ss1 id=B_dom name=B_dom rows=7 wrap=VIRTUAL cols=55></TEXTAREA></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD align="left"><DIV align=right>Q Q: </DIV></TD>
<TD align="left"><INPUT name=B_msn id=B_msn size="15" maxLength=20>
<FONT
color=#ff6600>*</FONT></TD>
</TR>
<TR>
<TD align="left"><DIV align=right>邮箱: </DIV></TD>
<TD align="left"><INPUT name=B_mail id=B_mail size="15" maxLength=30>
<FONT
color=#ff6600>*</FONT></TD>
</TR>
<TR>
<TD align="left"><DIV align=right>电话: </DIV></TD>
<TD align="left"><INPUT name=B_tel id=B_tel size="15" maxLength=20>
<FONT
color=#ff6600>*</FONT></TD>
</TR>
<TR>
<TD align="left"><DIV align=right>验证: </DIV></TD>
<TD><input name="verifycode" type="text" id="verifycode" size="5">
<span class="style11"><span class="style2"><%=session("verifycode")%> </span><font color="#000000">
<input type="hidden" name="verifycode2" value="<%=session("verifycode")%>">
</font> </span></TD>
</TR>
<TR>
<TD colSpan=2><DIV align=center>
<input type="button" name="Submit" value="提交留言" onClick="check()">
<INPUT id=work type=hidden value=add name=work>
</DIV></TD>
</TR>
</FORM>
</TABLE></TD>
</TR>
</TBODY>
</TABLE></td>
</tr>
<tr>
<td bgcolor="#FFFFFF"><TABLE class=tdtop cellSpacing=0 cellPadding=0 width=100% align=center border=0>
<TBODY>
<TR>
<form name="form1" method="post" action="book.asp">
<TD>搜索内容:
<INPUT id=shou name=shou>
<INPUT class=STYLE1 type=submit value=搜索 name=Submit3></TD>
</form>
</TR>
</TBODY>
</TABLE></td>
</tr>
<tr>
<td bgcolor="#FFFFFF"><TABLE cellSpacing=0 cellPadding=5 width=100% align=center border=0>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -