Discussion :

[6ril25]

Salut tout le monde,

je cherche en vain à faire une simple requête INSERT en vb.net.

Voici le code de connexion à la bdd Access 2003

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
 Public BDD As ADODB.Connection
 BDD = New ADODB.Connection
 BDD.Provider = "Microsoft.Jet.OLEDB.4.0"    
 BDD.ConnectionString = BDD_Path
 BDD.Open()
 
 BDD.Execute("INSERT INTO tb (champs1) VALUES ('Test champ')")
 
 BDD.Close()

Au niveau de Execute, Visual me lève une exception

"Aucune valeur donnée pour un ou plusieurs des paramètres requis."

Impossible de déboguer... Et j'imagine que je vais avoir le même problème pour mes UPDATE...

Un coup de main est le bienvenu.

[angelevil]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

BDD.Execute("INSERT INTO tb (champs1) VALUES ('Test champ')")

champs1 c'est un champ avec no automatique ????

pis "test champ" c'est bien le nom du champs dans la BD ou une variable qui contient une info venant de vb ?

[Elros]

Bonjour,

je te montre ce que j'utilise.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
Dim cmdMaj As New OleDb.OleDBCommand ' déclaration d'une commande
Dim CheminImg As string = "c:\Defaukt.img" ' pour les besoins de la modif
With cmdMaj
       .Connection = oCnx ' variable pour se connecter 
        ' on ecrit le texte de la requete de modif d'un champ
       .CommandText = "Update Cd SET CheminImage = '" & CheminImg & "'"
       .ExecuteNonQuery() ' on execute la requete
End With

Ça fonctionne pour delete, insert et update

[6ril25]

angelevil>> je pense qu'on ne s'est pas compris.

Elros>> ca semble encourageant, mais j'ai un problème pour la connexion

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Connection = oCnx

Comment gères-tu la connexion à la bdd Access (2003) parce que je suis en ADODB et je pense que tu utilises un autre moteur.

Merci de vous intéresser à mon problème.

[Elros]

J'utilise le même moteur que toi.

Voila mon code exacte avec la connexion:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Dim oConnexion As New OleDbConnection
Dim CheminFichier As String ' chemin de la base de donnée access 2002/2003
 
oConnexion.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Me.CheminFichier
oConnexion.Open()
 
With cmdInsert
                .Connection = oConnexion
                .CommandText = "Update Cd SET CheminImage = '" & CheminImg & "'"
                .ExecuteNonQuery()
End With

voila

[6ril25]

Avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Imports System.Data.OleDb

tous semble pouvoir fonctionner (aucune erreur annoncé avant la compilation.

Mais sur la ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.ExecuteNonQuery()

Voilà ce que j'ai:

L'exception System.Data.OleDb.OleDbException n'a pas été gérée
Message="Aucune valeur donnée pour un ou plusieurs des paramètres requis."

Une idée?

[Elros]

je crois que tu as un problème pour te connecter à ta base de données.

[6ril25]

J'ai fini par trouver: j'ai mis en place les relations entre les tables de ma Bdd Access, alors, je ne pouvais renseigner une enregistrement, sans en renseigner toutes les dépendances...
J'ai donc simplement supprimer les relations entre les tables, et ça fonctionne...

Merci de ton aide.