Discussion :

[oliver75]

bonjour,

ci dessous ma fonction et

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
Function chargement_cours_j_moins1correlationindice(codeprodui) As Double
    Dim code_prod As String
    Dim cours As Double
    Dim ptr As Variant
 
 
    cours = 0
 
 Set ptr = CreateObject("ADODB.Recordset")
 
 
    ptr.Open "SELECT _COURSCLOSE FROM omega.com.prixhist WHERE _ = '" & codeprodui & "' ORDER BY _DATE DESC", Mybd
    Do While Not ptr.EOF
 
        cours = ptr("_COURSCLOSE")
        Exit Do
    Loop
    chargement_cours_j_moins1correlationindice = cours

je joints en pièce jointe le message d'erreur associé. je ne comprends pas ce message!!!

merci de votre aide

Oliver

[Invité]

Bonjour

Je pense qu'il n'aime pas le underscore devant le coursclose. Tout nom doit commencer par une lettre de l'alphabet.

Starec

[oliver75]

"_coursclose" est pourtant bien le nom de la colonne dans la table ou je veux recupérer mon information

[illight]

Non c'est incorrect, comme STarec, l'a dit le Underscore n'est pas une bonne idée pour un nom de colonne.
Si mes souvenirs sont bons (à confirmer) mais quand tu met un _ devant le nom d'une colonne, ça a une signification spécifique (je crois, et j'ai bien je crois, que c'est pour prendre des valeurs temporaires, un truc dans ce genre la, mais à confirmer), du coup si tu nomme une colonne comme ça, ça peut mettre le bazar

[Invité]

Re

Essaye de mettre les noms avec des Underscore entre crochets pour voir.

Code :

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

[_COURSCLOSE]

Starec

[oliver75]

Toujours KO

[Invité]

C'est quoi le _ avant le Where ?

Starec

[oliver75]

Je viens de virer le _ et la macro est toujours ko..........