acces et vb petite question ^^

acces et vb petite question ^^ - VB/VBA/VBS - Programmation

Marsh Posté le 23-03-2004 à 10:26:49    

Alors voila j'ai en memoire une valeure dans une variable (Me.sRéponse) et j'aimerais l'envoyer dans un champ de ma table (reponse) comment faire ? Merci d'avance  :hello:


---------------
heyy O_o
Reply

Marsh Posté le 23-03-2004 à 10:26:49   

Reply

Marsh Posté le 23-03-2004 à 11:59:26    

permet de copier dans la table reponse la variable (me.sreponse) saise  

Code :
  1. 'lien avec la bdd
  2. Dim cn As ADODB.Connection
  3. Dim strcn As String
  4. Set cn = New ADODB.Connection
  5. strcn = "provider=microsoft.jet.oledb.3.51;data source =z:\comptoir.mdb" '<--- adresse de ta table
  6. cn.Open strcn
  7. Dim chaine As String
  8. chaine = "insert into la_colonne_qui_contient_les_réponses (ex : reponse) values (' " & Me.sReponse & " ')"
  9. cn.Execute chaine


normalement ca doit marcher

Reply

Marsh Posté le 23-03-2004 à 13:50:41    

merci bcp t un chef je v tester de suite !


---------------
heyy O_o
Reply

Marsh Posté le 23-03-2004 à 14:06:04    

ha il me fait l'erreur "erreur de compilation type defini par l'utilisateur non defini" et il surligne :
 
cn As ADODB.Connection


---------------
heyy O_o
Reply

Marsh Posté le 23-03-2004 à 14:58:20    

iceje a écrit :

ha il me fait l'erreur "erreur de compilation type defini par l'utilisateur non defini" et il surligne :
 
cn As ADODB.Connection


 
Il faut ajouter en reference a ton projet les "MS ActiveX Data Object" (ADO ;) )

Reply

Marsh Posté le 23-03-2004 à 15:00:28    

j'ai juste oublié un détail. Il faut que tu ajoutes la référence microsoft active x data object 2.0 library.
Ca doit etre dans la barre d'outil, sous l'onglet outil et tu cliques références. et dans la liste tu ajoutes la librairie ci dessu

Reply

Marsh Posté le 23-03-2004 à 15:01:05    

plu rapide ke moi ixemul...lol

Reply

Marsh Posté le 23-03-2004 à 15:16:40    

ha non c'est bon j'avais pas coché M active x 2.5 dans les references j'ai plus d'erreure maintenant ^^


---------------
heyy O_o
Reply

Marsh Posté le 23-03-2004 à 15:17:49    

lol j'avais pas capté vos reponses et j'avais meme reussi a trouver tout seul :lol: merci encore ;-)


---------------
heyy O_o
Reply

Marsh Posté le 23-03-2004 à 15:28:32    

encore une question qd meme ! qd je regarde le code je ne vois aucune indication concernant la table ?
il y a bien le champ reponse mais comment peut il savoir dans quel table ce trouve ce champ reponse ?


---------------
heyy O_o
Reply

Marsh Posté le 23-03-2004 à 15:28:32   

Reply

Marsh Posté le 23-03-2004 à 15:38:55    

la syntaxe du insert est la suivante :
 

Code :
  1. SQL = "INSERT INTO Nom_Table (Champs1,Champs2,Champs3,...) VALUES (Valeur_Champs1,Valeur_Champs2,Valeur_Champs3,...)


 
;)

Reply

Marsh Posté le 25-03-2004 à 10:00:54    

petit probleme mon prog fonctionne bien mais j'ai changé des references et maintenant il me surligne ca :
 
Set dbBaseDeDonnées = DBEngine.Workspaces(0).Databases(0)
 
qu'elle reference je dois remetre ?


---------------
heyy O_o
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed