passchk.asp

人才招聘系统,用asp做的

	<!--#include file=../../conn.asp-->
	<!--#include file=cookies.asp-->
	<%
	dim sql,sql1
	dim rs,rs1
	dim comid,i
if len(request("password"))<6 or len(request("password"))>15 then
response.write "<li><font color=""#ff0000"">密码输入错误！在6-15个字符内</font>!"
response.write "<meta http-equiv=refresh content=""2;URL=pass.asp"">"
response.end
end if
	sub hao()
    response.write "<br>"+"<li><font color=""#ff0000"">操作成功!!!!!正在返回....</font>"
	response.write "<meta http-equiv=refresh content=""2;URL=pass.asp"">"
	end sub
	comid=request.cookies("ijob")("comid")
	set rs=server.createobject("adodb.recordset")
	sql="select password,xgsj from [bumen] where comid='"&request.cookies("ijob")("comid")&"'and id="&cstr(request.cookies("ijob")("bmid"))
	rs.open sql,conn,1,3
	if rs.eof or rs.bof then
	response.write "<br>"+"<li><font color=""#ff0000"">参数错误！</font>"
	response.end
	else
	rs("password")=request("password")
	rs("xgsj")=now()
	rs.update
	rs.close
	set rs=nothing
    end if
    closedb
    hao
    %>