📄 orderform.asp
字号:
<%response.buffer=true%>
<!--#include file=conn/adodb.asp -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
</head>
<body>
<%
dim xm,tel,email,adress,speak,dm,y,m,d,h,mu,ss,ddh,fybm,xxlx
xxlx=session("xxlx")
xm=trim(request.form("xm"))
tel=trim(request.form("tel"))
email=trim(request.form("email"))
adress=trim(request.form("adress"))
speak=trim(request.form("speak"))
dm=now()
y=year(date)
mn=month(date)
d=day(date)
h=hour(time)
mu=minute(time)
ss=second(time)
ddh=ss&mn&h&d&mu&y
fybm=session("fybm")
session("fwbm")=fybm
session("ddh")=ddh
session("xm")=xm
session("tel")=tel
session("email")=email
session("adress")=adress
session("speak")=speak
dim sql,rs
sql="insert into orderform(ddhm,fybm,xxlx,name,tel,email,adress,speak,ddsj) values ('"& ddh &"','"& fybm &"','"& xxlx &"','"& xm &"','"& tel &"','"& email &"','"& adress &"','"& speak &"','"& dm &"')"
db.execute(sql)
response.redirect "yhdd.asp"
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -