📄 zzulinsave.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file=DataBase/conn.asp-->
<%
if request("carsname")<>"" and request("UserName")<>"" and request("Phone")<>"" and request("Fax")<>"" and request("Email")<>"" and request("Hander")<>"" and request("Address")<>"" and request("Numbers")<>"" then
StartTime=request("nian")&"-"&request("yue")&"-"&request("ri")
EndTime=request("nian1")&"-"&request("yue1")&"-"&request("ri1")
set rs=server.CreateObject("adodb.recordset")
sql="select * from tb_Tenancy"
rs.open sql,conn,1,3
rs.addnew
rs("CarsName")=request("carsname")
rs("UserName")=request("UserName")
rs("Phone")=request("Phone")
rs("Fax")=request("Fax")
rs("Email")=request("Email")
rs("Hander")=request("Hander")
rs("Address")=request("Address")
rs("Numbers")=request("Numbers")
rs("StartTime")=StartTime
rs("EndTime")=EndTime
rs("IssueDate")=date()
rs("Whether")="未授理"
rs.update
rs.close
response.Write("<script language=javascript>alert('订单提交成功');window.close()</script>")
else
response.Write("<script language=javascript>alert('请把信息填写完整');location='javascript:history.go(-1)'</script>")
end if
%>
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -