빈 데이터 세트를 처리하는 방법은 무엇입니까?

Question

내 프로젝트의 로그인 페이지를 만들고 있지만 실행 중 "위치 0에 행이 없습니다"라는 오류 메시지가 나타납니다. 나는이 코드 라인을 시도했다.

Imports System.Data.SqlClient 
Imports System.Data 

Partial Class Dept_login 
    Inherits System.Web.UI.Page 

    Protected Sub BtnSubmit_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles BtnSubmit.Click 
     Dim ds As New DataSet 
     'Try 
     Dim con As New SqlConnection(ConfigurationManager.ConnectionStrings("VMSConnectionString").ConnectionString) 
     con.Open() 
     Dim cmd As New SqlCommand("SELECT password FROM Dept_login WHERE user_id='" + Txtuname.Text + "'", con) 
     Dim da As New SqlDataAdapter(cmd) 
     da.Fill(ds) 

     If Not IsDBNull(ds) Then 
      If Txtpwd.Text = ds.Tables(0).Rows(0).Item("password") Then 
       Response.Redirect("Online Services.aspx") 'the page i want to redirect to after login successful 
      Else 
       Label1.Visible = True 'initially visible is false and text is INVALID PASSWORD 
      End If 

      con.Close() 
      ' Catch ex As Exception 

      ' End Try 
     End If 
    End Sub 

    Private Function Dept_login() As Integer 
     Throw New NotImplementedException 
    End Function 

End Class 

Answer 1

이 줄은 이해가되지 않습니다 :

If Not IsDBNull(ds) Then 

DS가 DBNull이 될하지 않습니다. 대신, 행의 수처럼 돌아 오는 확인 : 당신이되지 않은 경우 첫 번째 행 (.Rows(0))를 얻기 위해 노력하고

If ds.Tables(0).Rows.Length > 0 Then 

- 그 오류이 알려주는거야.

같은 것을 사용해보십시오 :

If ds.Tables(0).Rows.Count > 0 AndAlso Txtpwd.Text = ds.Tables(0).Rows(0).Item("password") Then 
     Response.Redirect("Online Services.aspx", False) 'the page i want to redirect to after login successful 
     Context.ApplicationInstance.CompleteRequest(); 
    Else 
     Label1.Visible = True 'initially visible is false and text is INVALID PASSWORD 
    End If 

    con.Close() 
    ' Catch ex As Exception 

    ' End Try 

(참고 : 당신은 SQL 쿼리에 대한 매개 변수화를 사용해야합니다 당신은 SQL 주입 공격에 노출 자신을 떠난다..)

Answer 2

이 줄은 '아무튼 t 메이크 감각 :

If Not IsDBNull(ds) Then 

는 의미를

If ds.Tables(0).Rows.count > 0 andalso ds.Tables..count > 0 Then 

END IF 

만든다

희망이 있습니다

Answer 3

데이터 어댑터 대신 datareader를 사용해 보셨습니까?

Try 
     Dim datare As SqlDataReader 
     Using cn As New SqlConnection(ConfigurationManager.ConnectionStrings("VMSConnectionString").ConnectionString) 
      Using cmd As New SqlCommand("SELECT password FROM Dept_login WHERE user_id='@User'", cn) 
       cmd.Parameters.AddWithValue("@User", Txtuname.Text) 
       cn.Open() 
       datare = cmd.ExecuteReader() 
       With datare 
        If .Read() Then 
         If .Item(0) = txtpwd.Text Then 
          Response.Redirect("Online Services.aspx") 
         Else 
          Label1.Visible = True 
         End If 
        End If 
       End With 
      End Using 
     End Using 
    Catch ex As Exception 
     Throw ex 
    End Try 

또한 쿼리에서 user_id를 작성합니다. 사용자 이름을 의미 했습니까? 당신은 정확한 쿼리입니까?