Discussion :

[DelphiBeginner]

Bonjour à tous !

Tout d'abord, merci de l'aide que vous voudrez bien m'accorder.

Voici mon problème (Erreur bête et méchante selon moi mais qui devient un casse tête...)
En effet, j'ai une erreur (surement dû à la concaténation en Vba que je ne maitrise que trop peu).

Voici la requête que je tente d'effectuer :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
numMag = ThisWorkbook.Sheets("FORMULAIRE").Range("E13")
 
"SELECT `Numéro de série`, `ADRESSE POSTALE`, `CODE POSTAL`, `VILLE`, `TELEPHONE` FROM `Imprimantes bureautiques` IB, `Magasin S` MS WHERE IB.NUMERO = MS.NUMERO AND IB.NUMERO = & numMag &"

Le problème viens de la variable numMag (Instanciée plus tôt). Cette variable est un Integer.

Après avoir fait quelques tests avec le numéro de magasin 55 :

-La requête fonctionne très bien si je tape le numéro de magasin en dur (Je remplace : "& numMag &" par 55) --> Fonctionne très bien.

-Ma variable numMag est bien égale à la valeur numérique : 55 !

Je pense que mon soucis viens de mon horrible concaténation.... à mon avis ma requête ne lit pas ma variable en tant que variable mais en tant que texte... J'ai essayé un peu tout ce qui était pourtant possible à mon avis...

HELP

[Slooby]

Bonjour,

Essaie avec:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim requete as String
requete = "SELECT `Numéro de série`, `ADRESSE POSTALE`, `CODE POSTAL`, `VILLE`, `TELEPHONE` FROM `Imprimantes bureautiques` IB, `Magasin S` MS WHERE IB.NUMERO = MS.NUMERO AND IB.NUMERO = " & numMag

et tu lance ta requête comme tu le fais déjà.
C'est probablement une erreur de positionnement des guillemets.

Slooby

[DelphiBeginner]

Quelle erreur de débutant....
Merci énormément !