ordersave.asp

人民医院眼科全站

<!-- #include file="bkconn.asp"-->
<%
dim sql
       Set cmdTemp = Server.CreateObject("ADODB.Command")
       Set InsertCursor = Server.CreateObject("ADODB.Recordset")
       cmdTemp.CommandText = "SELECT top 1 * FROM orders order by id desc"
       cmdTemp.CommandType = 1
       Set cmdTemp.ActiveConnection = conn
       InsertCursor.Open cmdTemp, , 1, 3
       InsertCursor.addnew 
       InsertCursor("name") =Request("name")
       InsertCursor("tel") =Request("tel")
	   InsertCursor("email") =Request("email")
	   InsertCursor("address") =Request("address")
	   InsertCursor("type") =Request("type")
	   InsertCursor("content") =Request("content")
	   dim data1,data2,data3,datatime
	   data1=request("data1")
       data2=request("data2")
	   data3=request("data3")
	   datatime=data1&data2&data3	   
	   InsertCursor("datatime") =datatime
       InsertCursor.Update
'	   response.write InsertCursor("id")
'	   response.End
'	   InsertCursor.movelast
%>
<script language=Javascript>
<!--
alert("提交成功！");
window.location="order.asp"
-->
</script>
<%
       InsertCursor.close
	   conn.close
       set InsertCursor=nothing
       set conn=nothing
%>