[vb.net] If probleem

[Verwijderd]

Ik heb onderaan mijn stukje script een probleem in de IF functie de waarde die uit de database komt is 0x0 nu wil ik het daarop laten checken : If ("0x0" = plaatje) Then
De uitkomst is echter altijd "on" zelf als de waarde b.v. 1x1 is dat ik check dmv "label3.text = plaatje"
Die IF functie werkt dus niet helemaal zoals ik zou willen dat het werkt

Kan iemand mij vertellen wat ik fout doe ?

PHP:

        Dim device As String
        Dim check As String
        device = "11"
        check = "0x0"

        conn = New MySqlConnection
   
        myCommand.Connection = conn
        myCommand.CommandText = "SELECT status  FROM sensors WHERE id = ?add"
        myCommand.Parameters.Add("?add", device)
        
        plaatje = myCommand.ExecuteScalar
        Label2.Text = plaatje

        conn.Close()

        Label3.Text = plaatje

        If ("0x0" = plaatje) Then
            Label2.Text = "Off"
            PictureBox2.Image = Image.FromFile("gfx\server2.gif")
        Else
            Label2.Text = "On"
            PictureBox2.Image = Image.FromFile("gfx\server1.gif")
        End If

EDIT
De waarde is altijd "on"

[ Voor 9% gewijzigd door Verwijderd op 16-03-2005 10:36 ]

[Janoz]

Wordt met 0x0 misschien niet de string "0x0", maar de hexadecimale waarde 0 bedoeld?

[Verwijderd]

Janoz schreef op woensdag 16 maart 2005 @ 10:17:
Wordt met 0x0 misschien niet de string "0x0", maar de hexadecimale waarde 0 bedoeld?

ik heb ok al getest :

If (check = plaatje) Then

maar probleem blijft.

[Creepy]

omdat check zeer waarschijnlijk ook een string is. "0x0" en 0x0 zijn twee heel verschillende dingen

[PaulZ]

Lullige vraag misschien, maar wat staat er voor tekst in var plaatje (is de variabele plaatje wel een string)?

[ Voor 23% gewijzigd door PaulZ op 16-03-2005 10:27 ]

[OZ-Gump]

Maar check is een string met de waarde "0x0" en dat is nog steeds iets anders dan de hexadecimale waarde 0. Controleer maar eens wat er gebeurt als je plaatje.ToString() gebruikt. Jij moet controleren op de hex waarde 0:

Visual Basic .NET:

if (plaatje = 0x0) then

[Verwijderd]

PaulZ schreef op woensdag 16 maart 2005 @ 10:23:
Lullige vraag misschien, maar wat staat er voor tekst in var plaatje (is de variabele plaatje wel een string)?

Ja is idd een string

OZ-Gump schreef op woensdag 16 maart 2005 @ 10:24:
Maar check is een string met de waarde "0x0" en dat is nog steeds iets anders dan de hexadecimale waarde 0. Controleer maar eens wat er gebeurt als je plaatje.ToString() gebruikt. Jij moet controleren op de hex waarde 0:

Visual Basic .NET:

if (plaatje = 0x0) then

Ik ga het nu even testen

[Verwijderd]

OZ-Gump schreef op woensdag 16 maart 2005 @ 10:24:
Maar check is een string met de waarde "0x0" en dat is nog steeds iets anders dan de hexadecimale waarde 0. Controleer maar eens wat er gebeurt als je plaatje.ToString() gebruikt. Jij moet controleren op de hex waarde 0:

Visual Basic .NET:

if (plaatje = 0x0) then

Helaas wederom geen succes...
Moet ik perse een string gebruiken of kan een ander type ook? het is niet een hexedecimale waarde maar 3 tekens achter elkaar dat lijkt op hexe

[4VAlien]

'==' ipv = , ben zelf geen vb.net programmeur maar dit lijkt me typisch zo'n geval.

[gorgi_19]

4VAlien schreef op woensdag 16 maart 2005 @ 10:40:
'==' ipv = , ben zelf geen vb.net programmeur maar dit lijkt me typisch zo'n geval.

Dat ken VB.Net niet.

[Verwijderd]

gorgi_19 schreef op woensdag 16 maart 2005 @ 10:42:
[...]

Dat ken VB.Net niet.

heb het zelfs met IS geprobeerd dan kent VB.net wel

[OZ-Gump]

smartscan: wat komt er uit je .ToString() van plaatje? Tover dat eens op het scherm, misschien dat je daar verder mee komt (en daar op kunt controleren)...

[Verwijderd]

OZ-Gump schreef op woensdag 16 maart 2005 @ 10:44:
smartscan: wat komt er uit je .ToString() van plaatje? Tover dat eens op het scherm, misschien dat je daar verder mee komt (en daar op kunt controleren)...

Visual Basic:

        plaatje.ToString()
        Label3.Text = plaatje
        If (plaatje = check) Then
            Label2.Text = "Off"
            PictureBox2.Image = Image.FromFile("gfx\server2.gif")
        Else
            Label2.Text = "On"
            PictureBox2.Image = Image.FromFile("gfx\server1.gif")
        End If

Label3 staat netjes op 0x0
maar krijg nog steeds te zien dat hij "On" is

[ Voor 7% gewijzigd door Verwijderd op 16-03-2005 10:48 ]

[gorgi_19]

Verwijderd schreef op woensdag 16 maart 2005 @ 10:44:
[...]


heb het zelfs met IS geprobeerd dan kent VB.net wel

Visual Basic .NET:

Dim a as Integer == 5

Levert bij mij toch echt een error op

[OZ-Gump]

En je leest de waarde van je ToString() niet uit dus kun je er ook niet op controleren. ToString() is een functie die een string returnt, en niet een die je variabele plaatje aan gaat lopen passen...

NOFI, maar ik krijg steeds meer het gevoel dat je eens een goed boek over programmeren moet kopen...

[ Voor 17% gewijzigd door OZ-Gump op 16-03-2005 10:52 ]

[Verwijderd]

gorgi_19 schreef op woensdag 16 maart 2005 @ 10:48:
[...]

Visual Basic .NET:

Dim a as Integer == 5

Levert bij mij toch echt een error op

Sorry gorgi_19 ik begrijp het niet helemaal ik bedoelde dat ik IS heb gebruikt in de if statement.
Excusses voor het misverstand

Visual Basic:

If (plaatje Is check) Then

[Coyote]

Wat gebeurt er als je niet de = operator gebruikt maar de equals-functie?

dus zoiets als

Visual Basic:

 
If (plaatje.equals(check)) Then 
...        

[Verwijderd]

Coyote schreef op woensdag 16 maart 2005 @ 10:53:
Wat gebeurt er als je niet de = operator gebruikt maar de equals-functie?

dus zoiets als

Visual Basic:

 
If (plaatje.equals(check)) Then 
...        

Wederom geen succes.
De waarde van plaatje is 0x0 en check ook.

Visual Basic:

 
        plaatje = plaatje.ToString
        Label3.Text = plaatje
        If (plaatje.Equals(check)) Then

            Label2.Text = "Off"
            PictureBox2.Image = Image.FromFile("gfx\server2.gif")
        Else
            Label2.Text = "On"
            PictureBox2.Image = Image.FromFile("gfx\server1.gif")
        End If

[OZ-Gump]

Kijk eens wat er gebeurt als je allebei de strings die je hebt converteert naar dezelfde casing, dus bijvoorbeeld bij allebei .ToLower() gebruiken. Je krijgt dan zoiets als

Visual Basic .NET:

  If (plaatje.ToString().ToLower() = check.ToLower()) Then 

[FoxMan]

Ik zie nergens de declaratie van plaatje staan, is deze wel gedeclareerd als string? En misschien kun je een keer proberen het object dat ExecuteScalar teruggeeft expliciet te casten naar een string (cStr(myCommand.ExecuteScalar))

[Coyote]

Welk type heeft het veld status in de database?

[Verwijderd]

het veld in de db is type varchar
Het lijkt mij dat ik niet iets onmogelijks wil en dus nog steeds ergens een fout hebt zitten die ik zelf niet zie.

Visual Basic:

Private Sub btn_check_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_check.Click
        Dim device As String
        Dim check As String
        Dim plaatje As String

        device = "11"
        check = "0x0"

        conn = New MySqlConnection
        conn.ConnectionString = "server=" & txtServer.Text & ";" _
         & "user id=" & txtUsername.Text & ";" _
         & "password=" & txtPassword.Text & ";" _
         & "database=ncs"
        Try
            conn.Open()
            Label1.Text = "Connection Opened Successfully"
            conn.Close()
        Catch myerror As MySqlException
            Label1.Text = "Error Connecting to Database: " & myerror.Message
        Finally
            conn.Dispose()
        End Try

        conn.Open()

        myCommand.Connection = conn
        myCommand.CommandText = "SELECT status  FROM sensors WHERE id = ?add"
        myCommand.Parameters.Add("?add", device)
        plaatje = myCommand.ExecuteScalar
        Label2.Text = plaatje

        conn.Close()

        Label3.Text = plaatje
        Label1.Text = check

        If (plaatje.ToString().ToLower() = check.ToLower()) Then
            Label2.Text = "Off"
            PictureBox2.Image = Image.FromFile("gfx\server2.gif")
        Else
            Label2.Text = "On"
            PictureBox2.Image = Image.FromFile("gfx\server1.gif")
        End If

    End Sub

[OZ-Gump]

Het is toevallig toch ook niet een verschil tussen 0x0 en OxO he....

[Remco]

Heb je dat al van oz-gump geprobeerd ?
Dus alles naar string zetten en lowercase ?
Dat moet haast zeker te weten werken.

[Verwijderd]

Remc0 schreef op woensdag 16 maart 2005 @ 11:45:
Heb je dat al van oz-gump geprobeerd ?
Dus alles naar string zetten en lowercase ?
Dat moet haast zeker te weten werken.

Heb dat van oz-gump ook getest maar weer geen succes
het is echt 0x0 dus geen OxO

[OZ-Gump]

Wat ik me nog zou kunnen voorstellen is dat de returnvalue van ExecuteScalar nog ergens spaties voor of na zich heeft. Vraag bijvoorbeeld de lengte van die string eens op, zodat je kunt zien of er misschien nog karakters voor of achter de 0x0 staan.

Verder zou je kunnen proberen de ascii waarden van de karakters eens op te vragen. Misschien lijkt het 't een, maar is het 't ander...

[Verwijderd]

Ik ga het proberen ik zal het resultaat nog even posten

[Remco]

Verwijderd schreef op woensdag 16 maart 2005 @ 11:50:
[...]
Heb dat van oz-gump ook getest maar weer geen succes
het is echt 0x0 dus geen OxO

Ik bedoel eigenlijk dit van oz-gump:

Visual Basic:

If (plaatje.ToString().ToLower() = check.ToLower()) Then

[OZ-Gump]

offtopic:
Remc0, kijk even naar de laatste code-post van smartscan: hij heeft de ToLower ook al geprobeerd, maar zonder (positief) resultaat

[StevenK]

Het ligt misschien aan mij, maar ik heb het idee dat TS probeert te testen op een null ?

Dan zou

Visual Basic:

if (plaatje is null) 

genoeg moeten zijn en waarschijnlijk zou

Visual Basic:

if plaatje

ook al werken ?

[OZ-Gump]

@StevenK: de TS test of de variabele plaatje gelijk is aan de variabele check, waarin hij de string 0x0 zet. Hij krijgt dat (waarschijnlijk) ook als resultaat uit de ExecuteScalar methode van zijn command. In de 28 posts boven je is dat toch al een aantal keer voorbij gekomen...

smartscan: heb je de lengte van je string al eens opgevraagd en de karakters gecontroleerd?

[Verwijderd]

OZ-Gump schreef op woensdag 16 maart 2005 @ 13:31:
@StevenK: de TS test of de variabele plaatje gelijk is aan de variabele check, waarin hij de string 0x0 zet. Hij krijgt dat (waarschijnlijk) ook als resultaat uit de ExecuteScalar methode van zijn command. In de 28 posts boven je is dat toch al een aantal keer voorbij gekomen...

smartscan: heb je de lengte van je string al eens opgevraagd en de karakters gecontroleerd?

Mijn dank is groot !_/-\o_
er zat idd nog een spatie voor bij de var "plaatje"

Nu werkt het eindelijk lekker en kan dit topic eindelijk dicht!

Bedankt voor alle hulp bij dit DOMME probleem