arkadaşlar kolay gelsin ben access bağlantılı bir proje geliştirmekteydim. Accesteki tablolarımdaki sayı olan verileri ondalık sayı yapınca veriler gelmez oldu. Sebebi nedir? nasıl halledebilirim. aşağıdaki kod şeklinde getiriyordum verilerimi.
Dim baglan As New Connection
Dim rs As New Recordset
baglan.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\Win10\OneDrive\Masaüstü\barkod sistemi\Data\Report\data.accdb;"
rs.Open "SELECT Barkodkodu,miktar,urunadi FROM stokmiktari where miktar>=40", baglan, adOpenKeyset, adLockPessimistic
With Me.ListBox1
.ColumnCount = 3
.ColumnWidths = "125;65;125"
.Column = rs.GetRows
End With
rs.Close
baglan.Close
Exit Sub
Dim baglan As New Connection
Dim rs As New Recordset
baglan.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\Win10\OneDrive\Masaüstü\barkod sistemi\Data\Report\data.accdb;"
rs.Open "SELECT Barkodkodu,miktar,urunadi FROM stokmiktari where miktar>=40", baglan, adOpenKeyset, adLockPessimistic
With Me.ListBox1
.ColumnCount = 3
.ColumnWidths = "125;65;125"
.Column = rs.GetRows
End With
rs.Close
baglan.Close
Exit Sub
