Ir para conteúdo

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

mayconsilvaa

Dúvidas Visual Basic + MySql

Recommended Posts

Fala pessoal, blz ? Sou iniciante em VB e por isso estou com algumas dificuldades.

 

Criei um sistema com 3 forms.

 

form1 - Ele imprimir os resultados

form2 - Cadastra os usuários

form3 - Faz acesso a área principal ( que no caso é o form1 ).

 

form2 - Está cadastrando corretamente.

form3 - Está acessando corretamente com os dados que foi cadastrado no form2.

 

O problema é no form1, eu criei uma Label que gostaria que ela imprimisse um resultado que encontra-se no BD... vamos entender.

 

Form2 - Possui 3 campos ( É possível perceber que no cadastro ele insere 3 informações no bd )

 

6d10d778a8a34bf78a801aa271e76068.png

 

Form3 - Acessa a área principal (Já após o cadastro é solicitado apenas "usuário e senha" ).

bb7e0ec48a954981927dfb2646d4100c.png

 

Form 1 - É neste que desejo o resultado

fe8ab742a06d40fca014b3fccc99ec30.png

BD - 

3e14c501801c4b44ba55461920385b18.png

 

Resumindo..

Eu gostaria que após logar no sistema e fosse aberto o form1, o sistema automaticamente detectaria qual o usuário logou e que fosse impresso o campo "nome" deste usuário cadastrado na Label citada acima, que no caso é Label inserida no form1.

 

Agradeço a quem puder ajudar hehehe.

 

Abraços.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Quando ele faz login, você não busca no banco pra autenticar?

Salva o objeto do usuário em algum lugar (desktop acho que a melhor opção é uma variável 'static'), e depois é só exibir.

Compartilhar este post


Link para o post
Compartilhar em outros sites

mayconsilvaa,

Você pode fazer de N modos, um modo simples. Pelo que entendi você está começando agora com programação.

 

Dim checkUser As New MySqlCommand("select * from usuarios where nome = ?nome and senha = ?senha", Conexao)
        checkUser.Parameters.AddWithValue("?nome", txtNome.Text)
        checkUser.Parameters.AddWithValue("?senha", txtSenha.Text)
        Dim leitor As MySqlDataReader = checkUser.ExecuteReader()
 
        leitor.Read()
 
        'Se retornar algum valor é pq foi autenticado
        If leitor.HasRows = True Then
            lblUsuario.Text = leitor.GetString("nome")
            lblIdUsuario.Text = leitor.GetInt32("id"'Ou pode ser leitor.GetInt64("id") depende do tamanho do INT do seu banco de dados
        Else
            MessageBox.Show("Usuário ou Senha invalido""Aviso")
        End If
 
        leitor.Close()

 

No lblUsuario.Text você substitui por alguma class Static readonly para ser chamado a qualquer momento sem ter que instanciar um novo objecto

Compartilhar este post


Link para o post
Compartilhar em outros sites

  • Conteúdo Similar

    • Por ILR master
      Fala pessoal.
       
      Seguinte:
       
      Quero selecionar duas tabelas e mostrar com resultados intercalados. Abaixo segue um código explicando para vcs terem uma ideia.
       
      $consulta = "SELECT A.*, B.* FROM tabela1 A, tabela2 B'";
      $resultado = mysqli_query($conexao, $consulta) or die ("erro");
      while($busca = mysqli_fetch_array($resultado)){
       
      print $busca['cod_evento']; --> traz o código da tabela1 
      print $busca['titulo_evento']; -->  traz o titulo da tabela1
      print $busca['cod_noticia']; --> traz o código da tabela2
      print $busca['titulo_noticia']; --> traz o tituloda tabela2
       
      }
       
      Espero que entendam. Grato
       
    • Por gersonab
      Bom dia
      estou com uma dúvida de como proceder, tenho uma tabela de categoria e uma de subcategoria, a categoria pode ter várias subs, até ai tranquilo, quando faço update de uma sub altero normalmente a quantidade deste, até aí normal, porém me deparei com uma situação um pouco diferente, vou tentar ser o mais claro possível, de certa forma algumas subs são comuns só mudando o nome praticamente, aí eu preciso que ao efetuar o update em umas destas este ocorra nas demais, tipo:
       
      Se o id da sub for 5 , eu preciso fazer o mesmo update nos ids 6 e 7 ;
       
      Se o id da sub for 9 , eu preciso fazer o mesmo update no id 10
       
      se for 2 , fazer o update somente neste
       
      ainda não estou conseguindo ver uma lógica para isso, e ou uma nova coluna para cadastrar em comum nestes casos.
       
      qual seria a melhor opção
    • Por JoaoSilva75
      oi pessoal
       
      se eu entrar no link dos desenvolvedores php pesquisasar quem é programador e enviar uma mesma mensagem para uns 6 ou 8 membros do forum serei advertido   ou é spam ???????
       
      procuro um programador php para me fazer algo 
       
      mas não tem como postar aqui nessa sessão
       
    • Por clovis.sardinha
      Tenho uma consulta de autocomplete no bd que funciona no servidor local e não roda no servidor da web. 
      Ao enviar a consulta no servidor local  aparece no console :Fetch terminou o carregamento: GET ".../Cidade?cidade=sao%20paulo". A pesquisa é feita normalmente.
      Quando mando a mesma pesquisa para o servidor web(locaweb) aparece no console: Fetch terminou o carregamento: GET "..../Cidade?cidade=sao%2520paul".
      O número 25 aparece só no servidor web. Pelo que pesquisei 25 significa %, ou seja, está duplicando o caractere %. 
      Não consegui utilizar nenhuma função para evitar que isto ocorra. Alguém sabe se há alguma configuração no servidor web que possa ser alterada para evitar essa duplicação?
       
    • Por gersonab
      Boa tarde, estou quebrando a cabeça aqui para somar os dados agrupados de vários itens distintos de uma tabela e inserir em outra. tipo :
      $consulta31 = $pdo->query("SELECT SUM(valoror) AS val1, SUM(metros) AS metr, orc, idcatc, idmate FROM orcamencli WHERE orc=$orc GROUP BY idcatc, idmate"); $user331 = $consulta31->fetch(PDO::FETCH_ASSOC); $orcx = $user331['orc']; $idcatcx = $user331['idcatc']; $val1x = $user331['val1']; $metrx = $user331['metr']; $idmatex = $user331['idmate']; o resultado de cada item agrupado eu faria um outro calculo separado para inserir em outra tabela, tipo ...
      a tabela acima eu teria algo assim :
       
      orcx = 01 - 01 - 01 - 01 - 01 - 01 - 01 - 01 - 01
      idcatcx = 11 - 11 - 11 - 11 - 11 - 11 - 11 - 11 - 11
      val1x = 1,00 - 1,00 - 3,00 - 3,00 - 3,00 - 1,00 - 3,00 - 1,00 - 2,00
      metrx =  01 - 01 - 03 - 03 - 03 - 01 - 03 - 01 - 02
      idmatex =  11 - 11 - 21 - 21 - 21 - 31 - 31 - 31 - 31
       
      preciso inserir  na outra tabela o seguinte :
      orc = 01 - 01 - 01
      idcatc = 11 - 11 - 11
      val1 = 2,00 - 9,00 - 7,00 ( aqui não é só a soma dos valores , existe um outro cálculo )
      metr =  02 - 09 - 07
      idmate =  11 -  21 -  31
       
       a dúvida é --> como inserir estes valores separados de uma única vez em outra tabela.
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.