<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<!--#include file="../isadmin.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>

<body>
<%
action=request.Form("action")
if action="add" then
inforwriter=request.Form("inforwriter")
fromid=request.form("fromid")
infortypeid=request.Form("infortypeid")
infortitle=request.Form("infortitle")
inforcontent=request.Form("inforcontent")
totop=request.Form("totop")
keyword=request.Form("keyword")
sql="insert into notebook(inforwriter,fromid,infortypeid,infortitle,inforcontent,totop,keyword) values('"+inforwriter+"','"+fromid+"','"+infortypeid+"','"+infortitle+"','"+inforcontent+"',"+totop+",'"+keyword+"')"
conn.execute sql
response.Write("<script language='javascript'>alert('保存成功！');</script>")
response.redirect("addinfor.asp")
end if


%>
</body>
</html>
<%
conn.close
%>
