taolunchkdata.asp

是一种自动化办公软件

<!--#include file="conn.asp"-->

<%
dim rs,title,content,author,select1,sql
title=request.Form("title")
author=request.Form("author")
select1=request.Form("select1")
content=request.Form("content")
id=request.QueryString("id")
sql ="insert into taolun (class,author,select1,content) values ('"&title&"','"&author&"','"&select1&"','"&content&"')"
'response.write(sql)
conn.execute(sql)
conn.close
set conn=nothing                      
if request.Form("title") = "1" then                    
response.Write "<script lanuage=javascript>alert('信息发布成功');window.location='TaolunContent.asp'</script>"
elseif request.Form("title") = "2" then                    
response.Write "<script lanuage=javascript>alert('信息发布成功');window.location='TaolunContent2.asp'</script>"
elseif request.Form("title") = "3" then                    
response.Write "<script lanuage=javascript>alert('信息发布成功');window.location='TaolunContent3.asp'</script>"
elseif request.Form("title") = "4" then                    
response.Write "<script lanuage=javascript>alert('信息发布成功');window.location='TaolunContent4.asp'</script>"
end if
%>