recsave.asp

来自「本同学录系统演示地址: http://class.19870123.cn/ 」· ASP 代码 · 共 31 行

ASP
31
字号
<!-- #include file="../conndb.asp" -->
<!-- #include file="../class/Message.asp" -->
<html>
<head>
<title>保存用户信息</title>
</head>
<body>
<%
  '定义变量
  Dim sql, vFlag, vUserName, vSubject, vWords, vUpperId
  '从参数或表单中接收数据到变量中
  set obj = new Message
  obj.Poster = Request("name")
  obj.Subject = Request("Subject")
  obj.Words = Request("Words")
  obj.Face = CLng(Request("logo"))
  obj.UpperId = CLng(Request("UpperId"))  
  '生成当前时间
  obj.CreateTime = Now
  '插入新数据
  obj.insert()
  Response.Write "<h2>信息已成功保存!</h2>"
%>
</body>
<Script language="javascript">
  //打开此脚本的网页将被刷新
  opener.location.reload();
  //停留800毫秒后关闭窗口
  setTimeout("window.close()",800);
</Script>
</html>

⌨️ 快捷键说明

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