⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 edit.asp

📁 鄂尔多斯建站网全站程序(冬季修正版)
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="conn.asp"-->
<!--#include file="session.asp"-->
<!--#include file="md5.asp"-->
<%
'**********************************
'版本:host_free 3.0               *
'官方网站:http://www.850518.com   *
'技术论坛:http://forum.850518.com *
'qq:54455245 (欢迎咨询商业版)     *
'msn: steven_bass@msn.com         *
'手机:(0)13632779827              *
'mail:wtez@vip.163.com            *
'版权所有,请保留该信息,谢谢合作 *
'**********************************
%>

<head>
<link href="style.css" rel=stylesheet>
<%
'===============================
'程序由[中国络网xy20.net]制作
'版权所有,已经聘请律师保护本公司
'的本套程序。如需购买,请到
'http://www.xy20.net联系购买
'qq:54455245
'电话:0755-83214488(晚间)
'手机:13652431551(短信)
'===============================
'以下是“银行信息”修改的代码,请勿乱修改(*)
if request("action")="save_bank" then
dim id,bank,banktex,cunzhe,kahao,person,bank_pic
id=request("id")
bank=request("bank")
bank_pic=request("bank_pic")
banktex=request("banktex")
cunzhe=request("cunzhe")
kahao=request("kahao")
person=request("person")
if bank="" then
response.write("<script>alert('银行名称不能为空!');history.go(-1)</script>")
response.end
end if
if bank_pic="" then
response.write("<script>alert('银行图标不能为空!');history.go(-1)</script>")
response.end
end if
if banktex="" then
response.write("<script>alert('银行地址不能为空!');history.go(-1)</script>")
response.end
end if
if cunzhe="" then
response.write("<script>alert('存折号码不能为空!');history.go(-1)</script>")
response.end
end if
if kahao="" then
response.write("<script>alert('卡号号码不能为空!');history.go(-1)</script>")
response.end
end if
if person="" then
response.write("<script>alert('用户名称不能为空!');history.go(-1)</script>")
response.end
end if
set rs=server.createobject("adodb.recordset")
sql="select * from bank where id="&request("id")
rs.open sql,conn,3,3
rs("bank")=bank
rs("bank_pic")=bank_pic
rs("banktex")=banktex
rs("cunzhe")=cunzhe
rs("kahao")=kahao
rs("person")=person
rs.update
rs.close
set rs=nothing
response.write"<div align=center><a href=edit_bank.asp>修改成功,返回</a></div>"
end if
'以上是“银行信息”修改的代码,请勿乱修改(=)
'=================================================================================================
'以下是“新闻修改”的修改代码,请勿乱修改
if request("action")="save_news" then
news_id=request("news_id")
id=request("id")
news_title=request("news_title")
news_colour=request("news_colour")
news_person=request("news_person")
news_text=request("news_text")
if id="" then
response.write("<script>alert('选择类型不能为空!');history.go(-1)</script>")
response.end
end if
if news_title="" then
response.write("<script>alert('新闻标题不能为空!');history.go(-1)</script>")
response.end
end if
if news_person="" then
response.write("<script>alert('添加人员不能为空!');history.go(-1)</script>")
response.end
end if
if news_text="" then
response.write("<script>alert('新闻内容不能为空!');history.go(-1)</script>")
response.end
end if
set rs=server.createobject("adodb.recordset")
sql="select * from news where news_id="&request("news_id")
rs.open sql,conn,3,3
rs("id")=id
rs("news_title")=news_title
rs("news_colour")=news_colour
rs("news_person")=news_person
rs("news_text")=news_text
rs.update
rs.close
set rs=nothing
response.write"<div align=center><a href=edit_news.asp>修改成功,返回</a></div>"
end if
'以上是“新闻修改”的修改代码,请勿乱修改
'=================================================================================================
if request("action")="save_title" then
dim sort_name
d=request("id")
sort_name=request("sort_name")
if sort_name="" then
response.write("<script>alert('栏目不能为空!');history.go(-1)</script>")
response.end
end if
set rs=server.createobject("adodb.recordset")
sql="select * from list where id="&request("id")
rs.open sql,conn,3,3
rs("sort_name")=sort_name
rs.update
rs.close
set rs=nothing
response.write"<div align=center><a href=edit_title.asp>修改成功,返回</a></div>"
end if
'=================================================================================================
if request("action")="edit_user" then
dim d_pass1,d_mail,d_question,d_answer,d_tel,d_handphone,d_name,d_oicq,d_grade,d_money
id=request("id")
d_pass1=request("d_pass1")
d_mail=request("d_mail")
d_question=request("d_question")
d_answer=request("d_answer")
d_tel=request("d_tel")
d_handphone=request("d_handphone")
d_name=request("d_name")
d_oicq=request("d_oicq")
d_grade=request("d_grade")
if d_mail="" then
response.write("<script>alert('邮件地址不能为空!');history.go(-1)</script>")
response.end
end if
if d_question="" then
response.write("<script>alert('密码问题不能为空!');history.go(-1)</script>")
response.end
end if
if d_answer="" then
response.write("<script>alert('问题答案不能为空!');history.go(-1)</script>")
response.end
end if
if d_tel="" then
response.write("<script>alert('联系电话不能为空!');history.go(-1)</script>")
response.end
end if
if d_handphone="" then
response.write("<script>alert('手机号码不能为空!');history.go(-1)</script>")
response.end
end if
if d_name="" then
response.write("<script>alert('真实姓名不能为空!');history.go(-1)</script>")
response.end
end if
if d_oicq="" then
response.write("<script>alert('oicq不能为空!');history.go(-1)</script>")
response.end
end if
set rs=server.createobject("adodb.recordset")
sql="select * from duser where id="&request("id")
rs.open sql,conn,3,3
if d_pass1<>"" then
rs("d_pass1")=xy20_md5(d_pass1,"short")
end if
rs("d_mail")=d_mail
rs("d_question")=d_question
rs("d_answer")=d_answer
rs("d_tel")=d_tel
rs("d_handphone")=d_handphone
rs("d_name")=d_name
rs("d_oicq")=d_oicq
rs("d_grade")=d_grade
rs.update
rs.close
set rs=nothing
response.write"<div align=center><a href=edit_user.asp>修改成功,返回</a></div>"
end if
'=================================================================================================修改代理
if request("action")="edit_daili" then
id=request("id")
d_c=request("d_c")
set rs=server.createobject("adodb.recordset")
sql="select * from daili where id="&request("id")
rs.open sql,conn,3,3
rs("d_c")=d_c
rs.update
rs.close
set rs=nothing
response.redirect("daili.asp")
end if
'=================================================首页商品推荐代码
if request("action")="edit_shop" then
sort_id=request("sort_id")
tj=request("tj")
set rs=server.createobject("adodb.recordset")
sql="select * from sort where sort_id="&request("sort_id")
rs.open sql,conn,3,3
rs("tj")=tj
rs.update
rs.close
set rs=nothing
response.redirect("edit_shop.asp")
end if
'=================================================修改商品代码
if request("action")="edit_shop2" then
id=request("id")
sort_name=request("sort_name")
grade=request("grade")
smalltext=request("smalltext")
largetext=request("largetext")
price=request("price")
attention=request("attention")
tj=request("tj")
if id="" then
response.write("<script>alert('所属类型不能为空!');history.go(-1)</script>")
response.end
end if
if sort_name="" then
response.write("<script>alert('商品名称不能为空!');history.go(-1)</script>")
response.end
end if
if grade="" then
response.write("<script>alert('商品图片不能为空!');history.go(-1)</script>")
response.end
end if
if smalltext="" then
response.write("<script>alert('小 简 介不能为空!');history.go(-1)</script>")
response.end
end if
if largetext="" then
response.write("<script>alert('大 简 介不能为空!');history.go(-1)</script>")
response.end
end if
if price="" then
response.write("<script>alert('普通价格不能为空!');history.go(-1)</script>")
response.end
end if
if attention="" then
response.write("<script>alert('注意事项不能为空!');history.go(-1)</script>")
response.end
end if
if tj="" then
response.write("<script>alert('首页推荐不能为空!');history.go(-1)</script>")
response.end
end if
set rs = server.createobject("adodb.recordset")
sql="select * from sort where sort_id="&request("sort_id") 
rs.open sql,conn,1,3
rs("id")=id
rs("sort_name")=sort_name
rs("grade")=grade
rs("smalltext")=smalltext
rs("largetext")=largetext

⌨️ 快捷键说明

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