📄 edit_yewu.asp

📁 业务管理系统业务管理系统业务管理系统业务管理系统业务管理系统业务管理系统业务管理系统
💻 ASP
字号:
<%
if request.cookies("flag")=""  then
response.write "<script>top.location.href=""login.asp"";</script>" 
response.end
end if
%>
<%
id=request("id")
%>
<!--#include file="dbconn.asp"-->
<%dim action
action=request("action")
if action="add" then 
dim t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13
t1=request.form("地区")
t2=request.form("企业名称")
t3=request.form("项目")
t4=request.form("具体内容")
t5=request.form("企业经办人")
t6=request.form("开始日期")
t7=request.form("到期日期")
t13=request.form("应收金额")
t8=request.form("实收金额")
t9=request.form("成本支出")
t10=request.form("经办人1")
t11=request.form("经办人2")
t12=request.form("memo")



set rs=server.createobject("adodb.recordset")
sql="select * from caiwu where id="&id
rs.open sql,conn,1,3
rs("地区")=t1
rs("企业名称")=t2
rs("项目")=t3
rs("具体内容")=t4
rs("企业经办人")=t5
rs("开始日期")=t6
rs("到期日期")=t7
rs("应收金额")=t13
rs("实收金额")=t8
rs("成本支出")=t9
rs("经办人1")=t10
rs("经办人2")=t11
rs("memo")=t12
rs.update
rs.close 
set rs=nothing 

set rs=server.createobject("adodb.recordset")
sql="select * from contacts where ([企业名称] like '"&t2&"') " 
rs.open sql,conn,1,3
if not rs.eof then
rs("经办人1")=t10
rs("经办人2")=t11
end if
rs.update
rs.close 
Response.Write "修改完成"
%>
<%end if%>
<%'else%>
<html>
<head>
<title>修改业务</title>
<LINK href="css/style.css" type=text/css rel=stylesheet>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>

<body bgcolor="#FFFFFF" text="#000000">
<%
set rs=server.createobject("ADODB.recordset") 
sql="select * from caiwu where id="&id
rs.open sql,conn,1,1
%> <form name="form1" method="post" action="edit_yewu.asp?action=add&id=<%=rs("id")%>"> 
<p align="center">&nbsp;</p><p align="center">--------------------修改业务--------------------</p><table width="637" align="center" height="289"> 
<tr> <td width="96">地区：</td><td width="105"><font color="#808080" style="font-size: 9pt"> 
<select name="地区"> <option value="<%=rs("地区")%>"><%=rs("地区")%></option> <option value="温州鹿城区">温州鹿城区</option> 
<option value="温州龙湾区">温州龙湾区</option> <option value="温州瓯海区">温州瓯海区</option> <option value="永嘉县">永嘉县</option> 
<option value="瑞安市">瑞安市</option> <option value="乐清市">乐清市</option> <option value="苍南县">苍南县</option> 
<option value="青田县">青田县</option> <option value="台州市">台州市</option> <option value="福鼎市">福鼎市</option> 
</select> </font></td><td width="117">企业名称<font color="#808080" style="font-size: 9pt">： 
</font></td><td width="316"><font color="#808080" style="font-size: 9pt"> <select name="企业名称"> 
<option value="<%=rs("企业名称")%>"><%=rs("企业名称")%></option> <%set rs2=server.createobject("adodb.recordset")
          sql2="select * from contacts order by [企业名称]" 
          rs2.open sql2,conn,1,3
		  %> <%do while not rs2.eof%> <option value="<%=rs2("企业名称")%>"><font color="#808080" style="font-size: 9pt"><%=rs2("企业名称")%></font></option> 
<% 
	      rs2.movenext  
	      loop 
         %> <%rs2.close 
    set rs2=nothing
  %> </select> </font></td></tr> <tr> <td width="96">项目：</td><td width="105"><font color="#808080" style="font-size: 9pt"> 
<select name="项目"> <option value="<%=rs("项目")%>"><%=rs("项目")%></option> <%set rs3=server.createobject("adodb.recordset")
          sql3="select * from class order by id desc" 
          rs3.open sql3,conn,1,3
		  %> <%do while not rs3.eof%> <option value="<%=rs3("class")%>"><font color="#808080" style="font-size: 9pt"><%=rs3("class")%></font></option> 
<% 
	      rs3.movenext  
	      loop
		  rs3.close 
	      set rs3=nothing 
 %></select> </font></td><td width="117">具体内容：</td><td width="316"><font color="#808080" style="font-size: 9pt"> 
<input name="具体内容" size="30" style="border: 1 solid #808080" VALUE="<%=rs("具体内容")%>"> 
</font></td></tr> <tr> <td width="96">服务开始日期：</td><td width="105"><font color="#808080" style="font-size: 9pt"> 
<input name="开始日期" size="10" style="border: 1 solid #808080" VALUE="<%=rs("开始日期")%>"> 
</font></td><td width="117">服务到期日期：</td><td width="316"><font color="#808080" style="font-size: 9pt"> 
<input name="到期日期" size="10" style="border: 1 solid #808080" VALUE="<%=rs("到期日期")%>"> 
</font></td></tr><TR> <TD WIDTH="96">企业经办人：</TD><TD><FONT COLOR="#808080" STYLE="font-size: 9pt"> 
<INPUT NAME="企业经办人" SIZE="10" STYLE="border: 1 solid #808080" VALUE="<%=rs("企业经办人")%>"> 
</FONT></TD><TD>应收金额：</TD><TD><FONT COLOR="#808080" STYLE="font-size: 9pt"><INPUT NAME="应收金额" SIZE="10" STYLE="border: 1 solid #808080" VALUE="<%=rs("应收金额")%>"></FONT></TD></TR> 
<tr> <td width="96">实收金额：</td><td width="105"><font color="#808080" style="font-size: 9pt"> 
<input name="实收金额" size="10" style="border: 1 solid #808080" VALUE="<%=rs("实收金额")%>"> 
</font></td><td width="117">成本支出：</td><td width="316"><font color="#808080" style="font-size: 9pt"> 
<input name="成本支出" size="10" style="border: 1 solid #808080" VALUE="<%=rs("成本支出")%>"> 
</font></td></tr> <tr> <td width="96">经办人1：</td><td width="105"><font color="#808080" style="font-size: 9pt"> 
<input name="经办人1" size="10" style="border: 1 solid #808080" VALUE="<%=rs("经办人1")%>"> 
</font></td><td width="117">经办人2：</td><td width="316"><font color="#808080" style="font-size: 9pt"> 
<input name="经办人2" size="10" style="border: 1 solid #808080" VALUE="<%=rs("经办人2")%>"> 
</font></td></tr> <tr> <td width="96">备注：</td><td colspan="3"><font color="#808080" style="font-size: 9pt"> <input name="memo" size="60" style="border: 1 solid #808080" VALUE="<%=rs("memo")%>"> 
</font></td></tr> </table><p align="center"> <input type="submit" name="Submit" value="提交"> 
</p></form><%
rs.close 
set rs=nothing
%> 
</body>
</html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -