Quantcast
Channel: Tópicos
Viewing all articles
Browse latest Browse all 14700

Inserção de campo double no banco de dados

$
0
0
Boa tarde, Ok, nesse caso o Mysql aparentemente estará a usar o "." como caracter de separação decimal e o sistema operativo o "," . Imports System.Globalization connection() Dim val As Double ''val = Valor.Text.Replace(",", ".") double val = double.Parse(Valor.Text, NumberStyles.AllowDecimalPoint, new NumberFormatInfo() { NumberDecimalSeparator = "." }); //parse forçando o caracter decimal a ser o ponto Try SQL = "UPDATE produtos set quantidade = " & val & " where codigobarra = " & Codigo.Text & "" cmd = New MySqlCommand(SQL, conn) cmd.ExecuteNonQuery() MsgBox(val) cmd = Nothing Catch ex As MySqlException MsgBox(ex.Message) End Try conn.Close() quant = Nothing val = Nothing Não deve estar muito longe disto, mas não tive oportunidade de testar. Outra alternativa Imports System.Globalization NumberFormatInfo nfi = new NumberFormatInfo(); nfi.NumberDecimalSeparator = "."; connection() Dim val As Double ''val = Valor.Text.Replace(",", ".") double val = double.Parse(Valor.Text, NumberStyles.AllowDecimalPoint, new NumberFormatInfo() { NumberDecimalSeparator = "." }); //parse forçando o caracter decimal a ser o ponto val.ToString(nfi); //força o ponto a ser o separador decimal Try SQL = "UPDATE produtos set quantidade = " & val & " where codigobarra = " & Codigo.Text & "" cmd = New MySqlCommand(SQL, conn) cmd.ExecuteNonQuery() MsgBox(val) cmd = Nothing Catch ex As MySqlException MsgBox(ex.Message) End Try conn.Close() quant = Nothing val = Nothing Cordiais cumprimentos, Apocsantos

Viewing all articles
Browse latest Browse all 14700

Trending Articles