Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

lancer une requete ajout à partir d'un module VB

5 réponses
Avatar
Nico
Question nulle mais qui me ferait gagner du temps :

Dans ACCESS 97, j'ai besoin de lancer une requ=EAte ajout=20
(si possible avec un param=E8tre) =E0 partir d'un module en=20
VB. Le but =E9tant de remplir automatiquement une table avec=20
un jeu d'enregistrements.

J'ai "d=E9connect=E9" de VB depuis pas mal de temps et=20
j'appr=E9cierai un petit "copier/coller" qui me donnerait un=20
bon coup de pouce.

Merci d'avance

5 réponses

Avatar
Virginie LACROUX
"Nico" a écrit dans le message de news:
0e9501c3a2c1$24ac5f10$
Question nulle mais qui me ferait gagner du temps :

Dans ACCESS 97, j'ai besoin de lancer une requête ajout
(si possible avec un paramètre) à partir d'un module en
VB. Le but étant de remplir automatiquement une table avec
un jeu d'enregistrements.

J'ai "déconnecté" de VB depuis pas mal de temps et
j'apprécierai un petit "copier/coller" qui me donnerait un
bon coup de pouce.

Merci d'avance
Avatar
helpppppppp !
Avatar
Raymond
on n'y comprend rien dans ces messages entre le nom, les anonymous......
peut-on avoir l'original avec le nom du demandeur ?

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


a écrit dans le message de
news:084401c3a379$87be93d0$

helpppppppp !


Avatar
Nico
c'est moi
(pas fé gaffe à anonymous au 2ème message...
;)

-----Message d'origine-----
on n'y comprend rien dans ces messages entre le nom, les
anonymous......

peut-on avoir l'original avec le nom du demandeur ?

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


a écrit dans le
message de

news:084401c3a379$87be93d0$

helpppppppp !


.




Avatar
Raymond
RE.

entr'autres:
DoCmd.RunSQL "INSERT INTO Table2 ( Numero, Destination, Kilomètres ) SELECT
Table1.Numero, Table1.Destination, Table1.Kilomètres FROM table1 WHERE
(((Table1.Numero)='10'));"

DoCmd.RunSQL "INSERT INTO Table2 ( Numero, Destination, Kilomètres )SELECT
Table1.Numero, Table1.Destination, Table1.Kilomètres FROM Table1 WHERE
Table1.Numero='" & Me.Numero & "';"

je n'ai plus la syntaxe pour passer par le container en 97.
pour 2000 tu peux faire
Dim Rq As QueryDef
Set Rq = CurrentDb.QueryDefs("requête6")
Rq.Execute

tu peux aussi ouvrir un recordset en indiquant la syntaxe ou le nom de la
requête.
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Nico" a écrit dans le message de
news:09dd01c3a38e$5dfd9810$
c'est moi
(pas fé gaffe à anonymous au 2ème message...
;)