kehu2.asp

NT80购物系统1.0 系统说明： 1 界面美观大方

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

<%
if request("add")="pass" then
set rs=server.createobject("adodb.recordset")
  sql="SELECT * from use where name='"&request("name2")&"'"
  rs.open sql,conn,1,3
  if rs.bof and rs.eof then %>
    错误：用户名不存在
  <%else
    if rs("pass")=request("pass") then
	  rs("pass")=request("pass2")
	  rs.update
	   response.redirect "out.asp"
	else %>
	  错误：密码不正确
	<%end if
  end if
  rs.close
  set rs=nothing
  call connclose
end if
%>
<%
if request("add")="wen" then 
if request("wen")="" or request("neirong")="" then
%>错误：问题和内容，其中之一没有填写<%
  else
set rs=server.createobject("adodb.recordset")
  sql="SELECT * from wen "
 rs.open sql,conn,1,3
 rs.addnew
 rs("wname")=request("wname")
 rs("wen")=request("wen")
 rs("neirong")=request("neirong")
 rs("huifu")="正处理"
 rs.update
 response.redirect "index.asp"
 end if
 end if %>