Erreur "Operation is not allowed when the object is closed."

Bonjour,

J'ai une erreur quant j'ajoute un record dans une table, voilà mon code

strProvider = "DRIVER={Microsoft Access Driver (*.mdb)};Driverld=25;" & "DBQ=" & Server.MapPath("programme.mdb") Set rst = Server.CreateObject("ADODB.Connection") rst.Open strProvider Set Programme = Server.CreateObject("ADODB.Recordset") Programme.ActiveConnection = rst Numbull = 3000 Programme.Source = "INSERT INTO main (Numbull) VALUES (" & Numbull & ")" Programme.Open Programme.Close set rst = nothing set Programme = nothing

:

Je fait une connerie ?
Il manque d'exemple sur le site avec des connections sans DSN....
Merci
Olivier

essaie ca
strProvider = "DRIVER={Microsoft Access Driver (*.mdb)};Driverld=25;" & "DBQ=" & Server.MapPath("programme.mdb")

Set rst = Server.CreateObject("ADODB.Connection")

rst.Open strProvider

Set Programme = Server.CreateObject("ADODB.Recordset")



Numbull = 3000



Programme.Open "Select * from main", rst, 1, 2
Programme.addnew
Programme("Numbull") = Numbull
Programme.update

Programme.Close


Set Programme = Nothing

rst.close
Set rst = Nothing



-------------------------------
Réponse au message :
-------------------------------

Bonjour,

J'ai une erreur quant j'ajoute un record dans une table, voilà mon code

strProvider = "DRIVER={Microsoft Access Driver (*.mdb)};Driverld=25;" & "DBQ=" & Server.MapPath("programme.mdb") Set rst = Server.CreateObject("ADODB.Connection") rst.Open strProvider Set Programme = Server.CreateObject("ADODB.Recordset") Programme.ActiveConnection = rst Numbull = 3000 Programme.Source = "INSERT INTO main (Numbull) VALUES (" & Numbull & ")" Programme.Open Programme.Close set rst = nothing set Programme = nothing

:

Je fait une connerie ?
Il manque d'exemple sur le site avec des connections sans DSN....
Merci
Olivier

Merci, comme cela fonctionne impecable.
Mais j'aimerais comprendre a quoi sert les chiffres deriere la commande open ?

Bon maintenant comment au fait pour ajouter des record dans une table lier exemple:

Table Main:
-----------
Champ: numindex CP
Champ: nullbull (entier long lier a la CP de la table article)

Table Article:
-----------
Champ :numindex CP (lier a numbull de la table main)
Champ: titre (texte)

Donc pour un record dans la table main.numbull je veux creer 100 records dans articles.titre.

Je fait une for next pour les 100 record, le titre est juste une ensemble de chiffre et lettre)

Comment je fait ma requete ?

Merci
Olivier

ouverture pour enregistrement
utiliser 3, 3 pour la lecture




-------------------------------
Réponse au message :
-------------------------------

Merci, comme cela fonctionne impecable.
Mais j'aimerais comprendre a quoi sert les chiffres deriere la commande open ?

Bon maintenant comment au fait pour ajouter des record dans une table lier exemple:

Table Main:
-----------
Champ: numindex CP
Champ: nullbull (entier long lier a la CP de la table article)

Table Article:
-----------
Champ :numindex CP (lier a numbull de la table main)
Champ: titre (texte)

Donc pour un record dans la table main.numbull je veux creer 100 records dans articles.titre.

Je fait une for next pour les 100 record, le titre est juste une ensemble de chiffre et lettre)

Comment je fait ma requete ?

Merci
Olivier