Requete SQL et variable VBA

Bonjour,

A partir d'une base A, je lance la création d'une base B mensuellement dans un répertoire différent de A.
Le nom de B est basé sur une date (ex: 2010_02.mdb)

Dans cette base B, il y a une table tbl_mdb_date avec un champ mdbdate.

Je voudrai à partir de la base A et après la création de B, insérer dans le champ mdbdate la valeur de la variable qui correspond au nom de la base B sans le .mdb (ex:2010/02)

Voici mon code qui ne fonctionne pas au niveau de la requête Sql, une erreur de syntaxe dont je n'arrive pas à me dépatouiller:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

MDB_VIDE = "C:\Base\PBR\Structure\MDB_VIDE.mdb" MDB_DEFAUT = "PBR_" + Format$(Date - 28, "yyyy") + "_" + Format$(Date - 28, "mm") MSG3 = "Donnez le nom de la base mensuelle à créer." & Chr$(13) & Chr$(13) & "Exemple : PBR_2010_02 pour la base Février 2010." & Chr$(13) & Chr$(13) & "Ne mettez pas d'extension de fichier." MDB_ENTREE = InputBox(MSG3, "Choix du nom du fichier", MDB_DEFAUT) If MDB_ENTREE = "" Then GoTo FIN_MDB_MOIS End If   MDB_MOIS = "C:\Bases\PBR\Mdbs\" + MDB_ENTREE + ".mdb" DBEngine.CompactDatabase MDB_VIDE, MDB_MOIS MsgBox "Base mensuelle créée ! Le fichier " & MDB_MOIS & " a été créé", 64, "Fin de procédure" FIN_MDB_MOIS:   ' pour avoir le nom de la base créée sous forme de date: DATE_MDB_1 = Left$(MDB_ENTREE, 8) DATE_MDB = Right$(DATE_MDB_1, 4) & "/" & Right$(MDB_ENTREE, 2)   SQL_DATE_MDB = "INSERT INTO tbl_mdb_date (mdbdate) IN MDB_MOIS VALUES (DATE_MDB);" DoCmd.RunSQL (SQL_DATE_MDB)

---

Merci par avance de votre aide.

Bonjour,

La valeur à insérer étant une chaîne de caractère il faut qu'elle soit encadrée par des guillemets simples ou doubles.

Exemple avec des guillemets simples :

Code:

---

SQL_DATE_MDB = "INSERT INTO tbl_mdb_date (mdbdate) IN MDB_MOIS VALUES ('" & DATE_MDB & "');"

---

Si DATE_MDB contient par exemple 2010/02, SQL_DATE_MDB contiendra

Code:

---

INSERT INTO tbl_mdb_date (mdbdate) IN MDB_MOIS VALUES ('2010/02');

---

A+

Merci beaucoup, on approche mais:

j'ai encore une erreur d'exécution 3024 dans le Sql:
fichier 'c:\Documents & Settings\Administrateur\Mes Documents\MDB_MOIS' introuvable.

Que va-t-il chercher là alors que j'ai bien défini le chemin d'accès du fichier ?

J'avais pas fait attention qu'il y avait le chemin de la base externe.
Même principe : on sort la variable de la chaîne de caractères pour la concaténer.
Le chemin vers la base externe (après IN) doit être encadré par des guillemets simples.

Code:

---

SQL_DATE_MDB = "INSERT INTO tbl_mdb_date (mdbdate) IN '" & MDB_MOIS & "' VALUES ('" & DATE_MDB & "');"

---

+A

Chapeau, ça fonctionne!
Je te remercie beaucoup, je croyais avoir compris les tutos sql, apparament non.
Je n'aurais jamais pensé à utiliser les ' et " ensemble, persuadé que les " n'étaient que pour le texte.

Encore merci, je continue mon petit développement...