Docstoc

PROCEDURES STOCKEES- Appels sous VB6

Document Sample
PROCEDURES STOCKEES- Appels sous VB6 Powered By Docstoc
					          COMPLEMENT : APPELER UNE PROCEDURE STOCKEE DANS VB6


Nous allons dans une application VB appeler les 2 procédures stockées données en exemple dans le
cours :

         Procédure AugmenterSalaire (Données wnum : entier, wmont : entier)
         Fonction MontantSalaire(Données Numdept : entier) : réel

Ces deux procédures ont été déjà crées et testées sous SQL*PLUS :

         Start c:\ ...\ProcStk01       // ou un copier-coller : Create or replace procédure ...
         Execute AugmenterSalaire(7844,400)           // test

Vous pouvez visualiser la structure d’une procédure stockée à l’aide de Oracle Navigator
(Programme  PO7  Oracle Navigator)


ETAPES :

1. Créer un nouveau projet sous VB : PrEmp.vb.

2. Afin d’utiliser la classe :
DataEnvironment, vous devez
ajouter le module approprié dans
votre projet : Aller dans le menu
Projet  Références  Microsoft
Data Environment 1




3. Dans la fenêtre explorateur
de projet : Ajouter le
composant DataEnvironment :




Appel de Proc Stockées sous VB                                                         Page 1
Geneviève Gautier
4. Vous devez créer ou utiliser un SQLNET correspondant à votre base de données (en locale ou
distante). Vérifier que vous avez un alias valide. Dans l’exemple ci-dessous nous utilisons
SQLNETPO7 qui correspond à la base de données PO7 en local .

5. Vous allez associer au
composant Connection1 le
sqlnet




Test de la connexion




Mettre absolument une croix
Sur « Autoriser l’eng du mot
De passe » sinon il y aura une
Erreur lors de l’appel des
Procédures par la suite.




6. Insérer les procédures
stockées voulues.

ATTENTION : Se
positionner sur
DataEnvironment et non
sur connection1 –




Appel de Proc Stockées sous VB                                                    Page 2
Geneviève Gautier
 Vous devez obtenir l’écran
 suivant :

 Regarder ces 2 procédures, les
 paramètres ...

 Changer le type des paramètres
 des variables hôtes en entier




7. Appel de la procédure et de la fonction dans le code :


        Créer un bouton sur la feuille form1, nommé CmdOk

        Sous la procédure événementielle CmdOk_click()
        Exemple d’appel de la procédure :
               Call DataEnvironment1.Scott_AugmenterSalaire(7844,400)
        Exemple d’appel de la fonction
               Dim wmont as double
               wmont = Call DataEnvironment1.Scott_MontantSalaire(20)
               Debug.print wmont




Exercice : Evolution de l’exercice : Choisir dans une liste déroulante le numéro de département
et afficher le montant des salaires de ce département dans un contrôle.




Appel de Proc Stockées sous VB                                                       Page 3
Geneviève Gautier

				
DOCUMENT INFO
Shared By:
Tags:
Stats:
views:41
posted:10/7/2012
language:French
pages:3