a25175_addxsfk.asp

来自「ASP学生网上评教系统」· ASP 代码 · 共 14 行

<!--#include file="a25175_conn.asp"-->
<%
	dim xsfk_depart,xsfk_teach,xsfk_term,xsfk_class,xsfk_title,xsfk_body,xsfk_date
	xsfk_depart=trim(request.Form("depart"))
	xsfk_teach=trim(request.Form("teach"))
	xsfk_term=trim(request.Form("addone_id"))
	xsfk_class=trim(request.Form("addtwo_id"))
	xsfk_title=trim(request.Form("xsfk_title"))
	xsfk_body=request.Form("xsfk_body")
	xsfk_body=replace(xsfk_body,chr(13),"<br>")
    strsql="insert into xsfk(xsfk_depart,xsfk_teach,xsfk_term,xsfk_class,xsfk_title,xsfk_body,xsfk_date) values('"&xsfk_depart&"','"&xsfk_teach&"',"&xsfk_term&",'"&xsfk_class&"','"&xsfk_title&"','"&xsfk_body&"','"&date()&"')"
    db.execute(strsql)
	response.write"<script>alert('你的反馈留言成功！');location='inctwo.asp'</script>"	
%>