📄 main.asp
字号:
<% option explicit%>
<!--#Include file="connection.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>我的留言</title>
<style type="text/css">
<!--
.style3 {font-size: 12px; color: #333333; }
.style4 {
font-size: 12px;
color: #0099FF;
}
-->
</style>
<Script Language="JavaScript">
<!--
function check_Null(){
if (document.form1.user.value==""){
alert("你的姓名不能为空！");
return false;
}
if (document.form1.message.value==""){
alert("对不起，你还没有填写你留言的内容！");
return false;
}
return true;
}
// -->
</Script>
<link href="bx.css" rel="stylesheet" type="text/css">
</head>
<body>
<form name="form1" method="post" action="main.asp?make=add" onsubmit="JavaScript: return check_Null();">
<table width="528" height="319" border="1" align="center" cellpadding="4" cellspacing="0" bordercolor="#999999" style="border-collapse:collapse ">
<tr>
<td width="85"> </td>
<td width="421"> </td>
</tr>
<tr>
<td align="right"><span class="style3">姓名：</span></td>
<td class="style3"><input name="user" type="text" class="bx">
<span class="style4">*</span></td>
</tr>
<tr>
<td align="right"><span class="style3">性别：</span></td>
<td valign="middle"><input name="sex" type="radio" value="1" checked >
<img src="images/1.gif" width="40" height="40">
<input type="radio" name="sex" value="2">
<img src="images/2.gif" width="40" height="40"></td>
</tr>
<tr>
<td align="right"><span class="style3">主页：</span></td>
<td class="style3"><input name="url" type="text" class="bx" value="http://"></td>
</tr>
<tr>
<td align="right"><span class="style3">邮箱：</span></td>
<td class="style3"><input name="email" type="text" class="bx"></td>
</tr>
<tr>
<td align="right"><span class="style3">OICQ：</span></td>
<td class="style3"><input name="qq" type="text" class="bx"></td>
</tr>
<tr>
<td align="right"><span class="style3">电话：</span></td>
<td class="style3"><input name="tel" type="text" class="bx"></td>
</tr>
<tr>
<td align="right"><span class="style3">表情：</span></td>
<td valign="middle"><input name="bb" type="radio" value="s1" checked >
<img src="images/s1.gif" width="15" height="15"> <input type="radio" name="bb" value="s2">
<img src="images/s2.gif" width="15" height="15"> <input type="radio" name="bb" value="s3">
<img src="images/s3.gif" width="15" height="15"> <input type="radio" name="bb" value="s4">
<img src="images/s4.gif" width="15" height="15"> <input type="radio" name="bb" value="s5">
<img src="images/s5.gif" width="15" height="15"> <input type="radio" name="bb" value="s6">
<img src="images/s6.gif" width="15" height="15"></td>
</tr>
<tr>
<td align="right"><span class="style3">留言：</span></td>
<td class="style3"><textarea name="message" cols="50" rows="7" class="bx"></textarea>
<span class="style4">*</span></td>
</tr>
<tr align="center">
<td colspan="2" class="style3"><input name="Submit" type="submit" class="bx" value="提 交 留 言"></td>
</tr>
</table>
</form>
<%dim make
make=request("make")
if make="add" then
Dim user,sex,email,url,qq,tel,bb,message
user=Request.Form("user")
sex=Request.Form("sex")
email=Request.Form("email")
url=Request.Form("url")
qq=Request.Form("qq")
tel=Request.Form("tel")
bb=Request.Form("bb")
message=Request.Form("message")
dim sql
sql="insert into user(user,sex,email,url,qq,tel,bb,message,userdate) values('"&user&"','" &sex&"','" &email&"','"&url&"','"&qq&"','"&tel&"','"&bb&"','"&message&"',#"&date()&"#)"
db.Execute(sql)
response.Redirect"index.asp"
end if
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -