Riga 44: Sub popola_evento()
Riga 45: Dim sqlStr, sqlStr2 As String
Riga 46: conn.Open()
Riga 47: sqlStr = "SELECT Articoli.*, Articoli_tipo_articolo.* FROM Articoli Inner Join Articoli_tipo_articolo On Articoli.id_articolo=Articoli_tipo_articolo.id_articolo where Articoli.id_articolo=@aid And Articoli.data_eliminazione Is Null And Articoli_tipo_articolo.id_tipo_articolo=1"
Riga 48: command_port = New MySqlCommand(sqlStr, conn)
|