Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1854 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VB6 + ADO] Help pour un newbie !

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VB6 + ADO] Help pour un newbie !

n°635301
Dr Raf
Roaccutane® powered
Posté le 08-02-2004 à 19:02:04  profilanswer
 

bon voila je me lance dans ADO mé ca foire :fou: et je vois pas l'erreur...
aidez moi siouplé
 

Citation :

Dim cnx As New ADODB.Connection
Dim cmd As New ADODB.Command
Dim rst As New ADODB.Recordset
Dim prm As New ADODB.Parameter
______________________________________________________
 
Private Sub Command1_Click()
 
cmd.CommandText = "INSERT INTO client (titre, auteur) VALUES ('coucou', 'coucouman')"
 
cmd.Execute
 
End Sub
_______________________________________________________
 
Private Sub Form_Load()
 
cnx.Provider = "Microsoft.Jet.Oledb.3.51"
cnx.ConnectionString = "bdd.mdb"
cnx.Open
 
End Sub


 
erreur d'exécution '3709':
impossible d'utiliser cette connection pour effectuer cette opération. Elle est fermée ou non valide dans ce context.


Message édité par Dr Raf le 08-02-2004 à 19:07:16
mood
Publicité
Posté le 08-02-2004 à 19:02:04  profilanswer
 

n°635312
jagstang
Pa Capona ಠ_ಠ
Posté le 08-02-2004 à 19:18:57  profilanswer
 

contrôle l'etat de ta connexion (cnx.State) avant de balancer une requête.


---------------
What if I were smiling and running into your arms? Would you see then what I see now?  
n°635316
Harkonnen
Modérateur
Un modo pour les bannir tous
Posté le 08-02-2004 à 19:20:49  profilanswer
 

t'as oublié de rattacher la commande à la connection :o
 

Code :
  1. cmd.ActiveConnection = cnx;


---------------
J'ai un string dans l'array (Paris Hilton)
n°635332
Dr Raf
Roaccutane® powered
Posté le 08-02-2004 à 19:34:29  profilanswer
 

ouiiiiiii ca marche merciiiiii (on sent le mek ki se prenait le brain.)

n°635395
Dr Raf
Roaccutane® powered
Posté le 08-02-2004 à 20:36:01  profilanswer
 

et sinon immaginons toujours pour la meme commande, comment on fait pour utiliser plusieurs paramètre sur une seul commande genre un paramètre pour la table et un pour la condition ?

n°635554
Dr Raf
Roaccutane® powered
Posté le 09-02-2004 à 00:09:53  profilanswer
 

up  :sweat:  
 
 
 
g aussi un autre prob :  
 

Citation :

cmd.CommandText = "DELETE FROM objet WHERE id = ?"
 
prm.Name = "id"
prm.Type = adBSTR
prm.Direction = adParamInput
prm.Value = Grid_obj.Text
 
cmd.Execute


 
aucune valeur donnée pour un ou plusieurs paramètres requis
 
???

n°635565
mareek
Et de 3 \o/
Posté le 09-02-2004 à 00:26:40  profilanswer
 

Dr Raf a écrit :

up  :sweat:  
 
 
 
g aussi un autre prob :  
 

Citation :

cmd.CommandText = "DELETE FROM objet WHERE id = ?"
 
prm.Name = "id"
prm.Type = adBSTR
prm.Direction = adParamInput
prm.Value = Grid_obj.Text
 
cmd.Execute


 
aucune valeur donnée pour un ou plusieurs paramètres requis
 
???


 
ça serait pas plus simple de faire

Code :
  1. cmd.CommandText = "DELETE FROM objet WHERE id = " & Grid_obj.Text
  2. cmd.Execute


---------------
"I wonder if the internal negative pressure in self pumping toothpaste tubes is adjusted for different market altitudes." John Carmack
n°635566
Dr Raf
Roaccutane® powered
Posté le 09-02-2004 à 00:31:05  profilanswer
 

hum woué  :sweat:  
 
mé enfaite ca me fé toujours le meme prob  :fou:

n°635570
mareek
Et de 3 \o/
Posté le 09-02-2004 à 00:33:45  profilanswer
 

Dr Raf a écrit :

hum woué  :sweat:  
 
mé enfaite ca me fé toujours le meme prob  :fou:  


Persoinnelement, je n'utilise jamais l'objet Command pour executer des requètes, je passe par l'objet Connection. comme ceci:

Code :
  1. cnx.execute "DELETE FROM objet WHERE id = " & Grid_obj.Text


---------------
"I wonder if the internal negative pressure in self pumping toothpaste tubes is adjusted for different market altitudes." John Carmack
n°635574
Dr Raf
Roaccutane® powered
Posté le 09-02-2004 à 00:40:37  profilanswer
 

mareek a écrit :


Persoinnelement, je n'utilise jamais l'objet Command pour executer des requètes, je passe par l'objet Connection. comme ceci:

Code :
  1. cnx.execute "DELETE FROM objet WHERE id = " & Grid_obj.Text




 
 
 
c bon g trouvé :)  
 

Code :
  1. cmd.CommandText = "DELETE FROM objet WHERE id = '" & Grid_obj.Text & "'"


 
donc si je comprend bien command c util seulement si l'on a des pamaretres ?
 
 
thx en tout ka !


Message édité par Dr Raf le 09-02-2004 à 00:45:38
mood
Publicité
Posté le 09-02-2004 à 00:40:37  profilanswer
 

n°635576
mareek
Et de 3 \o/
Posté le 09-02-2004 à 00:48:11  profilanswer
 

Dr Raf a écrit :


 
 
 
c bon g trouvé :)  
 

Code :
  1. cmd.CommandText = "DELETE FROM objet WHERE id = '" & Grid_obj.Text & "'"


 
donc si je comprend bien command c util seulement si l'on a des pamaretres ?
 
 
thx en tout ka !


Excuse, je pênsait que ton ID était un nombre donc j'ai pas pensé à ajouter les quotes


---------------
"I wonder if the internal negative pressure in self pumping toothpaste tubes is adjusted for different market altitudes." John Carmack
n°635589
Dr Raf
Roaccutane® powered
Posté le 09-02-2004 à 01:14:31  profilanswer
 

pas de prob ;)


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VB6 + ADO] Help pour un newbie !

 

Sujets relatifs
Help a propos de la classe CPaintDC !!!!help sur access
help flash mwexercice d'algo noté : help me please !!
[C newbie] Comment convertir un tableau de binaire en caractère ?[HELP] Données Access a mettre à jour via un fichier excell
[MySQL] moyenne pondérée, j'y arrive pas ! (help me please)HELP, pb d'espace ( le caractère )
Include ne fonctionne pas, Problème PHP je pense « HELPHELP EditPlus (nioub inside)
Plus de sujets relatifs à : [VB6 + ADO] Help pour un newbie !


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR