📄 form.asp

📁 伤心森林留言本 MD5 校验: 6fba55b713119dfa46a8118a09845643
💻 ASP
字号:
<!--#include file="Master.asp" -->
<%
User = Request("User")
Pwd = Request("Pwd")
Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("Data.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath

If User = "" And Pwd = "" Then
Else
If User = Master Then
   If Pwd = Password Then
      Link = "?User=" & User & "&Pwd=" & Pwd
   Else
      Response.Write "<CENTER><B>资料错误！您不是版主！</B>"
      Response.End
   End If
Else
   Response.Write "<CENTER><B>资料错误！您不是版主！</B>"
   Response.End
End If
End If
%>
<HTML>
<HEAD>
<TITLE><% =Title %></TITLE>
<STYLE type="text/css">
<!--
A{text-decoration:none}
TEXTAREA,td,a,input,i,Body,select{font-size:9pt}
TEXTAREA,input,select{color:#111111;background-color:#fefdfa}
INPUT,TEXTAREA,select{border-left:1 solid #888888;border-right:1 solid #C0C0C0;border-top:1 solid #888888;border-bottom:1 solid #C0C0C0}
-->
</STYLE>
</HEAD>
<BODY BGCOLOR="#FFFFFF" TEXT="#000000" LINK="ORANGE" ALINK="ORANGE" VLINK="ORANGE"><CENTER> 
<BR>
<a href="Index.asp<% =Link %>"><img src="fh.gif" width="88" height="31" border="0"></a><b><a href="Login.html"><img src="gl.gif" width="88" height="31" border="0"></a></b><FORM action="GForm.asp" method="post"> 
<TABLE BORDER="0" cellpadding="0" cellspacing="0">
<TR>

<TD><IMG SRC="BUTTOM-B.GIF"> 留言方法：</TD>
<TD><INPUT TYPE="RADIO" Name="Event" VALUE="1" CHECKED>一般留言</TD>
<TD><INPUT TYPE="RADIO" Name="Event" VALUE="0">给版主的悄悄话</TD>

</TR>
<TR>

<TD><IMG SRC="BUTTOM-B.GIF"> 您的姓名：</TD>
<TD COLSPAN="2"><INPUT TYPE="TEXT" Name="Name" SIZE="36"></TD>

</TR>
<TR>

<TD><IMG SRC="BUTTOM-B.GIF"> 您的性别：</TD>
<TD><INPUT TYPE="RADIO" Name="Sex" VALUE="Man">男</TD>
<TD><INPUT TYPE="RADIO" Name="Sex" VALUE="Female">女</TD>

</TR>
<TR>

<TD><IMG SRC="BUTTOM-B.GIF"> 您的职业：</TD>
<TD COLSPAN="2"><select Name="Job">
<option>教师
<option>学生
<option>上班族
<option>军警
<option>公务员
<option>服务业
<option>金融业
<option>资讯业
<option>出版业
<option>作家
<option>农业
<option>工业
<option>商业
<option>娱乐业
<option>演艺业
<option>自由业
<option>其它
</select></TD>

</TR>
<TR>

<TD><IMG SRC="BUTTOM-B.GIF"> 您的心情：</TD>
<TD COLSPAN="2"><select Name="Face">
<option VALUE="1">普通
<option VALUE="2">开心
<option VALUE="3">傻笑
<option VALUE="4">伤心
<option VALUE="5">生气
</select></TD>

</TR>
<TR>

<TD><IMG SRC="BUTTOM-B.GIF"> 电子邮件：</TD>
<TD COLSPAN="2"><INPUT TYPE="TEXT" Name="Email" SIZE="36"></TD>

</TR>
<TR>

<TD><IMG SRC="BUTTOM-B.GIF"> 主页地址：</TD>
<TD COLSPAN="2"><INPUT TYPE="TEXT" Name="HomePage" VALUE="http://" SIZE="36"></TD>

</TR>
<TR>

<TD COLSPAN="3"><IMG SRC="BUTTOM-B.GIF"> 留言内容：</TD></TR><TR>
<TD COLSPAN="3"><TEXTAREA Name="Memo" ROWS="6" COLS="48"></TEXTAREA></TD>

</TR>
<TR>
<INPUT TYPE="HIDDEN" NAME="User" VALUE="<% =User %>">
<INPUT TYPE="HIDDEN" NAME="Pwd" VALUE="<% =Pwd %>">
<TD COLSPAN="3">
<INPUT TYPE="Submit" VALUE="确定送出">
<INPUT TYPE="Reset" VALUE="清除重写">
</TD>

</TR>
</TABLE><BR>
<FONT COLOR="#808080">伤心森林留言本V1.5</FONT> 
</BODY>
</HTML>
⌨️ 快捷键说明

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