Login e senha migrado para MySql

[LJM!!! 0]

Bom dia pessoa,por favor quem puder me ajudar eu agradeço.

 

Migrei meu sistema para MySql só que ao excutar login e senha gera esse erro: " Object reference not set to an instance of an objetct"

 

e efetuando a verificação e testanto atraves do debug,ele para nesse comando: dr = cmd.ExecuteReader() tudo que possui depois desse comando não é executado ai mostra a mensagem.

 

O que possui de errado?? como corrigir???

 

Segue código login.aspx.vb

Dim conexaoMySQL As MySqlConnection
			Dim daMySQL As MySqlDataAdapter

			Dim cmd As MySqlCommand = New MySqlCommand
			Dim dr As MySqlDataReader

			Dim strSQL As String

			Dim authticket As FormsAuthenticationTicket
			Dim encryptedTicket As String
			Dim authCookie As HttpCookie

			Dim usuario As String = txtUsername.Text
			Dim senha As String = TxtPassword.Text

			Dim id As String = Session("id")




			Try
				conexaoMySQL = New MySqlConnection("Server=localhost; Uid=leandro; Pwd=lele12le; Database=dados")

				strSQL = "Select * From admin where ((usuario=?usuario)  and (senha=?senha))"

				daMySQL = New MySqlDataAdapter(strSQL, conexaoMySQL)

				With cmd.Parameters
					.Add(New MySqlParameter("usuario", usuario))
					.Add(New MySqlParameter("senha", senha))



				End With

				dr = cmd.ExecuteReader()

				If dr.HasRows Then
					authticket = New FormsAuthenticationTicket(txtUsername.Text.ToLower(), False, 60)
					encryptedTicket = FormsAuthentication.Encrypt(authticket)
					authCookie = New HttpCookie(FormsAuthentication.FormsCookieName, encryptedTicket)

					Response.Cookies.Add(authCookie)



					'Response.Redirect("atualizacao-site.aspx")
					Session("previousUser") = usuario
					dr.Read()


					Session("id") = dr("id").ToString

					Session("permissao") = dr("grupo").ToString



					If Not dr Is Nothing And Not dr.IsClosed() Then

						dr.Close()

					End If


					strSQL = "insert into log_acesso (nm_usuario,id_usuario,data_log) values('" & Session("previousUser") & "','" & id & "',now())"
					cmd.ExecuteNonQuery()



					If Session("permissao") = 0 Then
						Response.Redirect("mebros.aspx")
					Else
						Response.Redirect("mebros.aspx")
					End If


					'System.Web.Security.FormsAuthentication.RedirectFromLoginPage(usuario, False)



				Else

					lblMsg.Text = "Usuário ou senha incorreta"
					txtUsername.Text = ""
					TxtPassword.Text = ""

				End If

			Catch ex As Exception
				lblMsg.Text = ex.Message
			End Try

Muito Obrigado,

 

Leandro Molina

[quintelab 91]

Movido Plataforma .NET » Visual Studio .NET http://forum.imasters.com.br/public/style_emoticons/default/seta.gif Plataforma .NET » Web Applications

 

Cara testei seu código, mas deu outro erro, pois em nenhum momento no código você abriu sua conexão, é necessário abrir conexão antes de executar sua query.

 

Abraços...

[DBB 0]

Sei que não tem nada a ver mas preciso perguntar!

Cadê a segurança disso?? o correto não é usar os CustomMemberships?? onde você aplica regras de acesso a diretórios? qual a finalidade desse login??

 

 

Queria entender, porque muitas pessoas não usam o CustomMemberships e fazem códigos tradicionais usando session cookies etc...

 

 

Falow.

[quintelab 91]

É questão de conhecimento e costume.

Meus primeiros projetos em .net fiz da mesma forma como no asp utilizando Session, até conhecer a forma de segurança através do web.config.

 

Abraços...