none
Problema como IF Else RRS feed

  • Pergunta

  • Tenho um valor chegando de uma maquina remota, o servidor faz a leitura do valor e passa esse valor para uma string

     Dim networkStream As NetworkStream = tcpClient.GetStream()
                Dim bytes(tcpClient.ReceiveBufferSize) As Byte
                networkStream.Read(bytes, 0, CInt(tcpClient.ReceiveBufferSize))
                Dim clientdata As String = Encoding.ASCII.GetString(bytes)
                NovoCMD = clientdata
    ProcessarCMD()

    Depois que a variável NovoCMD recebe o valor a rotina ProcessarCMD é chamada e ela fazer uma verificação com base no valor da string para executar comandos na maquina local

    If NovoCMD = "MONI" Then
                Fr_teste.ListBox1.Items.Add("COMANDO ACEITO")
            End If

    mais ela simplesmente ignora o valor da string, a string recebe o valor MONI e a rotina não adiciona o valor COMANDO ACEITO NA LISTBOX1, ele descaradamente ignora o IF, mais se coloco algo no Else ele funciona.... O.o

    Tentei utilizar o ElseIf para executar uma ação mais também é ignorado 

    • Editado Tiago.SP quinta-feira, 28 de maio de 2015 14:47
    quinta-feira, 28 de maio de 2015 14:45

Respostas

  • Se vc coloca um "else" e funciona,  entao é porque a expressao NovoCMD = "MONI" é falsa:  NovoCMD é diferente de MONI

    Como essa informaçao provalvelmente esta vindo de uma comunicaçao socket, pode ser que exista um byte à mais.

    Att


    William John Adam Trindade
    Analyste-programmeur
    ----------------------------------------------------------

    quinta-feira, 28 de maio de 2015 14:53
    Moderador