INSERT INTO avec des variables
sar_im
Messages postés
8
Date d'inscription
Statut
Membre
Dernière intervention
-
PlacageGranby Messages postés 393 Date d'inscription Statut Membre Dernière intervention -
PlacageGranby Messages postés 393 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je suis débutante en VBA, j'utilise access 2010, et j'ai une erreur au niveau de : values(var1,var2,var3,name1+name2+name3), j'ai essayé de mettre les "&&" mais ça ne marche pas, quelqu'un peut m'aider?
Merci d'avance
Voilà le code:
Function insertionNom()
var1 = [Forms]![LocalComplet].[lstBatiment] 'récupère l id du batiment
var2 = [Forms]![LocalComplet].[lstEtage] 'récupère l id de l'étage
var3 = [Forms]![LocalComplet].[lstLocal] 'récupère l id du local
name1 = "SELECT [nomBatiment] FROM Batiment WHERE numBat=" & var1
name2 = "SELECT [ReferenceEtage] FROM Etage WHERE idEtage=" & var2
name3 = "SELECT [nomLocal] FROM Local WHERE id=" & var3
CurrentDb.Execute "INSERT INTO LocalComplet(batiment,etage,local,nomCompletLocal)values(var1,var2,var3,name1+name2+name3)"
End Function
Je suis débutante en VBA, j'utilise access 2010, et j'ai une erreur au niveau de : values(var1,var2,var3,name1+name2+name3), j'ai essayé de mettre les "&&" mais ça ne marche pas, quelqu'un peut m'aider?
Merci d'avance
Voilà le code:
Function insertionNom()
var1 = [Forms]![LocalComplet].[lstBatiment] 'récupère l id du batiment
var2 = [Forms]![LocalComplet].[lstEtage] 'récupère l id de l'étage
var3 = [Forms]![LocalComplet].[lstLocal] 'récupère l id du local
name1 = "SELECT [nomBatiment] FROM Batiment WHERE numBat=" & var1
name2 = "SELECT [ReferenceEtage] FROM Etage WHERE idEtage=" & var2
name3 = "SELECT [nomLocal] FROM Local WHERE id=" & var3
CurrentDb.Execute "INSERT INTO LocalComplet(batiment,etage,local,nomCompletLocal)values(var1,var2,var3,name1+name2+name3)"
End Function
A voir également:
- INSERT INTO avec des variables
- Touche insert - Guide
- Disk boot failure insert system disk and press enter - Guide
- Insertion table des matières word - Guide
- Insert boot media in selected boot device and press a key ✓ - Forum Windows 10
- Activer touche insert sur ASUS UX32A - Forum Clavier
var1 = [Forms]![LocalComplet].[lstBatiment] 'récupère l id du batiment
var2 = [Forms]![LocalComplet].[lstEtage] 'récupère l id de l'étage
var3 = [Forms]![LocalComplet].[lstLocal] 'récupère l id du local
name1 = "SELECT [nomBatiment] FROM Batiment WHERE numBat=" & var1
name2 = "SELECT [ReferenceEtage] FROM Etage WHERE idEtage=" & var2
name3 = "SELECT [nomLocal] FROM Local WHERE id=" & var3
CurrentDb.Execute "INSERT INTO LocalComplet(batiment,etage,local,nomCompletLocal)values("&var1&","&var2&","&var3&","&name1+name2+name3&")"
End Function
As-tu mis des ( ) pour marquer les requêtes imbriquées ?