📄 save_onlinedd.asp
字号:
<!--#include file=config.asp-->
<%
dim rs,sql,bz,ddh
ddh=replace(now(),left(now(),2),"")
ddh=replace(ddh,"-","")
ddh=replace(ddh,":","")
ddh=replace(ddh," ","")
ddh="dd" & ddh
bz=request("bz")
bz=replace(bz," "," ")
bz=replace(bz,chr(13)&chr(10),"<Br>")
sql="select * from [onlinedd]"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,3
rs.addnew
rs("ddh")=ddh
rs("company")=request("company")
rs("man")=request("man")
rs("fax")=request("fax")
rs("tel")=request("tel")
rs("email")=request("email")
rs("address")=request("address")
rs("xm")=request("type")
rs("mokuai")=request("module")
rs("bz")=bz
rs("pay")=request("min_pay") & "~" & request("max_pay")
rs("date")=now()
rs("finish_date")=request("finish_date")
rs("pass")="否"
rs.update
%>
<%
dim fso,f,forappending
forappending=8
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile(Server.Mappath("../system/admin/remove.txt"), forappending, True)
f.WriteLine request("email")
f.Close()
set f=nothing
set fso=nothing
%>
<html>
<head>
<title>请填写在线订单</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../style.css" type="text/css">
</head>
<style>.tm { border: 1px #FCFFEE solid;BACKGROUND: #FCFFEE;FONT-SIZE: 9pt ;color: #FCFFEE; FONT-FAMILY: arial}</style>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0">
<br>
<br>
<table width="336" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td align="center" valign="middle" height="40" class="font">恭喜您！您已成功向我们下了订单。<br>
请记住您的订单号，以方便以后查询！</td>
</tr>
</table>
<table width="336" border="0" cellspacing="2" cellpadding="0" class="xu_kuan" align="center">
<tr valign="middle" bgcolor="#FFF0B5">
<td height="38" colspan="2" align="center" class="font">订 单 号：<font color=red><%=rs("ddh")%></font></td>
</tr>
<tr valign="middle" bgcolor="#FCFFEE">
<td class="font" align="center" width="111">预定日期：</td>
<td class="font" align="left" width="449" height="30"><%=rs("date")%></td>
</tr>
<tr valign="middle" bgcolor="#FCFFEE">
<td class="font" align="center" width="111">公司名称：</td>
<td class="font" align="left" height="30" width="449"><font color=red><%=rs("company")%></font></td>
</tr>
<tr valign="middle" bgcolor="#FCFFEE">
<td class="font" align="center" width="111">姓 名：</td>
<td class="font" align="left" height="30" width="449"><%=rs("man")%></td>
</tr>
<tr valign="middle" bgcolor="#FCFFEE">
<td class="font" align="center" width="111">电 话：</td>
<td class="font" align="left" height="30" width="449"><%=rs("tel")%></td>
</tr>
<tr valign="middle" bgcolor="#FCFFEE">
<td class="font" align="center" width="111">Ｅ－mail：</td>
<td class="font" align="left" height="30" width="449"><%=rs("email")%></td>
</tr>
<tr valign="middle" bgcolor="#FCFFEE">
<td class="font" align="center" width="111">类 型：</td>
<td class="font" align="left" height="30" width="449"><%=rs("xm")%></td>
</tr>
<tr valign="middle" bgcolor="#FCFFEE">
<td class="font" align="center" width="111">功能模块：</td>
<td class="font" align="left" height="30" width="449"><%=rs("mokuai")%></td>
</tr>
<tr valign="middle" bgcolor="#FCFFEE">
<td class="font" align="center" width="111">其它说明：</td>
<td class="font" align="left" height="30" width="449"><%=rs("bz")%></td>
</tr>
</table>
<table width="336" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td align="center" valign="middle" height="40"><span class="font">[</span><a href="vbscript:window.history.back" class="linkfont">返 回</a><span class="font">]</span></td>
</tr>
</table>
</body>
</html>
<!--#include file=../system/include/foot.asp-->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -