Bonjour,

j'ai une requêtte SQL intégrée dans mon vba qui pointe vers une base Oracle, j'ai un problème de syntaxe avec la date système que je dois tronquer (et oui, oracle met l'heure dans ses date...)

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
Private Sub CommandButton1_Click()
USER = "utilisateur"
MDP = "motdepasse"
DRV_ODBC = "Microsoft ODBC for Oracle"
INSTANCE = "adressebasededonnée"
PL_SQL = "SELECT DISTINCT NUM_ORDRE_TRANSP FROM colis  WHERE TRANSPORTEUR='montransporteur' and dat_creation=trunc(sysdate)"
 
With ActiveSheet.QueryTables.Add(Connection:= _
"ODBC;DRIVER={" & DRV_ODBC & "};UID=" & USER & ";PWD=" & MDP & ";SERVER=" & INSTANCE & ";", Destination:=ActiveCell)
.Sql = PL_SQL
.HasAutoFormat = False
.Refresh BackgroundQuery:=False
End With
 
End Sub
tout fonctionne bien si ma requette s'arrête à :

Code sql : Sélectionner tout - Visualiser dans une fenêtre à part
SELECT DISTINCT NUM_ORDRE_TRANSP FROM colis  WHERE TRANSPORTEUR='montransporteur'

dès que je mets la date rien ne fonctionne, j'ai des difficulté avec les dates sous SQL
Quelqu'un peux me guider ? Si toutefois je suis dans le bon forum