📄 editsave.asp
字号:
<!--#include file="conn.asp" -->
<%
if session("name")="" or session("dd")="" then
response.write "SORRY <br>"
response.write "数据在携带中出现意外！<br>"
response.write "<a href=login.asp>回去重来</a>"
response.end
end if
if session("quanxian")="1" then
response.write "SORRY <br>"
response.write "您的权限不够！请勿尝试非法访问！<br>"
response.end
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 6.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>客户资料管理系统</title>
<%
dim city
'--------------------------------------------------------
com_name=Request.Form ("com_name")
com_shen=Request.Form ("com_shen")
com_city=Request.Form ("com_city")
com_diqu=Request.Form ("com_diqu")
com_phone=Request.Form ("com_phone")
com_fax=Request.Form ("com_fax")
com_email=Request.Form ("com_email")
com_address=Request.Form ("com_address")
com_zip=Request.Form ("com_zip")
com_fuzeren=Request.Form ("com_fuzeren")
com_zczj=Request.Form ("com_zczj")
com_setup=Request.Form ("com_setup")
com_touzi=Request.Form ("com_touzi")
com_hangye=Request.Form ("com_hangye")
com_porduct=Request.Form ("com_porduct")
com_chanzhi=Request.Form ("com_chanzhi")
com_rzzk=Request.Form ("com_rzzk")
com_web=Request.Form ("com_web")
zy=Request.Form ("zy")
fax=Request.Form ("fax")
content=Request.Form ("content")
mclass=Request.Form ("mclass")
sclass=Request.Form ("sclass")
'--------------------------------------------------------
if com_shen="" then com_shen="未填" end if
if com_city="" then com_city="未填" end if
if com_diqu="" then com_diqu="未填" end if
if com_phone="" then com_phone="未知或无" end if
if com_fax="" then com_fax="未知或无" end if
if com_email="" then com_email="未知或无" end if
if com_address="" then com_address="未填" end if
if com_zip="" then com_zip="未填" end if
if com_hangye="" then com_hangye="未填" end if
if com_fuzeren="" then com_fuzeren="未填" end if
if com_zczj="" then com_zczj="未填" end if
if com_setup="" then com_setup="未填" end if
if com_touzi="" then com_touzi="未填" end if
if com_porduct="" then com_porduct="未填" end if
if com_chanzhi="" then com_chanzhi="未填" end if
if com_rzzk="" then com_rzzk="未填" end if
if com_web="" then com_web="未填" end if
if content="" then content="无注释" end if
'--------------------------------------------------------
dim rs,sql
set rs=server.createobject("adodb.recordset")
sql="select * from customer where id="&request("id")&""
rs.open sql,conn,1,3
'--------------------------------------------------------
rs("com_name")=com_name
rs("com_shen")=com_shen
rs("com_city")=com_city
rs("com_diqu")=com_diqu
rs("com_phone")=com_phone
rs("com_fax")=com_fax
rs("com_email")=com_email
rs("com_address")=com_address
rs("com_zip")=com_zip
rs("com_fuzeren")=com_fuzeren
rs("com_zczj")=com_zczj
rs("com_setup")=com_setup
rs("com_touzi")=com_touzi
rs("com_porduct")=com_porduct
rs("com_chanzhi")=com_chanzhi
rs("com_hangye")=com_hangye
rs("com_rzzk")=com_rzzk
rs("com_web")=com_web
rs("zy")=zy
rs("content")=content
rs("vest_s")=sclass
rs("vest_m")=mclass
'--------------------------------------------------------
rs.Update
rs.Close
set rs=nothing
%>
<html>
<head>
<title>正在进入管理页面</title>
<meta http-equiv=refresh content="1; url=userlist.asp?mclass=<%=session("dd")%>&sclass=<%=request("sclass")%>">
<BODY bgcolor="#ffffff" text="#000000" link="#000080" alink="#800000" vlink="#2f2f4f" marginheight=0 marginwidth=0 topmargin=10 leftmargin=20 rightmargin=0>
Loading ....
<p align="center">正在返回...</p>
<p align="center">正在加载请稍后......</p>
</body></html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -