📄 add.asp
字号:
<!--#include file="../0.asp"-->
<!--#include file="../../../conn/conn.asp"-->
<!--#include file="../../../conn/nosql.asp"-->
<html>
<head>
<title>电话定购第一步</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../../../css/css.css" rel="stylesheet" type="text/css">
<STYLE>
BODY {
SCROLLBAR-FACE-COLOR: #799ae1;
SCROLLBAR-HIGHLIGHT-COLOR: #799ae1;
SCROLLBAR-SHADOW-COLOR: #799ae1;
SCROLLBAR-3DLIGHT-COLOR: #799ae1;
SCROLLBAR-ARROW-COLOR: #fcfcfc;
SCROLLBAR-TRACK-COLOR: #aabfec;
SCROLLBAR-DARKSHADOW-COLOR: #799ae1;
SCROLLBAR-BASE-COLOR: #799ae1;
background-color: #CAD7F7;
}
</STYLE>
</head>
<body bgcolor="#FFFFFF" text="#000000">
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td valign="middle" align="center">
<% Select case Request("add")
case "t"%>
<form method="POST" action="?add=a">
第一步：录入送货清单日期<br>
<br>
<table bgcolor=#FFFFFF border=0 cellpadding=3 cellspacing=1
width="99%" align="center" class="9bang">
<tbody>
<tr>
<td bgcolor=#E8F1FF class="008c5e" width="100" height="25" align="center"><font size="2">送货清单日期</font></td>
<td width="300" height="25" bgcolor=#E8F1FF class="008c5e"> <font size="2">
<input name="n" type="text" id="n" value="2003" size="8" maxlength="4">
年
<input name="y" type="text" id="y" value="" size="4" maxlength="2">
月
<input name="r" type="text" id="r" value="" size="4" maxlength="2">
日 </font></td>
</tr>
<tr>
<td bgcolor=#E8F1FF class="008c5e" width="100" height="25"> </td>
<td width="300" height="25" bgcolor=#E8F1FF class="008c5e"> <font size="2">
<input name="submit" type="submit" value="提交">
<input name="Reset" type="reset" value="重填">
<input name="Submit" type="button" onClick="javascript:window.history.go(-1)" value="返回">
</font></td>
</tr>
</tbody>
</table>
</form>
<%case "a"
Set s= Server.CreateObject("abodb.recordset")
conn.execute("Insert into sh_sj(n,y,r,user_name)values('"&nosql(replace(Request("n"),"'",""))&"','"&nosql(replace(Request("y"),"'",""))&"','"&nosql(replace(Request("r"),"'",""))&"','"&nosql(session("www.wygk.cn"))&"')")
set rs2 = conn.execute("select id from sh_sj where n='"&nosql(replace(Request("n"),"'",""))&"' and y='"&nosql(replace(Request("y"),"'",""))&"' and r='"&nosql(replace(Request("r"),"'",""))&"'")
Response.redirect "add2.asp?id="&rs2("id")&""
End Select
%>
</td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -