pcsoft.us.windevCopyright 2026, PC SOFT23 Jun 2018 12:27:13 Z23 Jun 2018 12:27:13 ZI get wrong values when i read a field from an HyperFile SQL database. Source code: [code:wl] 'OleDB Try 'Openen Sarah Database HyperFile SQL Dim OleDbConnectionStr As String = "Provider=PCSoft.HFSQL; Initial Catalog=X:\Sarah\COPAM2018;" Dim OleDbSQL As String = "Select NUMART, DENOMART, DENOMART2, QTESTOCK, PXVENTE, PXACHAT,CTVA from ARTICLES WHERE NUMART='" & TextBox1.Text & "'" Dim OleDbConnection As New OleDbConnection(OleDbConnectionStr) 'Openen van verbinding OleDbConnection.Open() 'Maak een Command Object aan Dim OleDbCommand As New OleDbCommand(OleDbSQL, OleDbConnection) OleDbCommand.CommandType = CommandType.Text 'Maak een datareader aan Dim OleDbReader As OleDbDataReader = OleDbCommand.ExecuteReader() 'Zoek de data en plaats in lokale variabelen While OleDbReader.Read() Dim EANCODE As String = CType(OleDbReader.Item("NUMART"), String) Dim PN As String = CType(OleDbReader.Item("DENOMART"), String) Dim DESC As String = CType(OleDbReader.Item("DENOMART2"), String) Dim QTY As String = CType(OleDbReader.Item("QTESTOCK"), String) Dim VKPRICEEXCL_SARAH = OleDbReader.Item("PXVENTE") Dim PRICE_SARAH = OleDbReader.Item("PXACHAT") Dim BTW As String = CType(OleDbReader.Item("CTVA"), String) Dim BRON As String = "SARAH" Dim VKPRICEINCL As String = VKPRICEEXCL_SARAH * 1.21 Dim MARGE_F As String = VKPRICEEXCL_SARAH - PRICE_SARAH Dim MARGE_P As String = ((VKPRICEEXCL_SARAH / PRICE_SARAH) - 1) * 100 TextBox2.Text = DESC TextBox3.Text = QTY TextBox4.Text = PRICE_SARAH TextBox5.Text = BTW TextBox6.Text = VKPRICEEXCL_SARAH Dim Rij As String() = New String() {BRON, DESC, PN, EANCODE, QTY, PRICE_SARAH, MARGE_P, MARGE_F, VKPRICEEXCL_SARAH, VKPRICEINCL} DataGridView1.Rows.Add(Rij) End While 'Sluit de verbindingen met de database OleDbReader.Close() OleDbConnection.Dispose() OleDbConnection.Close() Catch ex As Exception MessageBox.Show("Niks gevonden in de database.[SARAH]", "Zoeken") End Try [/code] for VKPRICEEXCL_SARAH i get vaulue = 2478,5124 instead of 24,785124 in the database its a Currency field What's wrong with the code above?30WEBDEVen_UShttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/65961-problems-reading-data-from-sql-visual-basic/read.awpmoderateur@pcsoft.fr (El moderador)webmaster@pcsoft.fr (El webmaster)