VB 2005 - Pq no me guarda en la BD

[Laufwerk]

Hola amigos !!!
Tengo un botón que le asigno este codigo

Código:

        Dim nuevoValor As String
        nuevoValor = InputBox("Escribe el nuevo destino a añadir al combo", titleName)
        If nuevoValor <> "" Then
            Me.DestinosTableAdapter.Insert(nuevoValor.ToUpper)
            Dim newRow As dbDataSet.destinosRow
            newRow = Me.DbDataSet.destinos.NewdestinosRow
            newRow.descripcion = nuevoValor.ToUpper
            Me.DbDataSet.destinos.Rows.Add(newRow)
            Try
                Me.DestinosBindingSource.EndEdit()
                Me.DestinosTableAdapter.Update(Me.DbDataSet.destinos)
            Catch ex As Exception
                MsgBox(ex.Message)
            End Try
        Else
            MsgBox("No has introducido nada, por tanto, no se ha añadido nada.", MsgBoxStyle.Information, titleName)
        End If

Quisiera saber pq no me guarda dicho nuevo valor en mi tabla
La tabla contiene tan solo dos columnas,
ID = autonumerica
descripcion = string


Gracias!!

[Trulala de cordoba]

Seguramente debe ser porque estas usando una base de datos access o porque usas un archivo mdb de sql server incluido en tu proyecto, por lo cual cuando ejecutas tu aplicacion la base se copia en un archivo temporar y luego cuando la cerras se borra la misma. Si asi lo que podes hacer mientras estas desarrollandola es a tu cadena de conexion ponerle la ruta absoluta de tu base, algo como "C:\miproyecto\mybase.mdb"

[Laufwerk]

efectivamente utilizo una base de datos access.
en las propiedades de mi proyecto, en configuración tengo una variable dbConnectionString que su valor es

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\db.mdb

y en mi explorador de soluciones tengo la db.mdb y dbDataSet.xsd

Me podríais pasar el código para grabar? Sin que sea SQL, por los métodos FILL...


Gracias!!!