adodb

Bonjour, Mon code en sas est : substr(prt.cd_prt, index(prt.cd_prt, '/') +1) as code_prt (ce code marche bien dans SAS) Je voudrais transcrire ce code dans la requête ADODB comme : right(proto.cd_protocole, index(proto.cd_protocole, '/') +1) as code_proto mais cela ne marche pas, merci pour...

Joyeux Noël !!! :) J'aurais une petite question. Je n'arrive pas à trouver comment indiquer dans le code plusieurs cellules de données en input pour une requête sql adodb. Voici mon code : 'Date Sub Ma_date() Dim RECSET As New ADODB.Recordset, numero_de_police Call...

Bonjour, Je n'arrive pas à calculer la différence entre les deux dates, voici le code dans ma requête : power(MT_EA*(1+TX_TAUX/100),(D_EFFET - #31 / 12 / (extract(year from D_EFFET)#)) as PM_avant_mvt En fait, je souhaite calculer la différence entre la date D_EFFET et la dernière date de la...

Bonjour, Je souhaite écrire un left join sans doublons en sql adodb (vba), mais cette ligne select distinct ne marche pas : " from DB_EVENEMENT ev1 left join DB_SUPPORT sup on ev1.IS_SUPPORT=sup.IS_SUPPORT" & _ " left join ( select distinct TX_BONUS_BRUT_DEF_CTRAT from DB_TAUX_PAB_CTRAT)...

Bonjour, Je code en VBA Adodb, je cherche à remplacer, lors de la jointure à gauche, les données manquantes par "Not Applicable". J'utilise la fonction NVL : NVL(TO_CHAR(ev4.D_EFFET), 'Not Applicable') as D_EF mais cela ne marche pas, pouvez vous m'aider s'il vous plaît ? Merci !

Bonjour, Je n'arrive pas à afficher correctement les données après une requête adodb sql. Voici mes données en sortie : Voici les données attendues : Je pense que c'est à cause de la condition Do While Not RECSET2.EOF que les lignes affichées sont celles qui sont "alimentées" : Do...

Bonjour, Je souhaite concaténer deux valeurs, je ne comprends pas pourquoi cela ne marche pas : PRT = Trim(UCase(Worksheets(1).Range("produit")).Value) & "/" & Trim(UCase(Worksheets(1).Range("CODE_COMMERCIAL")).Value) Le résultat attendu par exemple est 35/79 Merci pour votre aide !

Bonjour, Je récupère mes variable argstring3 et argstring4 via 2 liste déroulante (en cliquant sur ces liste) : argString3 = Me.Liste_Mandataire.Value , argString4 = Me.Liste_Depositaire.Value. Les variables argString3 et argString4 ont bien des valeurs, j'ai testé. Le code pour les récupérer...

Bonjour, Voici mon code pour trouver une date sur les 15 dernières années : datepart(year,ev.dt_effet)>=(datepart(year,Getdate())-15) Je reçois l'erreur suivante : Pourriez-vous m'aider s'il vous plaît ? Merci beaucoup !

Bonjour, Je souhaite récupérer le montant avec la date la plus récente (si on a plusieurs dates), les conditions sont dans "having" mais mon code ne marche pas : Public Sub GET_DERN_VERS(NO_POLICE As String) Dim RECSET As New ADODB.Recordset RECSET.Open "select abs(ev.mt_brut_cie)...

Bonjour, Je suis en train de coder en ADODB VBA sql. Je cherche à récupérer l'observation la plus récente, le tri est effectué par date. Pourriez-vous m'indiquer un exemple avec la fonction First/Last en ADODB sql VBA, s'il vous plaît ? Merci pour votre aide !

Bonjour, Je suis en train de coder en sql ADODB VBA. Je cherche à récupérer l'observation la plus récente (triée par date). Pourriez-vous me donner l'exemple de la fonction First/Last en ADODB VBA ? Merci beaucoup !

Bonjour, Dans ma requête VBA je récupère le mt_rac_brut. Si cette donnée est négative je voudrais l'afficher sans signe "-": if mt_rac_brut >0 then mt_rac_brut=mt_rac_brut; if mt_rac_brut<0 then mt_rac_brut=-mt_rac_brut. Je voudrais savoir comment on peut ajouter cette condition dans le code...

Bonjour, Je viens de créer deux ComboBox qui affichent les listes déroulantes. Pour afficher ces listes j'ai deux requête ADODB en sql. Avec juste un ComboBox le temps de traitement est correcte. En ajoutant le deuxième ComboBox j'ai augmenté le temps d'attente à l'ouverture du fichier ...

Bonjour, Je reçois une erreur : "ORA-00979 : not a group by expression." Je ne comprends pas pourquoi car j'avais sélectionné les champs du GROUP BY dans SELECT. Voici mon code : RECSET2.Open " select dossier.NO_POLICE, ev1.D_EFFET, ev1.ID_FAMILLE_PORTEF, ev1.ID_PORTEFEUILLE...

Bonjour, Je reçois une erreur ORA-00937 not a single-group group function. Je ne comprends pas pourquoi la fonction sum ne marche pas. Merci pour votre aide. Voici le code : RECSET2.Open " select distinct dossier.NO_POLICE, ev1.D_EFFET, ev1.ID_FAMILLE_PORTEF, ev1.ID_PORTEFEUILLE...

test

Bonjour, Je n'arrive pas à faire la left join dans mon code VBA avec la data db_dossier sousc et db_garantie gar, par exemple. Voici mon code : Public Sub SUPP_D_ATTENTE(NO_POLICE As String) Dim RECSET As New ADODB.Recordset RECSET.Open "select rga.cd_rga as cd_rga from db_dossier...

Bonjour, Je voudrais concaténer les variables dans ma clé. J'ai des doutes sur la ligne prod.cd_produit & " / " & strQ &" = " & proto.cd_protocole ". En faite, dans la colonne cd_produit j'ai des valeurs caractères comme T345, la variable strQ est aussi en caractères. En concaténant ces...

Bonjour, Je n'arrive pas à trouver pourquoi je reçois l'erreur Command not properly ended. Mon code est :