erro no Login em vb 2005

Ruben_Barbosa

Power Member
Da-me este Erro
semttulomk0.jpg


E o Codigo é

Código:
Dim daSql As New SqlDataAdapter
        daSql = New SqlDataAdapter("select * from utilizador where utilizador='" & txtUtilizador.Text & "' and password='" & txtPassword.Text & "'", Connection.ConnectionString)
        daSql.Fill(dsSQL, "utilizador")
        If dsSQL.Tables.Item(0).Rows(0).Item(0) = 1 Then
            Utilizador = txtUtilizador.Text
            Main_Renamed.Show()
        Else
            MsgBox("Utilizador ou password incorrectas.", MsgBoxStyle.Critical)
            txtUtilizador.Text = ""
            txtPassword.Text = ""
            txtUtilizador.Focus()
        End If

        daSql = Nothing
        dsSQL = Nothing
 
Back
Topo