problemas con vb.net y access

[chaka106]

Iniciado por jaullo

Talvez si colocas un poco de código seria mas facil, pero se me ocurre que esto es porque no estas haciendo un commit de los datos, por eso no se mantienen permanentemente.

Prueba haciendo el commit luego del insert

te dejo el codigo ke me pedias: todo esto lo tengo dentro de un boton y no tengo mas codigo si te das cuenta hay varios intentos dentro del mismo codigo pero no me funcionan ninguno

Código:

        Dim nombre As String
        Dim ingredientes As String
        Dim laboratorio As String
        Dim descripcion As String
        Dim descuento As Double
        Dim existencia As Integer
        Dim precio As Double
        Dim numprod As String
        numprod = Me.txtnumprod.Text
        nombre = Me.txtnomalta.Text
        ingredientes = Me.txtingalta.Text
        laboratorio = Me.txtlabalta.Text
        descripcion = Me.txtdescalta.Text
        descuento = Me.txtdescualta.Text
        precio = Me.txtprecalta.Text
        existencia = Me.txtexisalta.Text
        Dim ricami As New RicamiDataSet.ProductosDataTable
        Dim insertaproducto As New RicamiDataSetTableAdapters.ProductosTableAdapter
        Dim dt As RicamiDataSet


        dt.Descripcion = descripcion
        dt.FechaIngreso = Now
        dt.IdProducto = numprod
        dt.Marca = laboratorio
        dt.Precio = precio
        dt.Producto = nombre

        insertaproducto.InsertQuery(numprod, nombre, laboratorio, descripcion, Now, precio)

        ricami.Rows.Add(dt)
        ricami.AcceptChanges()

        Dim existencias As New RicamiDataSetTableAdapters.ExistenciasTableAdapter
        existencias.InsertQuery(numprod, existencia)
        Dim descuentoalta As New RicamiDataSetTableAdapters.DescuentosTableAdapter
        descuentoalta.InsertQuery(numprod, Now, descuento)