asp与sql 2005连接成功,asp中管理员登陆界面不显示
											 程序代码:
程序代码:<!--#Include file="conn.asp"-->
<%
    '如果尚未定义passed对象,则将其定义为false,表示没有通过身份认证
    if isempty(session("passed")) then
        session("passed") = false
    end if
    '如果用户还没有登录
    if session("passed")=false  then
        '读取从表单传递过来的身份数据
        username = request.form("username")
        userpwd = request.form("userpwd")
         '输入用户名为空
        if username = "" then
            '错误信息
            errmsg = "请输入用户名和密码"
        else  
            '从表news_user中读取用户数据
            '定义recordset对象
            set rs=server.createobject("adodb.recordset")
            '设置connection对象的connectionstring
            '设置rs的activeconnection属性,绑定到连接
            set rs.activeconnection = conn
            '设置游标类型
            rs.cursortype = 3
            '打开记录集
            rs.open "select * from news_user where username='" & trim(username) & "'"
            ' line1,身份验证
            if rs.eof then
                errmsg = "用户不存在"
            else
                if userpwd <> rs.fields("userpwd") then
                    errmsg = "密码不正确"
                else
                    ' line2,登录成功,设置session参数
                    errmsg = ""
                    session("passed") = true
                    session("userid") = rs.fields("id")
                    session("flag") = rs.fields("flag")
                    '重定向到管理主页面
                    response.redirect "manage.asp"
                    response.end
                end if
            end if
        end if
    end if
      if not session("passed") then
    '显示登录页面
%>
<html>
<head><title>请输入用户名和密码</title></head>
<body>
<script language="javascript">
function chkfields() {
If (document.myform.username.value=='') {
Window.alert ("请输入用户名!")
Return false
}
Return true
}
</script>
<%
    '结束响应
    response.end
    end if
%>
[ 本帖最后由 以凯歌之名 于 2013-6-19 18:04 编辑 ]



 
											





 
	    

 
	



 这只是一个管理系统的一部分,小弟初学asp,还请赐教啊,我qq 694148527,可以给你截图的。
这只是一个管理系统的一部分,小弟初学asp,还请赐教啊,我qq 694148527,可以给你截图的。