 <!--#include file=articleconn.asp-->
<%
dim sql
dim rs
dim seekerrs
dim founduser
dim name
dim companyid
dim pwd
dim errmsg
dim founderr
founderr=false
FoundUser=false
	name=trim(request("name"))
	pwd=cstr(Request("pwd"))

set rs=server.createobject("adodb.recordset")
sql="select * from password where id=1"
rs.open sql,conn,1,1
 if not(rs.bof and rs.eof) then
 if pwd=rs("pwd") and name=rs("name") then
   session("hs_opt")="ok"
   response.redirect "manage.asp"
 else
           response.write "<link rel='stylesheet' type='text/css' href='style.css'>"
      response.write "<body bgcolor='#ffffff'>" 
      response.write "您输入名字和密码不对，请输入正确的名字和密码，方可进入管理页面"
end if
end if
rs.close
conn.close
set rs=nothing
set conn=nothing
%>
