Protected Sub ingallery_click(sender As Object, e As System.EventArgs)
            'inserisce nella gallery
            Dim conn As SqlConnection
            Dim str3 As String
            Dim cmd As SqlCommand
            
            Dim ID_i As Integer = ingallery.CommandName
            conn = New SqlConnection(ConfigurationManager.ConnectionStrings.Item("conn1").ConnectionString)
            
            str3 = "update immagini set [stato]=0 where ID_i=@ID_i"
            cmd = New SqlCommand(str3, conn)

            cmd.Parameters.AddWithValue("ID_i", ID_i)
               
            conn.Open()
            cmd.ExecuteNonQuery()
            conn.Close()
            
            
            sqldata1.SelectCommand = hiddenstring1.Value
            update1.Update()
            
            
            
            'cambia il BG
            
        End Sub