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

📄 update_user_sav.asp

📁 oracle9i程序事例集
💻 ASP
字号:
<head>
<%
  dim conn
  dim connstr
  Set conn=Server.CreateObject("ADODB.Recordset")
  connstr="Driver={Microsoft ODBC for Oracle};server=mylink;uid=system;pwd=system;"
%>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>用户资料更改</title>
<style>
td {
	font-size: 13px;
}
</style>
</head>
<link href=css.css rel=STYLESHEET type=text/css>
<%  if request("username")="" then
        founderr=true
        errmsg=errmsg+"<br>"+"<li>用户姓名不能为空"
    else
        username=request("username")
    end if
	
	if request("province")="" then
        founderr=true
        errmsg=errmsg+"<br>"+"<li>所在省份不能为空"
    else
        province=request("province")
    end if
	
	if request("city")="" then
        founderr=true
        errmsg=errmsg+"<br>"+"<li>所在城市不能为空"
    else
        city=request("city")
    end if
   
    if request("address")="" then
        founderr=true
        errmsg=errmsg+"<br>"+"<li>用户地址不能为空"
    else
        address=request("address")
    end if
	
   if request("telphone")="" then
        founderr=true
        errmsg=errmsg+"<br>"+"<li>联系电话不能为空"
    else
        telphone=request("telphone")
    end if
    idcard=request("idcard")
	mobilephone=request("mobilephone")
	zipcode=request("zipcode")
	email=request("email")
	remark=request("remark")
%>
<body>
<!-- #include file="pagetop.asp" -->
<table width="550" height="160"  border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#F2F2F2">

<%	if founderr=true then %>
  <tr>
    <td height="70" bgcolor="#FFFFFF" colspan="4"></td>
  </tr>
  <tr><td align="center" bgcolor="#FFFFFF"><font color="#0000FF" size="-1">	<%=errmsg%> </font></td></tr>
  <tr><td height="20" bgcolor="#FFFFFF"></td></tr>
  <tr><meta http-equiv="refresh" content="3;url=javascript:history.go(-1)">
      <td height="20" colspan="4" align="center" bgcolor="#FFFFFF"><font size="-1">三秒钟后自动返回,如果您的浏览器没有返回,请<a href="javascript:history.go(-1)" target="_self">单击此处</a>返回</font></td>
  </tr>
  <tr>
    <td height="70" bgcolor="#FFFFFF" colspan="4"></td>
  </tr>
<%
    else
        id=request("userid")
        set rs1=server.createobject("adodb.recordset")
        sql="select * from GSCOTT.user_info_table where user_id='"&id&"'"
        rs1.open sql,connstr,3,3
		rs1("user_idcard")=idcard
        rs1("user_province")=province
		rs1("user_city")=city
        rs1("user_email")=email
        rs1("user_address")=address
        rs1("user_zipcode")=zipcode
        rs1("user_telphone")=telphone
        rs1("user_name")=username
		rs1("user_mobilephone")=mobilephone
		rs1("user_remark")=remark
		date1=rs1("user_date")
        rs1.update
        rs1.close
        set rs1=nothing
  %>
  <tr>
    <td height="20" bgcolor="#FFFFFF" colspan="4"></td>
  </tr>
  <tr align="center">
    <td height="20" colspan="4" bgcolor="E4E2FE"><font color="#0000FF">用户资料更改成功</font></td>
  </tr>
  <tr>
    <td width="20%" height="20" align="right">客户ID:</td>
    <td width="30%" height="20"><%=id%></td>
    <td width="20%" height="20" align="right">&nbsp;</td>                                      
    <td width="30%">&nbsp;</td>
  </tr>
  <tr>
    <td height="20" align="right">客户姓名:</td>
    <td><%=username%></td>
    <td align="right">身份证号:</td>
    <td><%=idcard%></td>
  </tr>
  <tr>
    <td height="20" align="right">所在省份:</td>
    <td><%=province%></td>
    <td align="right">所在城市:</td>
    <td><%=city%></td>
  </tr>
  <tr>
    <td height="20" align="right">客户地址:</td>
    <td><%=address%></td>
    <td align="right">邮编:</td>
    <td><%=zipcode%></td>
  </tr>
  <tr>
    <td height="20" align="right">联系电话:</td>
    <td><%=telphone%></td>
    <td align="right">手机:</td>
    <td><%=mobilephone%></td>
  </tr>
  <tr>
    <td height="20" align="right">Email:</td>
    <td><%=email%></td>
    <td align="right">注册时间:</td>
    <td><%=date1%></td>
  </tr>
  <tr>
    <td align="right">备注:</td>
    <td colspan="3"><%=remark%></td>
  </tr>
  <tr><meta http-equiv="refresh" content="5;url=index.asp">
      <td height="20" colspan="4" align="center"><font color="#0000FF" size="-1">五秒钟后自动返回,如果您的浏览器没有返回,请<a href="index.asp" target="_self">单击此处</a>返回首页</font></td>
  </tr>
  <tr>
    <td height="20" bgcolor="#FFFFFF" colspan="4"></td>
  </tr>
<% end if %>
</table>
<!-- #include file="pagefooter.html" -->
</body>	

⌨️ 快捷键说明

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