Hola
Primero, esta sentencia tiene la palabra WHERE pegada a tu cantidad doble
Código vb:
Ver originalactualizado.CommandText = ("UPDATE producto SET cantidad_disponible=" & Convert.ToDouble(cantidaddis) & "WHERE id_producto=" & Convert.ToDouble(cboproducto2.SelectedValue.ToString) & "")
Dale un espacio para que se delimite:
Código vb:
Ver originalactualizado.CommandText = ("UPDATE producto SET cantidad_disponible=" & Convert.ToDouble(cantidaddis) & " WHERE id_producto=" & Convert.ToDouble(cboproducto2.SelectedValue.ToString) & "")
segundo, me parece(no las he utilizado) que las cantidades double's van con apostrofe... es decir(en el SET y en el filtro WHERE)
Código vb:
Ver originalactualizado.CommandText = ("UPDATE producto SET cantidad_disponible='" & Convert.ToDouble(cantidaddis) & "' WHERE id_producto='" & Convert.ToDouble(cboproducto2.SelectedValue.ToString) & "'")