Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 26/05/2011, 16h44   #1
Membre du Club
 
Homme Jérémy B-ACD-AD- IJ
Étudiant
Inscription : avril 2011
Messages : 106
Détails du profil
Informations personnelles :
Nom : Homme Jérémy B-ACD-AD- IJ
Âge : 21
Localisation : France, Alpes Maritimes (Provence Alpes Côte d'Azur)

Informations professionnelles :
Activité : Étudiant

Informations forums :
Inscription : avril 2011
Messages : 106
Points : 52
Points : 52
Par défaut operateur absent SQL

Bonjour,

J'ai créer une base donnée dans le cadre d'un stage.
Je dois faire un certains nombre d'opération dessus.
Mais à un moment j'éxecute une requette SQl ça plante, message d'erreur : Operateur absent dans l'expression 'NCO.'

La requette est :

Code :
1
2
StrSQL = "SELECT DISTINCT NCO." & TypeDate & ", NCO." & Perimetre & ", NCO.DIAMETRE"
        StrSQL = StrSQL & ", NCO.ADRESSE, DEP.LONGAPIC, NCO.LONGCALC"
merci de m'aider !

PS : la reqette entiere est :

Code :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
' Generer la requette SQL
    ' SELECT
        StrSQL = "SELECT DISTINCT NCO." & TypeDate & ", NCO." & Perimetre & ", NCO.DIAMETRE"
        StrSQL = StrSQL & ", NCO.ADRESSE, DEP.LONGAPIC, NCO.LONGCALC"
 
        ' Afficher l'attribut MATERIAU si aucun materiaux n'a ete selectionner dans le formulaire
        If (MAT = 1) Then
            StrSQL = StrSQL & "NCO.MATERIAU"
        End If
 
    ' FROM
        StrSQL = StrSQL & " FROM E_TRONCO AS NCO, E_TRODEP AS DEP," & TypeMAJ
 
    ' WHERE
        StrSQL = StrSQL & " WHERE " & TypeMAJ & ".ID_OBJ = E_TRONCO.NUMERO"
        StrSQL = StrSQL & TypeMAJ & ".ID_OBJ = E_TRODEP.NUMERO"
 
    ' Ajouter les closes AND
        ' Mettre la restriction sur les Materiaux si un materiau a ete selectionner dans le formulaire
        If (MAT = 0) Then
                StrSQL = StrSQL & " AND E_TRODEP.MATERIAU = " & Materiaux
                StrSQL = StrSQL & " AND E_TRONCO.MATERIAU = " & Materiaux
        End If
        ' Mettre la restriction sur le Perimetre
        If (PER > 0) Then
                StrSQL = StrSQL & " AND E_TRODEP." & Perimetre & " = " & Liste
                StrSQL = StrSQL & " AND E_TRONCO." & Perimetre & " = " & Liste
        End If
 
    ' ORDER BY
        StrSQL = StrSQL & "ORDER BY " & TypeDate
pikameuh est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 26/05/2011, 17h00   #2
Membre Expert
 
Avatar de nico84
 
Homme Nicolas Guimbal
Consultant/développeur ERP
Inscription : mai 2008
Messages : 1 254
Détails du profil
Informations personnelles :
Nom : Homme Nicolas Guimbal
Âge : 49
Localisation : France

Informations professionnelles :
Activité : Consultant/développeur ERP
Secteur : High Tech - Éditeur de logiciels

Informations forums :
Inscription : mai 2008
Messages : 1 254
Points : 1 870
Points : 1 870
Bonjour,

Affiche le résultat de strSQL à l'écran et tu vas avoir des surprises
En 30" j'ai déjà vu qu'il manque 1 virgule, " and " et 1 espace
nico84 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 27/05/2011, 13h43   #3
Membre du Club
 
Homme Jérémy B-ACD-AD- IJ
Étudiant
Inscription : avril 2011
Messages : 106
Détails du profil
Informations personnelles :
Nom : Homme Jérémy B-ACD-AD- IJ
Âge : 21
Localisation : France, Alpes Maritimes (Provence Alpes Côte d'Azur)

Informations professionnelles :
Activité : Étudiant

Informations forums :
Inscription : avril 2011
Messages : 106
Points : 52
Points : 52
Citation:
Affiche le résultat de strSQL à l'écran et tu vas avoir des surprises
Je ne suis pas encore à l'aise avec les mécanisme Access, et je voie pas comment faire...
pikameuh est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 27/05/2011, 13h53   #4
Expert Confirmé Sénior
 
Avatar de f-leb
 
Homme Fabien
Enseignant
Inscription : janvier 2009
Messages : 2 415
Détails du profil
Informations personnelles :
Nom : Homme Fabien
Âge : 41
Localisation : France, Sarthe (Pays de la Loire)

Informations professionnelles :
Activité : Enseignant

Informations forums :
Inscription : janvier 2009
Messages : 2 415
Points : 4 446
Points : 4 446
bonjour pikameuh,

il faut insérer un debug.print StrSQL.

Voir Utilisation du Debug.Print
f-leb est déconnecté   Envoyer un message privé Réponse avec citation 10
Vieux 27/05/2011, 14h23   #5
Membre du Club
 
Homme Jérémy B-ACD-AD- IJ
Étudiant
Inscription : avril 2011
Messages : 106
Détails du profil
Informations personnelles :
Nom : Homme Jérémy B-ACD-AD- IJ
Âge : 21
Localisation : France, Alpes Maritimes (Provence Alpes Côte d'Azur)

Informations professionnelles :
Activité : Étudiant

Informations forums :
Inscription : avril 2011
Messages : 106
Points : 52
Points : 52
Milles merci !
pikameuh est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 16h53.


 
 
 
 
Partenaires

Hébergement Web