菜鸟问题高手帮我看看 - 编程论坛

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html xmlns="http://www.

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>查询结果</title>
</head>
<body>
<%
dim conn
   set conn=server.CreateObject("adodb.connection")
   conn.connectionstring="driver={microsoft access driver (*.mdb)};dbq="& server.MapPath("test.mdb")
   conn.open
   dim rs
set rs=server.CreateObject("adodb.recordset")
  rs.open "user",conn,1,3
  search=request.Form("search")
if search="" then
       response.Write "请输入要查询的名称"
       response.Redirect "http://127.0.0.1/shearch.asp"
  elseif
    do while not rs.eof
       if rs("u_user") = search  then
        response.Write "ID:"& rs("u_id")&"<br>"
        response.Write "姓名:"& rs("u_user")&"<br>"
        response.Write "密码:"& rs("u_password")&"<br>"
        response.Write "年龄:"& rs("u_age")&"<br>"
           if rs("u_vip")=true then
                response.Write "会员:是会员"
           else
                response.write "会员:不是会员"
           end if
     end if
      rs.movenext
    loop
    elseif
           response.write "你查询的人不存在，请确认后查询。"
  end if
%>
</body>
</html>
   好像就是中间那里写的有问题，可我又不知道哪里有问题，请高手给我分析下，谢谢