Aide connection base de donnéesRésolu

Question

Bonjour,

J'utilise VB6 en relation avec access.
Je souhaite réaliser une fiche d'ajout de contact pour un répertoire. Bien entendu, ses contacts iront dans une base de données, j'ai donc relier cette base mais quand je souhaite ajouter un contact, cela ne marche pas :

Private Sub cmdAjouter_Click()
    bd1.Recordset.AddNew
End Sub
"Erreur 3251 Opération non autorisée pour ce type d'objet"

Que dois je faire?

cs_Jack · Accepted Answer

Salut
Au premier coup d'oeil, il semble qu'il y ait une virgule en trop entre toto.Open et ta reqète SQL "SELECT * ..."

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

lolokun · Answer

Salut,

comment as tu déclaré bd1??Et il faut ouvir ton recordset avec open avant..

cathy9999 · Answer

Private Sub Form_Load()
    Dim newconnection As New ADODB.connection
    Set newconnection = New ADODB.connection
    newconnection.Provider = "Microsoft.Jet.Oledb.4.0"

    newconnection.ConnectionString = "C:\Documents and Settings\dev\Bureau\Projet fin etude\bd1.mdb"
    newconnection.Open
EndSub

cathy9999 · Answer

Private Sub Form_Load()
Dim newconnection As New ADODB.connection
Dim toto As New ADODB.Recordset

Set newconnection = New ADODB.connection
Set toto = New ADODB.Recordset

newconnection.Provider = "Microsoft.Jet.Oledb.4.0"

newconnection.ConnectionString = "C:\Documents and Settings\dev\Bureau\Projet fin etude\bd1.mdb"

newconnection.Open
toto.Open , "SELECT * FROM NOUVEAU", newconnection
ERREUR TYPE INCOMPATIBLE pour toto.Open

cs_Exploreur · Answer

Salut,

Regarde cette petite source qui devrait te montrer certaines choses pour faire la connection / ajout / modification / suppression dans une Bdd access...

A+
Exploreur

 Linux a un noyau, Windows un pépin

cathy9999 · Answer

J'ai reussi merci !

cs_Exploreur · Answer

Salut Jack,

Comment tu as fais pour t'intercepter ??...Si ce n'est pas le cas je deviens fous alors...

A+
Exploreur

 Linux a un noyau, Windows un pépin

Aide connection base de données

7 réponses

Votre réponse

Discussions similaires