Discussion :

[Jean_Benoit]

Bonjour,

Comment intégrer un ordre SQL dans du VBA / ODBC pour récupérer une valeur retournée par ORACLE?

Sous ORACLE:

Code :

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

Select actno_seq.nextval into maval From Dual;

Sous ACCESS?

J'essaie d'éviter d'utiliser les champs auto-incrémentés ACCESS pour rendre cette application portable.

Merci d'avance

[Maxence HUBICHE]

si j'ai bien compris ce que tu veux faire (excuses moi, mais le SQL d'Oracle m'est parfaitement inconnu. Je suppose donc que le nextval renvoie la valeur suivante d'un champ autoincrémenté...)
Jette un oeil sur la fonction DMAX (par exemple)

[Jean_Benoit]

J'ai fait [F1] sur DMAX sous VBA, je vois qu'elle retourne la valeur max d'un jeu d'enregistrements.
Mais je souhaite que si l'utilisateur ouvre un formulaire en mode insertion, le champ ACT_NO soit déjà renseigné avec la valeur générée sous ORACLE par une séquence.
Donc je dois placer du code VBA/ODBC au niveau évènement "SUR ACTIVATION ", (du formulaire)
qui fait un

Code :

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

select actno_seq.nextval into une_variable_vba from dual

La table dual appartient à Sys sous ORACLE et ne contient qu'une seule ligne.
Ensuite je renseigne le champ ACT_NO du formulaire avec une_variable_vba.

Mais pour l'instant je n'ai trouvé que ce site qui donne des infos sur ODBC/VB:
http://www.softlookup.com/tutorial/d...9.asp#Heading2
J'ai l'impression qu'il réinvente la roue?
Sinon ma logique n'est peut-être pas bonne du point de vue de l'interface utilisateur, normalement on n'appelle pas spécialement un formulaire en mode insertion?
En plus j'ai pas d'aspirine

[Jean_Benoit]

Il faut utiliser le protocole ADO:

Code :

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

1
2
3
Public adoCnn as new ADODB.Connexion
.
.

Merci beaucoup