Ir para conteúdo
Fórum Script Brasil

raphael_suporte

Moderadores
  • Total de itens

    1.378
  • Registro em

  • Última visita

Posts postados por raphael_suporte

  1. Acho que o Professor Carlos vai ficar bem chateado, pois ele deve ter passado isso em aula e você querendo de mão beijada a resposta.

    Caro colega, coloque aqui o que você já tentou fazer e onde está sua dificuldade dentro do script.

  2. Tenho uma tabela no firebird

    Com os campos ControelID , PedidoID, Nome, Endereço, Etc...

    Minha duvida é que estou tentando gerar um busca

    Sql = Select * From Tabela Nome Like txtNome

    Mais ou menos assim

    So que quero pegar os nomes somente dos pedidoID = 01

    ControelID = 01 = Paulo

    ControelID = 02 = Marcio

    So quando faço a busca ele pega dos da tabela 01 e 02

    Grato

    Coloque como está sua construção da string.

    Mas sua string deve ser assim para funcionar

    sql = "select * from Tabela where nome like '%" & txtNome.text & "%'"

    Porem se existir algum "Pedro Paulo" no seu banco ele irá exibir também devido o Like.

  3. Olá Marcio, seja bem vindo ao Script Brasil.

    você já tem a lógica do seu sistema? e está com dúvida ao converter o código para C#? ou você está com dúvida na lógica?

    post aqui uma parte do sistema já criado e parte que está com dúvidas.

  4. caso você queira usar o valor para uma consulta, não precisa exibir maiúscula, pode apenas converter ao guardar o valor em uma variavél, usando o UCASE(text1.text), porem se você quer que apareça no textbox o valor já em maiúsculas, terá que colocar no evento keyPress e verificar a tecla e concatenar ao texto que desejar

  5. porque seu Roteador só vai distribuir o IP quando um equipamento o solicita, e essa solicitação é feita quando inicia uma máquina, caso você já tenha o PC ligado e não queira reiniciar o mesmo apenas para isso, pode usar o comando para reconfigurar seu IP.

    INICIAR >> EXECUTAR >> digita "CMD"

    abrirá o prompt de comando DOS. digite:

    1- ipconfig /release

    2 - ipconfig /renew

    o primeiro comando irá zerar seu IP, o segundo irá solicitar ao servidor DHCP um novo IP e com isso reconhecerá seu Router como saída para a internet

  6. Meu caro, sua explicação não ficou muito clara, pois não entendi algumas coisas...

    - onde você não consegue se conectar, apena na internet ou na rede entre os PCs?

    - Caso seja na Internet, são os dois PCs ou apenas um?

    - eu reparei que seu escopo do GW está diferente das maquinas, tente colocar tudo no mesmo escopo... tipo 192.168.0.x, ou 192.168.254.0, uma vez que sua rede só tem 2 máquinas.

    - qual seu S.O ?

    - como está a distribuição de IP's (caso DHCP, que está distribuindo).

  7. 1º - você não declarou uma variavel para guardar o valor da multiplicação e nem um valor de entrada,, até se pode resolver o exercicio sem ela, mas seria melhor para visualizar com essa variavel.

    2º - O [passo m] ( não entendo muito de VisualG, talvez por isso não tenha entendido o porque dele estar aqui.

    3º Na hora de escrever o resultado você está imprimindo o valor do laço, no caso o "i", e não o valor do resultado, tente pôr assim:

    var
    i,result,entrada : inteiro
    
    inicio
    
    escreval ("Digite o valor que deseja multiplicar: ")
    leia(entrada)
    
    para i de 1 ate 10 faca
        result = entrada * i
        escreval (entrada," X ", i, " : ",result)
    fimpara
    
    fimalgoritmo

  8. o que eu queria falar é que se você já verificou se o os dois text são diferentes de empty o "Else" dele será que eles são iguais...

    porem vi um outro erro agora, caso o usuário preencha só o Login ele não verificará o outro porque seu IF está com "AND" e não com o " OR"

    faça um teste colocando apenas o usuário, sem senha e rode o programa, depois troque o AND pelo OR e teste novamente..

    Depois disso avisa para que eu possa fechar o Tópico.

  9. Matheus, achei seu Código muito Grande e bem confuso...

    não entendi o porque do,

    "If txtLogin.Text = Empty And txtSenha.Text = Empty Then"
    else
    If txtLogin.Text <> Empty And txtSenha.Text <> Empty Then
    você está validando 2 vezes a mesma coisa.. acho que esse código poderia se resolver em uma quantidade menor de linhas
    If txtLogin.Text = Empty And txtSenha.Text = Empty Then
             MsgBox "Prencha os campos corretamente!", vbCritical, "Erro"
             If txtLogin.Text = Empty Then
                     txtLogin.SetFocus
             else
                    txtSenha.SetFocus
             end if
        else ' Ele já validou se o campo está nulo, não precisa verificar novamente
            abrebanco
            Set rsdados = New Recordset
            rsdados.Open "SELECT * FROM logins WHERE login='" & txtlogin.text & "'", cn
            if not rsdados.eof then
                  if rsdados("Senha") = txtsenha.text then
                         msgbox "login efetuado"
                  else
                        MsgBox "Senha Inválido", vbCritical, "Erro"              
                  end if
            else
                  MsgBox "Login não encontrado", vbCritical, "Erro"              
            end if
      end if

  10. 1 - como você chama do Form_pai a tela de Login??

    2 - como você está validando o Login para fechar a tela de Login??

    para iniciar um novo objeto use a palavra "new" e o tipo do objeto, no seu caso Form_pai.

    se está precisando querendo colocar o Login em uma Label por exemplo, após confirmar o Login você iria associar da seguinte forma:

    Presumindo que esteja usando VB.NET

    dim TelaPai = new Form_Pai()
    
    
    'Esse IF na verdade é o seu IF de Consulta para o Login(Acredito que esteja usando um)
    if Login = True
    
          TelaPai.Label1.text = Login
    .
    .
    .
    .

×
×
  • Criar Novo...