khlist_resave.asp

客户管理系统使用ASP.NET和Access

<!--#include file="conn.asp"-->
<!--#include file="islogin.asp"-->
  <%
     ReID=request("Reid")
     re=request("re")
     ReMemberID=0
     ReMember="系统管理员"
	 
	if re="" then 
    response.Write"<script language=Javascript>alert('内容不能为空！');" 
    response.write"javascript:history.go(-1)</script>" 
    response.end 
    end if
	 
      if ReMember="" and ReMemberID="" then
      response.write "<script>alert('请重新登录！');history.go(-1);</script>"
	  response.End()
      end if
	  
     set rs=server.createobject("adodb.recordset")
     sql="select * from KHre where (id=null)"
     rs.open sql,conn,1,3
	 rs.addnew
    rs("ReID")=ReID
    rs("ReMemberID")=ReMemberID
    rs("ReMember")=ReMember
    rs("re")=re
    rs("retime")=now
    rs.update
    rs.close
    set rs=nothing
    conn.close
    set conn=nothing
    response.redirect "KHList.asp?id="&ReID&""
 %>