faqaddsave.asp

来自「手机商城 网上购物 电子商务网上购物 手机销售终端」· ASP 代码 · 共 28 行

<!--#include file = "include/sysbase.asp"-->
<%
	   dim strSQL, cmdObj, rsObj

       Set cmdObj  =  Server.CreateObject("ADODB.Command")
       Set rsObj  =  Server.CreateObject("ADODB.RecordSet")
       cmdObj.CommandText  =  "SELECT top 1 * FROM faq ORDER by id desc"
       cmdObj.CommandType  =  adCmdText
       Set cmdObj.ActiveConnection  =  conn
       rsObj.Open cmdObj, , adOpenKeyset, adLockOptimistic
       rsObj.AddNew 
       rsObj("question")  = Request.Form("question")
       rsObj("answer")  = Request.Form("answer")
       rsObj.Update
       
       rsObj.Close
       set rsObj = nothing
       set cmdObj = nothing
       
       CloseConn()
%>
<script language = Javascript>
<!--
alert("添加成功！");
window.location = "faqList.asp"
-->
</script>