📄 hy_liuyan.asp

📁 实现了

💻 ASP

字号:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<%
if session("user_namec")="" then
 response.end
 end if
%>
<!--#include file="conn.asp"-->
<%if request("action")="save" then
user_liuyan=request("user_liuyan")
user_namec=session("user_namec")
sql="select * from member_liuyan"
set rs=server.createobject("adodb.recordset")
        rs.open sql,conn,3,3
		id=rs("id")+1
        rs.addnew
		rs("id")=id
        rs("user_namec")=user_namec
		rs("user_liuyan")=user_liuyan
		rs.update
		response.Write("发表成功。感谢您给我们的意见")
    rs.close
	set rs=nothing
conn.close
set conn=nothing
	else
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>发表意见</title>
<style type="text/css">
<!--
body,td,th {
	font-size: 12px;
}
-->
</style></head>

<body>
<form name="form1" method="post" action="hy_liuyan.asp?action=save">
  <p align="center">给我们的意见 </p>
  <p align="center">
    <textarea name="user_liuyan" cols="60" rows="15" id="user_liuyan"></textarea>
  </p>
  <p align="center">
    <input type="submit" name="Submit" value="提交">
    <input type="reset" name="Submit2" value="重置">
</p>
</form>
</body>
</html>
<%
end if
%>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -