Visual Basic - UPDATE VISUAL BASIC

Life is soft - evento anual de software empresarial
 
Vista:

UPDATE VISUAL BASIC

Publicado por juan (1 intervención) el 02/07/2021 08:04:33
Muy buenas.
El select me lo hace bien, pero el update no.

Por privacidad no puedo poner mi servidor, pero esta puesto bien.
¿Alguien me puede ayudar?

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
Public Sub conectate(usuario As String, password As String, Optional visible As Boolean = False)
 
 
 
Dim connString As String = "server=(PRIVACIDAD);Port=(PRIVACIDAD); user id=(PRIVACIDAD); password=(PRIVACIDAD); database=(PRIVACIDAD)"
Dim sqlConn As New MySqlConnection(connString)
Dim sqlQuery As String = "SELECT etiqueta,id,cont,capacidad FROM contenedores "
Using sqlConn
    Using sqlComm As New MySqlCommand()
        With sqlComm
            .Connection = sqlConn
            .CommandText = sqlQuery
            .CommandType = CommandType.Text
 
 
        End With
        Try
            sqlConn.Open()
            Dim sqlReader As MySqlDataReader = sqlComm.ExecuteReader()
            While sqlReader.Read()
 
 
                Dim cont = sqlReader("cont").ToString()
                Dim capacidad = sqlReader("capacidad").ToString()
                MessageBox.Show(cont)
            End While
 
 
            Dim update_command As New MySqlCommand("UPDATE `contenedores` SET `tipo` ='prueba' where `id`='147'", sqlConn)
 
 
 
 
 
 
            sqlConn.Close()
        Catch ex As MySqlException
            MessageBox.Show(ex.Message)
 
 
 
 
 
        End Try
 
 
 
    End Using
End Using
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder