监理公司管理系统 | 工程企业管理系统 | OA系统 | ERP系统 | 造价咨询管理系统 | 工程设计管理系统 | 甲方项目管理系统 | 签约案例 | 客户案例 | 在线试用
X 关闭
抚州网站建设公司

当前位置:工程项目OA系统 > 泛普各地 > 江西OA系统 > 抚州OA > 抚州网站建设公司

分享asp判断是否登录的代码

申请免费试用、咨询电话:400-8352-114

admin

    这篇文章由抚州网站建设公司来分享asp判断是否登录的代码,这也是网站建设中经常会用到的。

    <%
    dim admin_username,admin_password
    admin_username=trim(request("username"))
    admin_password=trim(request("password"))

    if admin_username="" or admin_password="" then
    response.write "<script>alert(’对不起,用户名和密码不能为空!’);document.location.href=’index.asp’;</script>"
    response.end
    end if’这里是判断输入是不是为空
    %>

    <%
    set conn = Server.CreateObject("ADODB.Connection")
    DBPath = Server.MapPath("db1.mdb")
    conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
    Set rs = Server.CreateObject("ADODB.Recordset")
    sql="select * from info where Username=’"&admin_username&"’"
    rs.open sql,conn,1,1

    if not rs.eof then
    ’这个IF判断的意思是:输入的用户名和数据库里的用户名一致的时候。这是你还要判断输入的密码对不对,是吧?所以就有下面的IF。
    if rs("UserPwd")<>admin_password then
    response.write "<script>alert(’对不起,密码不正确,请重新输入’);document.location.href=’index.asp’;</script>"
    response.end
    else
    response.redirect "index2.asp"
    ’密码也对的情况下,就可以登录index2.asp页面了
    ’一般,你最好是还要设置session。这样方便别的页面判断是不是登录了。如
    ’session("jsusername")=username
    ’session("jsPassword")=Password
    end if
    end if
    %>
    <%
    rs.close
    set rs=nothing
    conn.close
    set rs=nothing
    %>

    以上就是asp判断是否登录的代码,如果想让登录更加人性化还可以加别的东西,大家需要注意一点,有些英文逗号这里会显示成中文的。

发布:2007-03-31 16:01    编辑:泛普软件 · xiaona    [打印此页]    [关闭]
抚州OA
联系方式

成都公司:成都市成华区建设南路160号1层9号

重庆公司:重庆市江北区红旗河沟华创商务大厦18楼

咨询:400-8352-114

加微信,免费获取试用系统

QQ在线咨询

泛普抚州网站建设公司其他应用

抚州软件开发公司 抚州门禁系统 抚州物业管理软件 抚州仓库管理软件 抚州餐饮管理软件 抚州网站建设公司