probleme avec requete SQL dans code VB6

Version imprimable

Bonsoir,

J'ai un code VB dans lequel il y a une requete ou je passe des paramètres.

Voici le code :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
strSqlbnk = "SELECT v.*, ss.SOLDE_CTRV, ss.SOLDE_TRN FROM V_ETAT_BNK v,(select s.acc_code,(s.bank_bal_amount-sum(r.bank_cur_amount)) as  SOLDE_CTRV, " & _
                 " (s.bank_bal_amount-sum(r.trn_amount)) as  SOLDE_TRN " & _
                 " from rec_bank r, spe_rap_accounts s " & _
                 " Where s.acc_code = R.acc_code " & _
                 " and (r.book_date> {d '2004-01-19'}) " & _
                 " group by s.acc_code, s.bank_bal_amount) ss " & _
                 " Where v.acc_code = ss.acc_code"
 
 
    sWhere = "(REC_DATE IS NULL OR REC_DATE = {d '" & daterappro & "'}) AND "
 
 
 
    If VarTempStatut <> "" Then sWhere = sWhere & "v.STATUT in ('" & VarTempStatut & "' ) AND "
    If VarTempSociete <> "" Then sWhere = sWhere & "v.CMP_CODE in ('" & VarTempSociete & "') AND "
    If VarTempComptes <> "" Then sWhere = sWhere & "v.ACC_CODE in ('" & VarTempComptes & "') AND "
 
 
 
    strSqlbnk = strSqlbnk & Left(sWhere, Len(sWhere) - 4)

Lorsque je l'execute j'ai systematiquement un message d'erreur

Code:

Syntaxe incorrect vers le mot clé 'IS'

je suis entrain de m'arracher les cheveux pour trouver d'ou ca vient mais je ne vois pas...pourtant si je passe cette meme requete dans l'analyseur de requete SQL la ca fonctionne.....!!!!! :oops: Est ce que quelqu'un aurait une idée svp?

Merci à tous,

30/05/2007, 18h23
SfJ5Rpw8

vérifie la requête finale ... :strSqlbnk .. en l'affichant avant de l'exécuter ... (par un debug.print par exemple...)
30/05/2007, 18h33
Phifi

Et en faisant ISNULL(REC_DATE) ?
30/05/2007, 21h15
captainamerica75

J'ai fait un debug.print et voici le résultat de la requete :

Code:

SELECT v.*, ss.SOLDE_CTRV, ss.SOLDE_TRN FROM V_ETAT_BNK v,(select s.acc_code,(s.bank_bal_amount-sum(r.bank_cur_amount)) as SOLDE_CTRV, (s.bank_bal_amount-sum(r.trn_amount)) as SOLDE_TRN from rec_bank r, spe_rap_accounts s Where s.acc_code = R.acc_code and (r.book_date> {d '2004-01-19'}) group by s.acc_code, s.bank_bal_amount) ss Where v.acc_code = ss.acc_code(REC_DATE IS NULL OR REC_DATE = {d '2005-12-31'}) AND v.STATUT in ('R','NR' ) AND v.CMP_CODE in ('CCR')

je pense qu'il manque un "WHERE" :?
30/05/2007, 21h36
captainamerica75

ca marche !!!!! :yaisse2:
en fait il manquait un "AND" devant (REC IS NUL.....).

Il faut que je cree un autre post car j'ai un autre petit souci maintenant pfff !!!!

Merci à vous deux,