登陆验证之问题 送分......100

Question

有一SQLSERVER 数据库login表,请问怎样实现在登陆页从表中调出对应的用户名和密码作比较..实现登陆
语法:VB (C#看不大懂啊.55555555555)
偶想了好久都没有想出来,请你们帮帮我....

Answer 1

这个使用1条SQL语句就可以解决了吧
select userid from login where userid = id and password = psd
其他的就是连SQL数据库了

Answer 2

正如楼上所说!使用SQL语句，然后判断查询的结果返回的记录数量！
呵呵～～

Answer 3

string UserName=this.TextBox1.Text.Trim();
string Pass=this.Textbox2.Text.Trim();
SqlConnection Mycon=new SqlConnection(Con1);
string Sql="select UserName,Pass from dbo.UserInfo where UserName='"+UserName+"'and Pass='"+Pass+"'";SqlDataAdapter Dat=new SqlDataAdapter(Sql,Mycon);
DataTable Dt=new DataTable();
Dat.Fill(Dt);
if(Dt.Rows.Count>0)
    {
Session["SessUserName"]=UserName;
FormsAuthentication.RedirectFromLoginPage(UserName,false);
Response.Redirect("default.aspx?User="+this.TextBox1.Text.Trim());
    }

Answer 4

select count(*) from login where user=user and password=password如果返回值为0那就有错误了。

Answer 5

记得把username,password过滤一下。把“'”过虑掉，不是就有后门可进了。

Answer 6

string strComm = "select password where u_id='" + p_uid + "';"
SqlConnection conn = new SqlConnection( "连接字符串" );
SqlCommand comm = new SqlCommand( strComm, conn );
try
{
    conn.Open();
    SqlDataReader reader = comm.ExecuteReader();
    if( reader.HasRows )//用户名存在
    {
        if( reader.GetString(0).Equals( p_password ) )//密码也正确
        {
            ;//成功登陆代码
        }
        else//密码不正确
        {
            ;//给出提示
        }
    }
    else
    {
        ;//用户名不存在
    } 
}
catch( Exception ex )
{
}
finally
{
    conn.Close();
}VB的是差不多的，改一下就可以了^_^,对象好像是一样的吧，只是改改语法。写得那么详细，你也可以写出来啦，呵呵^_^.VB我没用过啊.....

Answer 7

就写个sql语句判定一下而已嘛..

Answer 8

这个使用1条SQL语句就可以解决了吧
select userid from login where userid = id and password = psd
其他的就是连SQL数据库了dim string id
dim string psd

Answer 9

ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!ding!
----------------------------------------------------------------------
SQL语句
select userid from login where userid = id and password = psd and useid in(select userid from login )

Answer 10

Yes, 用SELECT语句查询.
条件式最好用参数不用SQL拼合. 这样不安全.

Answer 11

duwamisn这个例子的解决方法就挺好的。

Answer 12

If IsValidInput(userID) = True And IsValidInput(passwd) = True Then '过滤输入非法字符
            '' SQL文作成 
            strSql = "SELECT * FROM JF_USERINFO WHERE USERID = '" & userID & "' AND PASSWORD = '" & passwd & "'"            Try
                ret = MdlCoOracle.CoOraSelect(strSql, oraDataTable)
                If ret = -9 Then
                    MsgBox("The user isn't exist.")
                    Return False
                ElseIf ret = -1 Then
                    MsgBox("Query failed.")
                    Return False
                End If                MdlCommon.UserGrade = Convert.ToInt32(MdlCommon.CoIsDBNull(oraDataTable.Rows(0).Item("AUTHORITYFLAG"), 0))            Catch ex As Exception
                MdlCoOracle.CoOraDisconnect()
                MsgBox(ex.Message)
                Return False
            End Try
            Return True
        End If

Answer 13

不好意思，CoOraSelect方法，单独写了。
 Public Function CoOraSelect(ByVal strSql As String, ByRef oraReader As OracleDataReader) As Integer
        Dim oraComm As OracleCommand
        Dim ret As Integer
        Try
            oraComm = oraConn.CreateCommand()
            oraComm.CommandText = strSql
            If Not oraTrans Is Nothing Then
                oraComm.Transaction = oraTrans
            End If
            oraReader = Nothing
            oraReader = oraComm.ExecuteReader()
            If oraReader.Read() Then
                ret = 0
            Else
                ret = -9
            End If
        Catch ex As Exception
            m_OraException = ex
            ret = -1
        End Try
        Return ret
    End Function

Answer 14

重载的方法
    Public Function CoOraSelect(ByVal strSql As String, ByRef oraDataTable As DataTable) As Integer
        Dim oraDataAdapter As OracleDataAdapter
        Dim oraComm As OracleCommand
        Dim ret As Integer
        Try
            ret = 0
            oraComm = oraConn.CreateCommand()
            oraComm.CommandText = strSql
            If Not oraTrans Is Nothing Then
                oraComm.Transaction = oraTrans
            End If
            oraDataAdapter = New OracleDataAdapter(oraComm)
            oraDataTable = New DataTable
            oraDataAdapter.Fill(oraDataTable)
            If oraDataTable.Rows.Count <= 0 Then
                ret = -9
            End If
            oraDataAdapter.Dispose()
        Catch ex As Exception
            m_OraException = ex
            ret = -1
        End Try
        Return ret
    End Function

Answer 15

If IsValidInput(userID) = True And IsValidInput(passwd) = True Then '过滤输入非法字符
            '' SQL文作成 
            strSql = "SELECT * FROM JF_USERINFO WHERE USERID = '" & userID & "' AND PASSWORD = '" & passwd & "'"            Try
                ret = MdlCoOracle.CoOraSelect(strSql, oraDataTable)
                If ret = -9 Then
                    MsgBox("The user isn't exist.")
                    Return False
                ElseIf ret = -1 Then
                    MsgBox("Query failed.")
                    Return False
                End If                MdlCommon.UserGrade = Convert.ToInt32(MdlCommon.CoIsDBNull(oraDataTable.Rows(0).Item("AUTHORITYFLAG"), 0))            Catch ex As Exception
                MdlCoOracle.CoOraDisconnect()
                MsgBox(ex.Message)
                Return False
            End Try
            Return True
        End If

Answer 16

Imports System.Data
Imports System.Data.SqlClientPublic Class ConnDatabase
    Private Function GetConnString() As String
        Dim myConn As String = "Server=.;User ID=sa;Password=1111;Database=music"
        Return myConn
    End Function
    Private Function CarateCommand(ByVal Sql As String, ByVal Param() As SqlParameter, ByVal SqlCmdType As CommandType) As SqlCommand
        Dim myConn As New SqlConnection(GetConnString())
        Dim myCommand As New SqlCommand(Sql, myConn)
        myCommand.CommandType = SqlCmdType
        Dim ParamTemp As SqlParameter
        If Not Param Is Nothing Then
            For Each ParamTemp In Param
                myCommand.Parameters.Add(ParamTemp)
            Next
        End If
        Try
            myConn.Open()
            Return myCommand
        Catch ex As Exception
            Return Nothing
        End Try
    End Function
    Public Overloads Function ExecuteSP(ByVal ProcName As String, ByVal Param() As SqlParameter, ByVal myDataset As DataSet) As Boolean
        Dim myCommand As SqlCommand = CarateCommand(ProcName, Param, CommandType.StoredProcedure)
        Dim myDataAdapter As SqlDataAdapter = New SqlDataAdapter(myCommand)
        Try
            myDataAdapter.Fill(myDataset)
            Return True
        Catch ex As Exception
            Return False
        End Try
    End Function
    Public Overloads Function ExecuteSP(ByVal ProcName As String, ByVal Param() As SqlParameter) As Boolean
        Dim myCommand As SqlCommand = CarateCommand(ProcName, Param, CommandType.StoredProcedure)
        Try
            myCommand.ExecuteNonQuery()
            Return True
        Catch ex As Exception
            Return False
        End Try
    End Function
    Public Overloads Function ExecuteSP(ByVal ProcName As String, ByVal Param() As SqlParameter, ByRef myDataReader As SqlDataReader) As Boolean
        Dim myCommand As SqlCommand = CarateCommand(ProcName, Param, CommandType.StoredProcedure)
        Try
            myDataReader = myCommand.ExecuteReader
            Return True
        Catch ex As Exception
            Return False
        End Try
    End Function
End Class