merci de m'aiderCa serait avec plaisir.... mais si tu ne nous dis pas comment fonctionne ton programme (code à l'appuie).. difficile voir impossible pour nous de t'aider !
j'enregistre mes donnéesOk.. mais comment procèdes tu ?
je constate que la bd est dupliquée dans le dossier bin debug de mon projetN'aurais-tu pas dans ton programme une instruction qui dupliquerait la base existante ?
etabDTrow = etabDataSet.Tables("partenaire").NewRow etabDTrow("id_part") = Me.Txtid.Text etabDTrow("nom") = Me.TxtNom.Text etabDTrow("pays") = Me.TxtPay.Text etabDTrow("ville") = Me.TxtVil.Text etabDTrow("adresse") = Me.TxtAdr.Text etabDTrow("contact") = Me.Txtcont.Text etabDTrow("type_part") = Me.Cbxtyp.Text etabDTrow("dom_inter") = Me.Textdom.Text etabDTrow("exple_projet") = Me.Txtexp.Text etabDataSet.Tables("partenaire").Rows.Add(etabDTrow) CmdBuilder = New OleDbCommandBuilder(etabDTAdapter) etabDTAdapter.Update(etabDataSet, "partenaire") etabDataSet.Clear() etabDTAdapter.Fill(etabDataSet, "partenaire") etabDTable = etabDataSet.Tables("partenaire")
'Initialisation de la chaîne de paramètres pour la connexion CnxString = "provider = microsoft.jet.OleDb.4.0; data source = " & Application.StartupPath & "\bdadn.mdb;" 'Initialisation de la chaîne contenant l'instruction SQL strSql = "SELECT partenaire.* FROM partenaire" 'Instanciation d'un Objet Connexion etabcnx = New OleDbConnection 'Donner à la propriété ConnectionString les paramètres de connexion etabcnx.ConnectionString = CnxString 'Ouvrir la connexion etabcnx.Open() 'Instancier un objet Commande etabCommand = New OleDbCommand(strSql) 'Instancier un objet Adapter etabDTAdapter = New OleDbDataAdapter(etabCommand) 'initialisation de l'objet Command etabCommand.Connection() = etabcnx 'Avec l'aide de la propriété Fill du DataAdapter charger le DataSet etabDTAdapter.Fill(etabDataSet, "partenaire") 'Mettre dans un Objet DataTable une table du DataSet etabDTable = etabDataSet.Tables("partenaire") etabcnx.Close()
etabcnx.Close()pour tester ?