Bonjour,
Je rencontre un problème avec ma base de données access dans visual basic
2005.
Voilà le code qui me permet d'insérer une ligne dans ma table :
Dim titre As String
Dim c As New connexion
Dim cmd As New OleDbCommand
Dim prm As New OleDbParameter
c.ouvrir()
titre=teval.text 'textbox dans mon formulaire
cmd.Connection = c.maconnexion
cmd.CommandType = CommandType.StoredProcedure
cmd.CommandText = "AjoutEval" 'requete d'ajout créé dans access
prm.ParameterName = "Titeval" ' paramatre de la requete
prm.Value = titre
cmd.Parameters.Add(prm)
cmd.ExecuteNonQuery()
End Sub
Je vous précise que j'ai crée une classe connection dt voici le code:
Public Class connexion
Public maconnexion As OleDbConnection
Public Sub ouvrir()
maconnexion = New
OleDbConnection(My.Settings.GESTQUALITEConnectionString)
Try
maconnexion.Open()
Catch ex As OleDbException
MessageBox.Show(ex.Message)
End Try
End Sub
Public Sub fermer()
Try
maconnexion.Close()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub
End Class
A l'exécution tout fonctionne mais lorsque je vérifie dans ma base aucune
ligne n'a été ajouté. Pourriez vous m'aider à comprendre
Merci d'avance.
Partager