admin_update_shop.asp

一套很早的多用户电子商务程序

<%@ language="vbscript"%>
<%response.Expires = 0%>

<!--#include file="conn.asp"-->
<%

set rs=server.createobject("adodb.recordset")
sqltext="select * from RegUser where userid='"&Session("LoginSuccess")&"' "
rs.open sqltext,conn,3,3

'更新商品到数据库

rs("PassWD")=request.form("pwd")     '密码
rs("Name")=request.form("Name")      '您的姓名

rs("Email")=request.form("Email")     'E-MAIL
rs("Phone")=request.form("usephone")  '常用电话
rs("Address")=request.form("haddr")   '收货地址
rs("Zip")=request.form("postcode")    '邮编
rs.update
rs.close
conn.close
 response.redirect "../messagebox.asp?msg=已成功修改注册信息！"
%>