Problème de requête en VBA - Access 2003
Jed
-
jed -
jed -
Bonjour,
Voila je vous explique mon problème.
Je cherche à créer une table à partir de deux données rentrée dans un formulaire: une date de début et une date de fin. quand l'utilisateur clique sur "valider" la table (table2) doit se créer.
La nouvelle table (table2) doit contenir les meme données que la table1, en ne séléctionnant que les lignes dont les dates sont comprises entre la date de début et la date de fin rentrée dans le formulaire (dans table1, j'ai deux champs qui correspondent à une date de début et une date de fin (DATEEF et DATFIN))
voila le programme que j'ai testé:
Private Sub Valider_Click()
datd=DateDebut.value
datf=DateFin.value
If (datd = "" Or datf= "") Then
MsgBox ("Les champs ne doivent pas être vides")
Else: DoCmd.Runsql "CREATE TABLE table2 as select * from table1 where ...conditions sur les dates
end If
end SUb
Je sais que le select n'est pas autorisé avec le doCmd.runsql mais je vous ai mis ce bout de programme pour que ce soit plus clair.
Merci d'avance !
Voila je vous explique mon problème.
Je cherche à créer une table à partir de deux données rentrée dans un formulaire: une date de début et une date de fin. quand l'utilisateur clique sur "valider" la table (table2) doit se créer.
La nouvelle table (table2) doit contenir les meme données que la table1, en ne séléctionnant que les lignes dont les dates sont comprises entre la date de début et la date de fin rentrée dans le formulaire (dans table1, j'ai deux champs qui correspondent à une date de début et une date de fin (DATEEF et DATFIN))
voila le programme que j'ai testé:
Private Sub Valider_Click()
datd=DateDebut.value
datf=DateFin.value
If (datd = "" Or datf= "") Then
MsgBox ("Les champs ne doivent pas être vides")
Else: DoCmd.Runsql "CREATE TABLE table2 as select * from table1 where ...conditions sur les dates
end If
end SUb
Je sais que le select n'est pas autorisé avec le doCmd.runsql mais je vous ai mis ce bout de programme pour que ce soit plus clair.
Merci d'avance !
A voir également:
- Problème de requête en VBA - Access 2003
- Office 2003 - Télécharger - Bureautique
- Acer quick access - Forum logiciel systeme
- Quick Access service ✓ - Forum PC portable
- Désinstaller ACER QUICK ACCESS - Forum Logiciels
- Access appdata - Guide
4 réponses
Salut,
Je pense que le problème est de SQL (pas de VBA).
Je ne sais pas pour create table as select, mais j'aurais mis:
create table table2
(colonnes)
puis:
insert into table2 (select ...)
Je pense que le problème est de SQL (pas de VBA).
Je ne sais pas pour create table as select, mais j'aurais mis:
create table table2
(colonnes)
puis:
insert into table2 (select ...)
J'ai fait le teste et cela pose problème.
Je dois partir, donc à demain je vous donnerez la réponse (si vous pouvez attendre)
Je dois partir, donc à demain je vous donnerez la réponse (si vous pouvez attendre)
Bonjour,
J'ai une petite base de teste qui contient la table Utilisateur, le champs CodeUtilisateur (Char(25)).
J'ai créé une nouvelle table de teste que j'ai nommé test2:
Puis j'ai utilisé cette requête pour importer tous les code dans le champs code:
il fallait hier que je précise qu'il faut mettre les champs à inserer ((code)).
Pour plus d'infos:
http://sql.1keydata.com/fr/sql-insert-into.php
BonCourage :)
J'ai une petite base de teste qui contient la table Utilisateur, le champs CodeUtilisateur (Char(25)).
J'ai créé une nouvelle table de teste que j'ai nommé test2:
create table test2 ( code CHAR(25) primary key );
Puis j'ai utilisé cette requête pour importer tous les code dans le champs code:
insert into test2(code) select CodeUtilisateur from Utilisateur;
il fallait hier que je précise qu'il faut mettre les champs à inserer ((code)).
Pour plus d'infos:
http://sql.1keydata.com/fr/sql-insert-into.php
BonCourage :)
...
Else:
DoCmd.RunSQL "CREATE TABLE table2 (MATRIC char,CODHOP char,...) insert into table2 (select * from PAF where...)"
...
Ca fonctionne pas...
erreur d'exécution 3290
erreur de syntaxe dans l'instruction create table
merci quand meme de ton aide